S
PL_
PL_
PL_TCP_SET_TIMEOUT {%},{%}
*
      S$ = CALLFN('00':         \
                  {*FNR.81}:                 \ ;* Function code
                  OCONV({%1},'MCDX')'R%4':   \ ;* p_no
                  OCONV({%2},'MCDX')'R%4'    \ ;* timeout
                  )
