View previous topic :: View next topic
|
Author |
Message |
karthikr44
Active User
Joined: 25 Aug 2007 Posts: 235 Location: Chennai
|
|
|
|
Hi,
I tried to convert Julian date which is in the format X'yyddds' to MM/DD/CCYY using below code.
Code: |
//STEP010 EXEC PGM=SORT
//SYSPRINT DD SYSOUT=*
//SORTIN DD DSN=PGL.DATBASE.SEP08,DISP=SHR
//SORTOUT DD DSN=DE2.PGL.DATBASE.SEP08,
// DISP=(NEW,CATLG,DELETE),
// UNIT=TSOPK,
// SPACE=(CYL,(15,15),RLSE),
// DCB=(RECFM=FB,LRECL=3208)
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//SYSIN DD *
OPTION COPY
* CREATE DFSORT SYMBOL AS:
* TARG FOR YEAR& MONTH
OUTREC FIELDS=(C'BEGIN,',24,3,Y2U,DT=(MD4/))
/*
//*
|
I/p:
Code: |
DB DT
MTH END
P 3
24-----
*******
X'274F+
240
7F8
|
O/p:
Here i am not getting correct o/p. I am getting only 99/99/9999 for all cases. I dont know where is the problem. Please clarify me
Thanks in advance
R KARTHIK |
|
Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006 Posts: 2481 Location: @my desk
|
|
|
|
Karthik,
You're trying a DFSORT job on Syncsort system. That may not work always. Is this a part of your requirement in this topic? |
|
Back to top |
|
|
karthikr44
Active User
Joined: 25 Aug 2007 Posts: 235 Location: Chennai
|
|
|
|
Hi,
I wrote the posted JCL from SYNCSORT manual only. I think u may have confusion since i used DFSMSG dd statement.
Ya this topic is related to that requirement.
Thanks
R KARTHIK |
|
Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006 Posts: 2481 Location: @my desk
|
|
|
|
Quote: |
I wrote the posted JCL from SYNCSORT manual only |
I m sure you did not find this from a Syncsort Manual.
Code: |
* CREATE DFSORT SYMBOL AS: |
|
|
Back to top |
|
|
karthikr44
Active User
Joined: 25 Aug 2007 Posts: 235 Location: Chennai
|
|
|
|
Ya...I created this JCL from another one. In that i untouched that comment line.
Regards
R KARTHIK |
|
Back to top |
|
|
|