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
do you use message subfiles? What are the necessary keywords required coding a message subfile?
1. If there are two programs using same file and 2 users are using the file at the same time and what can be done to allow them both to access? 2. How can remove lock from the file for accessing it by both users?
what are the key words you must use when using a subfile?
Set on command is used for closed all opened files , initialize var and release resource , return cmd is used for return to calling program but my req. Is dnt close opened files and resource must released while doing transactions , how can i do this...?
what is the use of sflnxtchg?
give an eg of ACQ-(ACQUIRE),BIT OFF,BIT ON,DEALLOC,DUMP,FEOD,FORCE,MHHZO,MHLZO,MHLLZO,MLHZO,REL,RESET,TESTZ,TESTB,TESTN----GIVE SMALL EXAMPLE TO THE OPCODES...TO UNDERSTAND FUNCTIONING...........
How many program bind in one module....
Explain mdt?
what is a rpg?
what is *place and *auto keyword in prtf ?plz explain
When it is desirable to describe files Internally?
What is the difference between iter and do?
can you debug ile rpg program using isdb?
is this a rpg channel?
what is the difference between do while and do until?