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.
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 |
How to write record if no field or the field are different in physical file in rpgle ?
1.The questions have given an array declaration and move operation then this statement is correct or not?
Difference between creating a report using Printer file and WRKQRY(Query Report) ?
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 is ment by "MDT"
What is the length of Signature?
if there is pf in two libraries and there is a logical file based on the PF, how to find the pf on which the pf is based.
What is the purpose of Panel Groups?
When will DUMP & DEBUG be ignored?
how do u find whether a record is locked or not??/
list down and describe the sub systems vailable
What is the name of default out queue when user logs inn to syatem with valid profile?