BPX4GTR (getitimer) example

The following code returns the time remaining an alarm, or ITIMER_REAL as set by setitimer. For the callable service, see getitimer (BPX1GTR, BPX4GTR) — Get the value of the interval timer. For the data structure, see BPXYITIM — Map getitimer, setitimer structure. AMODE 31 callers use BPX1GTR (getitimer) example.
                                              
         LA    R15,ITIM              Output mapping structure           
         STG   R15,ITIMA             ->structure                        
         CALL  BPX4GTR,              Get process data                  +
               (=A(ITIMER_REAL),     Input: Relative process token     +
               ITIMA,                Out: ->Buffer, mapped by BPXYITIM +
               RETVAL,               Return value: -1, 0               +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               MF=(E,PLIST)          ----------------------------------