Re: Dfsort Overlay error

2023-08-14 Thread Ron Thomas
Thanks a lot Kolusu.  Sorry i didn't  articulate what is documented in the user 
guide   in the right way . Anyway thanks again for all the help ..

Regards
Ron T

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Dfsort Overlay error

2023-08-11 Thread Sri h Kolusu
>> Here is what i am getting . Could you please let me what changes to be made ?

Ron,

Sigh ! Not sure as to how you invent your own syntax hope and that it would 
work.  You switched back to using 10 bytes despite me showing that the max 
length is only 8 bytes? and you coded 10 bytes without a format and converting 
it to TOGREG?

If you looked at the $ it is right underneath the First TOGREG function.

OVERLAY=(35:25,10,TOGREG=Y4T(-),ADDDAYS,+120,TOGREG=Y4T(-)))
  $

I guess you are so used to getting complete solutions that you don’t even 
bother to read and understand.

Either way here is something that meets your high expectations.

//SYSINDD *
  OPTION COPY
  OUTREC IFOUTLEN=44,
  IFTHEN=(WHEN=(35,10,CH,EQ,X'',AND,
25,10,CH,GT,X''),
   OVERLAY=(45:25,10,UFF,M11,LENGTH=8,
35:45,8,Y4T,ADDDAYS,+120,TOGREG=Y4T(-)))
/*

Thanks,
Kolusu



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Dfsort Overlay error

2023-08-11 Thread Ron Thomas
Hi Kolusu -

Here is what i am getting . Could you please let me what changes to be made ?

ICE000I 1 - CONTROL STATEMENTS FOR 5650-ZOS, Z/OS DFSORT V2R4  - 13:36 ON FRI AU
   OPTION COPY
   OUTREC IFTHEN=(WHEN=(35,10,CH,EQ,X'',
AND,25,10,CH,GT,X''),
   OVERLAY=(35:25,10,TOGREG=Y4T(-),ADDDAYS,+120,TOGREG=Y4T(-)))
 $
ICE007A E SYNTAX ERROR
ICE751I 0 C5-I79518 C6-I90068 C7-I76949 C8-I75151 E7-I76949
ICE052I 3 END OF DFSORT

Thanks 
Ron T

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Dfsort Overlay error

2023-08-11 Thread Sri h Kolusu
>> Could you please help me figure out where the issue is ?

Ron,

Here are the issues assuming that you read thru documentation that I shared 
earlier.

•   The Syntax of ADDDAYS shows that it requires TOGREG or TOJUL.
•   Look at table 18, you would notice that max length of Y4T is 8 bytes. 
But you are using 10 bytes.

Is there a reason that you are NOT showing the error messages you got from the 
control cards you used? The DFSORT error messages will let you know the reason 
for the failure.


Thanks,
Kolusu


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Dfsort Overlay error

2023-08-11 Thread Ron Thomas
Thanks Kolusu for sharing the link . still i am not able to figure out the same 
.

Modified as below and still not working 

OPTION COPY
OUTREC IFTHEN=(WHEN=(35,10,CH,EQ,X'',
   AND,25,10,CH,GT,X''),
OVERLAY=(35:25,10,Y4T,ADDDAYS,+120))

Could you please help me figure out where the issue is ?

Regards
Ron T

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Dfsort Overlay error

2023-08-11 Thread Sri h Kolusu
>> could someone please let me know what the issue is in the control card as it 
>> is giving error .

Ron,

Looks like you invented your syntax , which is NOT valid with DFSORT.  Search 
for "Adding or Subtracting Days" in the below link and you will see the right 
syntax. Pay attention to Table.18 which describes the formats you can use for 
date arithmetic.

https://www.ibm.com/docs/en/zos/2.4.0?topic=statements-outfil-control


Thanks,
Kolusu
DFSORT Development
IBM Corporation



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Dfsort Overlay error

2023-08-11 Thread Ron Thomas
Hi -

I have a file of LRECL 44 and need to overlay a date in Position 35 by adding 
120 days to the date at position 25

The overlay to be done based also on  condition .

Coded as below

OPTION COPY
OUTREC IFTHEN=(WHEN=(35,10,CH,EQ,X'',
   AND,25,10,CH,GT,X''),
OVERLAY=(35:25,10,ADDDAYS,+120))

Date format at position 25 is -MM-DD

could someone please let me know what the issue is in the control card as it is 
giving error .

Thanks 
Ron T

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN