Mr.Yallamanda Reddy P thanks for your answer sir,can we use
test(D) opcode in RPG/400,if yes please help me by eloborating
on that answer by writing a sample code for that sir
Answers were Sorted based on User's Feedback
Answer / gagan
test(D) opcode is used to check for the validity of a date/time/timestamp.
If the date is valid then error code returned is o else error code is 1
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / uday bagdi
Testdate field has date data type and 20 is LO level indicator we check this filed is *YMD format or not.Below is the code.
*ymd test (D) Testdate 20
| Is This Answer Correct ? | 0 Yes | 0 No |
How can we make use of SETLL operation in CL?
difference between 1:%found and %equal built function in detail with example .
How can you delete a record from a file in RPG without using DELETE oppcode?
Hi, I am getting the error in RPG (All Record Formats for externally-described file ABCD ignored or dropped due to error; file ignored.) Please suggest any
Hi friends, Can you give the solution for the below mention simple code.and explain.what is output D CHR1 S 4A INZ('PEN') D CHR2 S 10A INZ('MYGET') D CHR3 S 8A INZ('GOOD') D CHR4 S 22A INZ C MOVEL CHR1 CHR4 C MOVE CHR2 CHR4 C EVAL CHR4=CHR3 C MOVE CHR1 CHR4
can anybody explain significance of *loval setll with example code????
3 members in databasefile .how to read records from all the members??
what is batch debug in as400?
Are all these RPG/400 Interviewed Questions being asked recently? are current?
How to code Page up and Page down in RPG for Single page subfile without using ROLLUP/ROLLDOWN in DSPF ?
What is the difference between iter and do?
Can a run time array be declare like below with no specified number of elements ? Is it possible ? DFLD_ARRAY 7 DIM() INZ(*blanks) What does this mean ? Does this mean that the number of array elements will be dynamically declared during run time ?