Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: ZOSVKRM

ZOSVKRM.m

Go to the documentation of this file.
  1. %ZOSVKR ;SF/KAK - Collect RUM Statistics for MSM ;3/10/00 07:43 [ 04/02/2003 8:29 AM ]
  1. ;;8.0;KERNEL;**1005,1007**;APR 1, 2003
  1. ;;8.0;KERNEL;**90,94,107,122,143**;Jul 21, 1998
  1. ;
  1. RO(OPT) ; Record option resource usage in ^XTMP("KMPR","JOB"
  1. ;
  1. N KMPRTYP S KMPRTYP=0 ; option
  1. G EN
  1. ;
  1. RP(PRTCL) ; Record protocol resource usage in ^XTMP("KMPR","JOB"
  1. ;
  1. ; Variable PRTCL = option_name^protocol_name
  1. S OPT=$P(PRTCL,"^"),PRTCL=$P(PRTCL,"^",2) Q:PRTCL=""
  1. N KMPRTYP S KMPRTYP=1 ; protocol
  1. Q
  1. ;
  1. RU(KMPROPT,KMPRTYP,KMPRSTAT) ;-- record resource usage in ^XTMP("KMPR","JOB"
  1. Q
  1. ;
  1. EN ;
  1. Q