Ü  %SECONDS (Number of seconds)

 

·         %SECONDS converts a number into a duration that can be added to a time or timestamp value to affect its no. of seconds.

 

Example –%seconds built-in function in rpgle

 


Columns . . . :    6  80          Browse                          AMITCC/QRPGLESRC
SEU==>                                                                  BIN_SECOND
FMT D  DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++++++
*************** Beginning of data ************************************************
0001.00 DTIME0            S               T   INZ(T'10.12.15')
0002.00 DTIME1            S               T
0003.00 DTIMESTP0         S               Z
0004.00 DTIMESTP1         S               Z
0005.00 C                   EVAL      TIME1=TIME0 + %SECONDS(2)
0006.00 C     TIME0         DSPLY
0007.00 C     TIME1         DSPLY
0008.00 C                   TIME                    TIMESTP0
0009.00 C                   EVAL      TIMESTP1=TIMESTP0 - %SECONDS(2)
0010.00 C     TIMESTP0      DSPLY
0011.00 C     TIMESTP1      DSPLY
0012.00 C                   SETON                                        LR
****************** End of data ***************************************************


 

OUTPUT

 

 
10.12.15                       
10.12.17                       
2013-02-01-01.48.48.728000     
2013-02-01-01.48.46.728000 





User Comments:





Copyright © Go4as400.com, 2013-2017. Copyright notice