I want to add 10 days in current date. how it is possible in
CL program...?
Answer Posted / s kumar
Opps!! by mistake i left the one line to add. that is...
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 ? | 13 Yes | 10 No |
Post New Answer View All Answers
is this a rpg channel?
How many program bind in one module....
what was the robotech rpg?
if there is a module object , how to find the program object for this module object.Assume the module object name and program object name is not same.
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...........
When we have a file with Duplicate records and I want to read the unique record from the file. For example a file containing Emp Name as 'Ram' and there are 3 entries of it. So how to read a unique record from File?
What is the diff bw PF/LF Name and their Record format name? what is restriction in record format then file name?
are there any useful c runtime apis that I can call from rpg iv?
How to declare the pull button in AS/400..
how do you use commitment control in rpg?
Explain mdt?
What is the difference between copybooks and subprocedures in as400?
How can we override a file during runtime in rpg?
what are the key words you must use when using a subfile?
What is the purpose of record level identifier?