RE: Formatting TimeStamp (Z) fields on PRTFs

You would really like the %date() and %time()  BIFs. 
 
---------------------------------
Booth Martin
http://www.martinvt.com
---------------------------------
-------Original Message-------
 
From: Midrange Systems Technical Discussion
Date: 09/01/05 13:51:29
To: Midrange Systems Technical Discussion
Subject: RE: Formatting TimeStamp (Z) fields on PRTFs
 
Hey Walden!
 
I ran into a formatting problem when trying to parse
out of an XML and write it to our files. I use RPG
/FREE and this way I could do with the parts what I
needed to do (hence the %CHAR). I would assume you
could part out your timestamp in a similar fashion and
write what you need using concatenations.  It may loko
clumsy, please bear in mind that I havent been writing
programs very long, so if there are any shortcuts, let
me know!
 
  #time = %timestamp();
 
  #hours = %subdt(#time:*h);
  #minutes = %subdt(#time:*mn);
  #seconds = %subdt(#time:*s);
  #year = %CHAR(%subdt(#time:*y));
  #month = %CHAR(%subdt(#time:*m));
  #day = %CHAR(%subdt(#time:*d));
  #msec = %subdt(#time:*ms);
 
Hope it helps.
JenR
 
 
  > -------- Original Message --------
  > Subject: Formatting TimeStamp (Z) fields on PRTFs
  > From: "Walden H. Leverich"
  <WaldenL@xxxxxxxxxxxxxxx>
  > Date: Thu, September 01, 2005 1:22 pm
  > To: "Midrange Systems Technical Discussion"
  <midrange-l@xxxxxxxxxxxx>
  >
  > All,
  >
  > There's a date format option, a time format
  option, but not a timestamp
  > formation option. I have a timestamp field that I
  want to print. The
  > exact format I'm not hung up on, I just don't want
  the milliseconds. Any
  > ideas?
  >
  > -Walden
  >
  > ------------
  > Walden H Leverich III
  > Tech Software
  > (516) 627-3800 x11
  > WaldenL@xxxxxxxxxxxxxxx
  > http://www.TechSoftInc.com
  <blocked::http://www.techsoftinc.com/>
  >
  > Quiquid latine dictum sit altum viditur.
  > (Whatever is said in Latin seems profound.)
  >
  >
  > --
  > This is the Midrange Systems Technical Discussion
  (MIDRANGE-L) mailing list
  > To post a message email: MIDRANGE-L@xxxxxxxxxxxx
  > To subscribe, unsubscribe, or change list options,
  > visit:
  http://lists.midrange.com/mailman/listinfo/midrange-l
  > or email: MIDRANGE-L-request@xxxxxxxxxxxx
  > Before posting, please take a moment to review the
  archives
  > at http://archive.midrange.com/midrange-l.
 
> --
> This is the Midrange Systems Technical Discussion
> (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit:
>
http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the
> archives
> at http://archive.midrange.com/midrange-l.
>
>
 
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.
 
.