|
midrange.com
I'm out of the office today, but I'll return on Monday, May 6th. If you need
further assistance, please contact Mark Greenawalt at x311, John Censoplano at
x353, or Spencer Chun at x354.
Thanks,
Ted
>>> "rpg400-l@midrange.com" 05/03/02 03:50 >>>
I'm out of the office today, but I'll return on Monday, May 6th. If you need
further assistance, please contact Mark Greenawalt at x311, John Censoplano at
x353, or Spencer Chun at x354.
Thanks,
Ted
>>> "rpg400-l@midrange.com" 05/03/02 03:43 >>>
I'm out of the office today, but I'll return on Monday, May 6th. If you need
further assistance, please contact Mark Greenawalt at x311, John Censoplano at
x353, or Spencer Chun at x354.
Thanks,
Ted
>>> "rpg400-l@midrange.com" 05/03/02 03:35 >>>
I'm out of the office today, but I'll return on Monday, May 6th. If you need
further assistance, please contact Mark Greenawalt at x311, John Censoplano at
x353, or Spencer Chun at x354.
Thanks,
Ted
>>> "rpg400-l@midrange.com" 05/03/02 03:32 >>>
I'm out of the office today, but I'll return on Monday, May 6th. If you need
further assistance, please contact Mark Greenawalt at x311, John Censoplano at
x353, or Spencer Chun at x354.
Thanks,
Ted
>>> "rpg400-l@midrange.com" 05/03/02 03:27 >>>
I'm out of the office today, but I'll return on Monday, May 6th. If you need
further assistance, please contact Mark Greenawalt at x311, John Censoplano at
x353, or Spencer Chun at x354.
Thanks,
Ted
>>> "rpg400-l@midrange.com" 05/03/02 03:24 >>>
I'm out of the office today, but I'll return on Monday, May 6th. If you need
further assistance, please contact Mark Greenawalt at x311, John Censoplano at
x353, or Spencer Chun at x354.
Thanks,
Ted
>>> "rpg400-l@midrange.com" 05/03/02 03:03 >>>
This is a multipart message in MIME format.
--
[ Picked text/plain from multipart/alternative ]
I tested this on V4R5 and Compiled
*--------------------------------------------------------------*
H DECEDIT('0,') DATEDIT(*YMD.)
*---------------------------------------------------------------*
D Date S D
D Hours S T
D Txt10Char S 10A
D Txt8CHAR S 8A
*
*
C Time Hours
C EVAL Txt10char = %Char(*Date)
C EVAL Txt8char = %Char(Hours)
But this line is not supported by V4R3 for the "*Date" parameter
C EVAL Txt10char = %Char(*Date)
---------------------------------------------------------------------------------------
Euro Perozzi
Archimedia s.r.l.
Via de Lorenzi, 10
I - 28921 Verbania
Tel. +39-0323-407232 Fax.+39-0323-404985
email: euro.perozzi@archi.it
------------------------------------------------------------------------------------------
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
