IBM Mainframe Forum

[supriya saraswat]

i want to pass current date to my cobol program through jcl.how can i pass .

what will be the cobol prog and jcl for that.

can any one tell me...

[Bill Dennis]

You can use SORT program to write current date into a file and then read it into your program. Try running this:

Select all

//SORT     EXEC PGM=IERRCO00                 
//SYSOUT   DD SYSOUT=*                                 
//SORTIN   DD DUMMY,RECFM=FB,LRECL=80,BLKSIZE=80       
//SORTOUT  DD DISP=(,CATLG),DSN=yourid.DATECARD,       
//            UNIT=3390,SPACE=(TRK,1),VOL=SER=dasd   
//SYSIN    DD *                                       
 OPTION COPY                                           
 OUTFIL HEADER1=(DATENS=(MD4),TIME=(12.))             
//*                                                     

[MrSpock]

I'm curious to know why you'd want to pass a system date to a program when the program can just as easily retrieve the system date itself. What is the supposed advantage here?

[supriya saraswat]

actually i got a program in which date for certain variables are fetched externally..i was unable to understand..
thats why....

[jayind]

Hi supriya saraswat,

actually i got a program in which date for certain variables are fetched externally..

if you can post the piece of code you are having difficulty to understand and respective JCL part, people will be able to help you..

Regards,
Jayind

[supriya saraswat]

Actually in the cobol program logic that processes date as an external parameter should be replaced with a logic that uses date from a system.

the problem is not with jcl...
so plz tell me what should be the logic???

[jayind]

Hi Supriya,

Since you have gone through the program, you understood how the date is handling currently.. we dont know how the date handled now and hence cant provide a solution until we see the piece of code handling the date currently. Looks like you have concern pasting the code in the forum, probably you can mask the values and change the variable names and make it as generic.

Regards,
jayind

[Bill Dennis]

Are you changing the method simply because you don't understand the current logic?

Are you certain you always want the system date? What if you need to rerun yesterday's job?

Of course, all we can do is guess since the use of the date is not very well explained.