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