| Author |
Message
|
| fszostak |
 Posted: Wed Jul 27, 2011 9:21 am Post subject: Cobol copybook - Indentation |
 |
|
Acolyte
Joined: 09 Feb 2011
Posts: 64
Location: Curitiba, Brazil
|
People, 
Someone may indicate a material that has the correct indentation copybook need to import occur properly.
I got a material that indicated that the first level must be in column 7 and the second in column 11. (http://www.ibm.com/developerworks/websphere/library/techarticles/0709_suarez/0709_suarez.html)
What is the correct position for the other levels, there is a rule?
I had trouble with the position of the clause "depending on" if not put in the correct column in the import error occurs.
Thanks!
_________________
WMB 6.1.005 |
|
| Back to top |
|
 |
| Vitor |
| Posted: Wed Jul 27, 2011 9:34 am Post subject: Re: Cobol copybook - Indentation |
|
|
Grand High Poobah
Joined: 11 Nov 2005
Posts: 26093
Location: Texas, USA
|
| fszostak wrote: |
| I got a material that indicated that the first level must be in column 7 and the second in column 11. |
Glancing through that link I didn't see that, and it's either misleading or just wrong.
COBOL insists that an 01 level must start in column 8 (labeled A by the WMB toolkit) and subsequent levels must be in column 12 (labeled B) or greater. Column 7 has a special meaning in COBOL (most noteably for the indication of comment lines) and code is banned from it. For the record columns 1 - 6 are offically sequence numbers.
| fszostak wrote: |
| I had trouble with the position of the clause "depending on" if not put in the correct column in the import error occurs. |
Well it doesn't matter to a COBOL compiler and I'm interested to discover that simply putting it in the right column fixed your earlier alignment issue.
_________________
Honesty is the best policy.
Insanity is the best defence. |
|
| Back to top |
|
|
| Vitor |
| Posted: Wed Jul 27, 2011 9:38 am Post subject: |
|
|
Grand High Poobah
Joined: 11 Nov 2005
Posts: 26093
Location: Texas, USA
|
For our younger readers wondering what difference it makes how many spaces there are in front of a line of code, COBOL dates from the dim mists of pre-history when you didn't type code but made it out of cardboard (or if you were lucky a nice woman in the punch room did it for you). Those of you who've met z/OS will know that while the cardboard may now be virtual it still lives.
Full details here
_________________
Honesty is the best policy.
Insanity is the best defence. |
|
| Back to top |
|
|
| fszostak |
| Posted: Wed Jul 27, 2011 10:26 am Post subject: |
|
|
Acolyte
Joined: 09 Feb 2011
Posts: 64
Location: Curitiba, Brazil
|
Vitor,
Thank you for the explanation and fix.
Then follow the next levels above the 12 column, indented with 4 positions for example. (hmmm!)
I'll show some problems. Wait .... 
_________________
WMB 6.1.005 |
|
| Back to top |
|
|
| Vitor |
| Posted: Wed Jul 27, 2011 10:41 am Post subject: |
|
|
Grand High Poobah
Joined: 11 Nov 2005
Posts: 26093
Location: Texas, USA
|
| fszostak wrote: |
| I'll show some problems. |
Almost certainly. Welcome to COBOL, enjoy your stay. 
_________________
Honesty is the best policy.
Insanity is the best defence. |
|
| Back to top |
|
|
| smdavies99 |
| Posted: Wed Jul 27, 2011 11:35 am Post subject: |
|
|
Jedi Council
Joined: 10 Feb 2003
Posts: 6076
Location: Somewhere over the Rainbow this side of Never-never land.
|
| Vitor wrote: |
| if you were lucky a nice woman in the punch room did it for you |
Oh dear Vitor you are going to have to stop this. That brought back memories of a young lady name Michelle on the 3rd floor at 115 New Cavendish St.
Needless to say, my 'punch card' requests always went to the top of the pile.
(Circa 1972...)
_________________
WMQ User since 1999
MQSI/WBI/WMB/'Thingy' User since 2002
Linux user since 1995
Every time you reinvent the wheel the more square it gets (anon). If in doubt think and investigate before you ask silly questions. |
|
| Back to top |
|
|
| Vitor |
| Posted: Wed Jul 27, 2011 12:03 pm Post subject: |
|
|
Grand High Poobah
Joined: 11 Nov 2005
Posts: 26093
Location: Texas, USA
|
| smdavies99 wrote: |
| Vitor wrote: |
| if you were lucky a nice woman in the punch room did it for you |
Oh dear Vitor you are going to have to stop this. That brought back memories of a young lady name Michelle on the 3rd floor at 115 New Cavendish St.
Needless to say, my 'punch card' requests always went to the top of the pile. |
I'd like to make it entirely clear that in my case "did it for you" quite certainly means "punched up coding forms". Any other interpretation of that phrase has no basis in evidence after all these years.
_________________
Honesty is the best policy.
Insanity is the best defence. |
|
| Back to top |
|
|
| Vitor |
| Posted: Wed Jul 27, 2011 12:04 pm Post subject: |
|
|
Grand High Poobah
Joined: 11 Nov 2005
Posts: 26093
Location: Texas, USA
|
| smdavies99 wrote: |
| 115 New Cavendish St. |
Now that's an address to conjure with...  
_________________
Honesty is the best policy.
Insanity is the best defence. |
|
| Back to top |
|
|
| smdavies99 |
| Posted: Wed Jul 27, 2011 12:29 pm Post subject: |
|
|
Jedi Council
Joined: 10 Feb 2003
Posts: 6076
Location: Somewhere over the Rainbow this side of Never-never land.
|
| Vitor wrote: |
| smdavies99 wrote: |
| 115 New Cavendish St. |
Now that's an address to conjure with... |
come on Vitor out with it.... what does it mean to you then?
_________________
WMQ User since 1999
MQSI/WBI/WMB/'Thingy' User since 2002
Linux user since 1995
Every time you reinvent the wheel the more square it gets (anon). If in doubt think and investigate before you ask silly questions. |
|
| Back to top |
|
|
| Vitor |
| Posted: Wed Jul 27, 2011 12:43 pm Post subject: |
|
|
Grand High Poobah
Joined: 11 Nov 2005
Posts: 26093
Location: Texas, USA
|
| smdavies99 wrote: |
| Vitor wrote: |
| smdavies99 wrote: |
| 115 New Cavendish St. |
Now that's an address to conjure with... |
come on Vitor out with it.... what does it mean to you then? |
University students, drinking and good times.
_________________
Honesty is the best policy.
Insanity is the best defence. |
|
| Back to top |
|
|
| smdavies99 |
| Posted: Wed Jul 27, 2011 12:52 pm Post subject: |
|
|
Jedi Council
Joined: 10 Feb 2003
Posts: 6076
Location: Somewhere over the Rainbow this side of Never-never land.
|
| Vitor wrote: |
University students, drinking and good times. |
I guess we went to the same place then.
Polytechnic Students, 6X in the Uni Bar in Bolsover St and late nights at the Cleveland Kebab house. (BSc Control Eng 1972-75.)
_________________
WMQ User since 1999
MQSI/WBI/WMB/'Thingy' User since 2002
Linux user since 1995
Every time you reinvent the wheel the more square it gets (anon). If in doubt think and investigate before you ask silly questions. |
|
| Back to top |
|
|
| lancelotlinc |
| Posted: Thu Jul 28, 2011 4:22 am Post subject: |
|
|
Jedi Knight
Joined: 22 Mar 2010
Posts: 4941
Location: Bloomington, IL USA
|
| Vitor wrote: |
| COBOL dates from the dim mists of pre-history when you didn't type code but made it out of cardboard (or if you were lucky a nice woman in the punch room did it for you). |
I think I dated a gal that punched cards once. 
_________________
http://leanpub.com/IIB_Tips_and_Tricks
Save $20: Coupon Code: MQSERIES_READER |
|
| Back to top |
|
|
|
|
