I want to add 10 days in current date. how it is possible in
CL program...?

Answer Posted / prakash

PGM
DCL VAR(&DATE) TYPE(*Char) Len(6)
RTVSYSVAL SYSVAL(QDATE) RTNVAR(&DATE)
ADDDATE DAYS(10) TOVAR(&DATE) TOVARFMT(*SYSVAL) +
DATEFMT(*SYSVAL)
ENDPGM

Is This Answer Correct ?    1 Yes 9 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

how can I tell when to replace the array?

705


what is kids-rpg?

671


how does the rpg element work?

720


is this a rpg channel?

682


what is a rpg?

705






Hi Viewers can any body explain me how to update and ahange the already existed data in physical file using subfile ? please explain me with the code if possible?

4217


what is the use of sflnxtchg?

806


what is the difference between do while and do until?

713


What is the purpose of record level identifier?

731


We have job which is running as batch. It takes atleast 06 hours to complete tht job. But I wanna do tht job with in 3 hours?

774


How Chain operation copies the record's data to the input buffer for the program?

1084


how can you display specific subfile page on the screen in unequal subfile?

677


What are the types of identifiers?

574


how do I preserve and clean the array?

677


what is *place and *auto keyword in prtf ?plz explain

2730