Interested to Buy Any Domain ? << Click Here >> for more details...
how to find whether a date format is valid or not in RPG400
not in RPGILE.Can you please write the coding for this sir,i'm
new to AS400.Please help.
- 1 Answers
- 4771 Views
- I also Faced
- E-Mail Answers
Answer / jai shri ram
> D DateIn S 8 0 INZ(*Zeros)
> D DateMDY S D DATFMT(*USA)
> D DateYMD S D DATFMT(*ISO)
> D Days S 5 0 INZ(*Zeros)
> D DateAlpha S 8
> ...
> C Move DateIn DateAlpha
> C *MDY0 Test (D) DateAlpha
99
> C If *In99
> C Except ErrorDtl
> C Iter
> C EndIf
> C Move DateIn DateMDY
> C AddDur Days:*Days DateMDY
> C Move DateMDY DateIn
| Is This Answer Correct ? | 2 Yes | 0 No |
what is the necessary command needed before OPNQRYF and why?
Suppose we have 10 records with same name and we are reading using READE,after 4 record i have to use CHAIN what is the output
what is *place and *auto keyword in prtf ?plz explain
Setps to create .csv file on IFS folder in AS/400( V4R3)....?
what is data area and how it is used in rpg program ?
How can we override a file during runtime in RPG? Without using OVRDBF or calling a CL program
wat is meant by hidden field , why it is used?
How do you find whether a job is a batch job or interactive?
purpose of pannel group??/
Delete FileName at first statement in RPG.
I have two sessions S1 & S2 under this 3 jobs(say j1,j2,j3 under session S1) And 2 jobs(Say j4, j5 Under session S2)is running. How many QTEMP & how many LDA will create for the same.
How I can reread the physical file in CL program once the end of file reached in same CL program.
RPG400 
