How to pass variable of type date from PF to display file

Mohan K

695 pts.

Tags:

RPG

RPG/400

I want to pass one variable MYDATE of type(L) date from my PF to Display file through simple RPG program and how can I define result field in display file either as numeric or as alphanumeric. Please help me as early as possible, it will be helpful to me.

Asked: June 6, 2008 11:20 AM Last updated: October 2, 2014 5:54 PM

Answer Wiki

Last updated: October 2, 2014 5:54 PM GMT

Michael Tidmarsh62,260 pts.
History
Contributors
- Ordered by most recent
- Michael Tidmarsh62,260 pts.
- Gilly40023,730 pts.

Thanks. We'll let you know when a new response is added.

Hi,

I didn’t get any solution from this site what I expected

Maybe this link will help :-

AS/400 Course

This takes you through using SDA to create display files.

Regards,

Martin Gilbert.

Discuss This Question: 4 Replies

GAC Jun 6, 2008 3:57 PM GMT

Hi Mohan, It has been a while since a do not use SDA, but I remember that it did not support date/time/timestamp fields. I do not know if importing PF fields into SDA solves the problem (I kind of remember it does not, it just changed the field type to a zoned equivalent) but if not, you can generate the DDS file anyway and then change the definition for those fields through SEU. At the end, the line should be like this: A PF_FIELD L 6 63DATFMT(date-format) I hope this helps, Gerardo.

300 pointsBadges:

report
GAC Jun 6, 2008 4:02 PM GMT

BTW Martin: A great link you shared. Thank you, Gerardo.

300 pointsBadges:

report
Vatchy Jun 6, 2008 4:47 PM GMT

Try this: DateOut = char 10 and DateIn = type L C *ISO MOVE DateIn w@Date for 2008-05-21 or C *USA MOVE DateIn w@Date for 05-21-2008 Hope this helps.

1,415 pointsBadges:

report
Vatchy Jun 6, 2008 4:49 PM GMT

OK, that didn't work. The lines should be: C *ISO MOVE DateIn DateOut C *USA MOVE DateIn DateOut

1,415 pointsBadges:

report