| View previous topic :: View next topic |
| Author |
Message |
shekar123
Advanced
Joined: 22 Jul 2005
Posts: 528
Topics: 90
Location: Bangalore India
|
 Posted: Wed Nov 29, 2006 9:45 am Post subject: unable to pass date to a cobol db2 program |
 |
|
Hai All,
I am executing a COBOL DB2 program from a job system Project Specific and i am passing date in Julian format to the program and the date is obtained from the system and passed to the program in the LINKAGE SECTION.I am checking the value in the COBOL Program but is turns out to be blanks since i get error in passing date.Can anyone help me in this problem and the date is properly substitued for other parts.
I have already looked into the error description but not able to figure out.
My code for SYSTSIN:
| Code: |
//SYSTSIN DD *
DSN SYSTEM(DSNY)
RUN PROGRAM(ABCD) PLAN(ABCD)
PARM('&DATE')
END
/*
|
ERROR MESSAGE
| Code: |
READY
DSN SYSTEM(DSNY)
DSN
RUN PROGRAM(ABCD) PLAN(ABCD)
IKJ56641I DSN ENDED DUE TO ERROR+
IKJ56641I SYSTEM ABEND CODE 0C7 REASON CODE 00000007
|
Finally i tried using code and i am receiving in the Program as &DATE but still not able to get the julian date from the JOB system.
| Code: |
//SYSTSIN DD *
DSN SYSTEM(DSNY)
RUN PROGRAM(ABCD) PLAN(ABCD) PARM('&DATE') AS WELL AS PARM('&DATE/')
END
/*
|
_________________
Shekar
Grow Technically |
|
| Back to top |
|
 |
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12376
Topics: 75
Location: San Jose
|
|
| Back to top |
|
|
ofer71
Intermediate
Joined: 12 Feb 2003
Posts: 358
Topics: 4
Location: Israel
|
| Posted: Wed Nov 29, 2006 10:03 am Post subject: |
|
|
You can't pass symbolic parameters within instream data. You can, however, generate the instream data with the date, and use it as a dataset/member.
O.
________
Toyota RZ engine specifications
Last edited by ofer71 on Sat Feb 05, 2011 11:55 am; edited 1 time in total |
|
| Back to top |
|
|
sriramla
Beginner
Joined: 22 Feb 2003
Posts: 74
Topics: 1
|
| Posted: Wed Nov 29, 2006 1:09 pm Post subject: |
|
|
Shekar,
I see a missing comma after PLAN(ABCD) in your SYSTSIN card.
| Code: | //SYSTSIN DD *
DSN SYSTEM(DSNY)
RUN PROGRAM(ABCD) PLAN(ABCD) -
PARM('&DATE')
END
/* |
|
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
