|
View previous topic :: View next topic
|
| Author |
Message |
sandippawar21
Currently Banned
New User
Joined: 09 Sep 2008
Posts: 9
Location: Pune
|
|
|
|
I have a JCL which executes a program and passes a 4 byte data as a PARM as coded below
//STEP01 EXEC PGM=PROGRAM,PARM='HELL'
And in linkage section of the COBOL program the receiving field is of
size X(02).What will be the results during the runtime?
And if receiving field is of size 9(02)..what will happen? |
|
| Back to top |
|
 |
sri_mf
Active User
Joined: 31 Aug 2006
Posts: 218
Location: India
|
|
|
|
| sandippawar21 wrote: |
I have a JCL which executes a program and passes a 4 byte data as a PARM as coded below
//STEP01 EXEC PGM=PROGRAM,PARM='HELL'
And in linkage section of the COBOL program the receiving field is of
size X(02).What will be the results during the runtime?
And if receiving field is of size 9(02)..what will happen? |
Why can not you code a simple program to Test ur questions and also let us know the results. |
|
| Back to top |
|
|
sandippawar21
Currently Banned
New User
Joined: 09 Sep 2008
Posts: 9
Location: Pune
|
|
|
|
Hi,
I don't have access to aminframe....thats y I shared this topic here.
Please anybody tell me the solution. |
|
| Back to top |
|
|
sri_mf
Active User
Joined: 31 Aug 2006
Posts: 218
Location: India
|
|
|
|
| sandippawar21 wrote: |
I have a JCL which executes a program and passes a 4 byte data as a PARM as coded below
//STEP01 EXEC PGM=PROGRAM,PARM='HELL'
And in linkage section of the COBOL program the receiving field is of
size X(02).What will be the results during the runtime?
And if receiving field is of size 9(02)..what will happen? |
01 WS-LINKAGE.
05 WS-LENGTH PIC S9(04) COMP.
05 WS-ABCD PIC X(02).
If you declare like this then WS-ABCD will hold two characters and you are loosing the other two characters.
Program will run fine but you will not get correct results. |
|
| Back to top |
|
|
Escapa
Senior Member
Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA
|
|
|
|
If no of characters passed in PARM is more than
linkage section alpha numeric field declaration
In below example
| Code: |
01 WS-LINKAGE.
05 WS-LENGTH PIC S9(04) COMP.
05 WS-ABCD PIC X(02).
|
if you pass 'ABCDE' from PARM
WS-LENGTH will be correct i.e. 5
but WS-ABCD will have value 'AB' only |
|
| Back to top |
|
|
Escapa
Senior Member
Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA
|
|
|
|
| Quote: |
And if receiving field is of size 9(02)..what will happen?
|
and about above question Sandip ressult will be same as with alphanumeric.
So it will work fine as long as you are not using it for any calculations  |
|
| Back to top |
|
|
|
|
