× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  1.  Home
  2. RPG400-L
  3. May 2002

Looking for better coding

This is a multipart message in MIME format.
--
[ Picked text/plain from multipart/alternative ]
BTW, does any one has a better coding than this  ?....

H DECEDIT('0,') DATEDIT(*YMD.)
.
D Date            S               D
D Hours           S               T
.
  *
C                   Move      *DATE         Date
.
C                   Move      Date          DBtxt10Char
C                   Time                    Hours
C     *Iso          Move      Hours         DBtxt8Char

Results:

DBtxt10char = '2002-05-02'
DBtxt8Char = '15.25.02'


Comment:
I find this coding fairly elegant.... But this could be for my ignorance;
browsing RPG manuals did not help much.
.

---------------------------------------------------------------------------------------
 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
------------------------------------------------------------------------------------------

As an Amazon Associate we earn from qualifying purchases.

This thread ...
Follow-Ups:
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2025 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.