Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: XUEPCSRT

Package: Kernel

Routine: XUEPCSRT


Information

XUEPCSRT ;FO-OAKAND/REM - EPCS Utilities and Reports; [5/7/02 5:53am] ;08/06/2012

Source Information

Source file <XUEPCSRT.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Kernel 5 ($$FMADD,$$HTE)^XLFDT  $$LKUP^XPDKEY  ($$PRESCBR,$$PRIVS)^XUEPCSRT  $$ACTIVE^XUSER  OWNSKEY^XUSRB  
VA Fileman 5 (C,NOW)^%DTC  ^DIC  UPDATE^DIE  ^DIK  EN1^DIP  
Toolkit 1 $$GET^XPAR  

Caller Graph

Caller Graph Total: 10

Package Total Caller Graph
Kernel 10 XU EPCS DISUSER EXP DATE  XU EPCS DISUSER PRIVS  XU EPCS DISUSER XDATE EXPIRES  XU EPCS EXP DATE  XU EPCS LOGICAL ACCESS  XU EPCS PRIVS  XU EPCS PSDRPH AUDIT  XU EPCS PSDRPH KEY  
XU EPCS XDATE EXPIRES  XUEPCSRT  

Entry Points

Name Comments DBIA/ICR reference
RPT2 ;ePCS report - allocation history for PSDRPH key
RPT1 ;ePCS report - setting or modifing to logical access controls.
PRESCBR(XUSD0) ;called from print option - XU EPCS PRIVS
PRIVS(XUSD0) ;called from print option - XU EPCS PRIVS
RECORD(LINE,NOW) ;Record the edited data into audit file #8991.7
XT30(XUSD0,ACT) ;called from print option - XU EPCS XDATE EXPIRES
VUSER2(XUSD0,ACT) ;called from option - XU EPCS PRIVS,XU EPCS DISUSER PRIVS
ASK(TYPE,NAME) ;Ask user if Allocate/De-allocate - returns y/n
VUSER1(XUSD0,ACT) ;called from option - XU EPCS DISUSER EXP DATE,XU EPCS EXP DATE
PSDKEY ;Allocated/de-allocate the PSDRPH key option

External References

Name Field # of Occurrence
C^%DTC RPT1+6, RPT2+6
NOW^%DTC RPT1+6, RPT2+6
^DIC PSDKEY+6
UPDATE^DIE PSDKEY+13, RECORD+4
^DIK PSDKEY+11
EN1^DIP RPT1+16, RPT2+17
$$FMADD^XLFDT XT30+5
$$HTE^XLFDT PSDKEY+15
$$GET^XPAR RPT1+10, RPT2+10
$$LKUP^XPDKEY PSDKEY+5
$$PRESCBR^XUEPCSRT VUSER2+5
$$PRIVS^XUEPCSRT VUSER2+6
$$ACTIVE^XUSER XT30+8, XT30+10, VUSER1+8, VUSER1+10, VUSER2+8, VUSER2+10
OWNSKEY^XUSRB PSDKEY+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"DEVICE NOT DEFINED! Set the parameter XUEPCS REPORT DEVICE."
  • Line Location: RPT1+11
Function Call: WRITE
  • Prompt: !!,"DEVICE NOT DEFINED! Set the parameter XUEPCS REPORT DEVICE."
  • Line Location: RPT2+11
Function Call: WRITE
  • Prompt: !,"You don't have privileges. See your package coordinator or site manager."
  • Line Location: PSDKEY+4
Function Call: WRITE
  • Prompt: !,"PSDRPH key does not exist"
  • Line Location: PSDKEY+5
Function Call: WRITE
  • Prompt: !,"Nothing done..."
  • Line Location: PSDKEY+9
Function Call: WRITE
  • Prompt: $C(7)," ??",!,"Please enter 'Y' or 'N'"
  • Line Location: ASK+7
Routine Call
  • DIE
  • Line Location:
    • PSDKEY+13
    • RECORD+4
Routine Call
  • DIC
  • Line Location:
    • PSDKEY+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^VA(200 - [#200] PRESCBR+4, PRIVS+5, XT30+5, VUSER1+5, VUSER1+6
^XTV(8991.6 - [#8991.6] RPT1+7
^XTV(8991.7 - [#8991.7] RPT2+7
^XUSEC("XUMGR" PSDKEY+3

Label References

Name Line Occurrences
$$ASK PSDKEY+9
RECORD PSDKEY+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% RPT1+4~, RPT1+5*, RPT1+7*, RPT1+8, RPT2+4~, RPT2+5*, RPT2+7*, RPT2+8, ASK+3~, ASK+4*
, ASK+8*, ASK+9*, ASK+10
ACT XT30~, XT30+7, XT30+9, VUSER1~, VUSER1+7, VUSER1+9, VUSER2~, VUSER2+7, VUSER2+9
>> BY RPT1+15*, RPT2+16*
CNT XT30+3~, XT30+4*, XT30+6*, XT30+8*, XT30+10*, XT30+11, VUSER1+3~, VUSER1+4*, VUSER1+5*, VUSER1+6*
, VUSER1+8*, VUSER1+10*, VUSER1+11, VUSER2+3~, VUSER2+4*, VUSER2+5*, VUSER2+6*, VUSER2+8*, VUSER2+10*, VUSER2+11
>> DA PSDKEY+11*
>> DA(1 PSDKEY+11*
DEA XT30+3~, XT30+5*, XT30+6
DEV RPT1+4~, RPT1+10*, RPT1+11, RPT1+12, RPT2+4~, RPT2+10*, RPT2+11, RPT2+12
DIC RPT1+14!, RPT1+15*, RPT2+15!, RPT2+16*, PSDKEY+6!*
DIC("A" PSDKEY+6*
DIC(0 PSDKEY+6*
DIK PSDKEY+11!*
>> DISUPNO RPT1+13*, RPT2+13*
DT XT30+5, XT30+6
DT30 XT30+3~, XT30+5*, XT30+6
DTIME ASK+7
DUZ PSDKEY+3, PSDKEY+16
DUZ(0 PSDKEY+3
FDA RECORD+1~
FDA( PSDKEY+13*, RECORD+2*, RECORD+3*
FL ASK+3~, ASK+4*, ASK+5, ASK+7*, ASK+8*, ASK+9*
>> FLDS RPT1+15*, RPT2+16*
FLG RPT1+4~, RPT1+5*, RPT1+7, RPT1+8*, RPT1+9, RPT2+4~, RPT2+5*, RPT2+7, RPT2+8*, RPT2+9
>> FR RPT1+15*, RPT2+16*
I RECORD+1~, RECORD+2*
IEN PSDKEY+2~, RECORD+1~
INPUT PSDKEY+2~, PSDKEY+16*
>> IOP RPT1+12*, RPT2+12*
>> L RPT1+15*, RPT2+16*
LINE RECORD~, RECORD+2
MSG PSDKEY+2~, RECORD+1~
NAME ASK~, ASK+6
NOW PSDKEY+2~, PSDKEY+15*, PSDKEY+16, RECORD~, RECORD+3
OK PSDKEY+2~, PSDKEY+9*
>> TO RPT1+15*, RPT2+16*
TYPE ASK~, ASK+6
U PRESCBR+5, PRIVS+6, PRIVS+7, XT30+5, PSDKEY+7, ASK+7, RECORD+2, VUSER1+5, VUSER1+6
VALUE RECORD+1~, RECORD+2*
X RPT1+4~, RPT1+6, RPT2+4~, RPT2+6, ASK+7*, ASK+8, ASK+9
X1 RPT1+4~, RPT1+6*, RPT2+4~, RPT2+6*
X2 RPT1+4~, RPT1+6*, RPT2+4~, RPT2+6*
XDT XT30+3~, XT30+5*, XT30+6
XUBOSS PSDKEY+2~, PSDKEY+3*, PSDKEY+4
XUDA PSDKEY+2~, PSDKEY+7*, PSDKEY+8, PSDKEY+11, PSDKEY+13, PSDKEY+16
XUKEY PSDKEY+2~, PSDKEY+5*, PSDKEY+11
XUNAME PSDKEY+2~, PSDKEY+7*, PSDKEY+9
XURET PSDKEY+2~, PSDKEY+8*, PSDKEY+9, PSDKEY+11, PSDKEY+13, PSDKEY+16
XUSD0 PRESCBR~, PRESCBR+4, PRIVS~, PRIVS+5, XT30~, XT30+5, XT30+8, XT30+10, VUSER1~, VUSER1+5
, VUSER1+6, VUSER1+8, VUSER1+10, VUSER2~, VUSER2+5, VUSER2+6, VUSER2+8, VUSER2+10
XUSPS PRESCBR+3~, PRESCBR+4*, PRESCBR+5
XUSPS3 PRIVS+4~, PRIVS+5*, PRIVS+6, PRIVS+7
>> Y PSDKEY+6, PSDKEY+7
YT RPT1+4~, RPT1+6*, RPT1+8, RPT1+15, RPT2+4~, RPT2+6*, RPT2+8, RPT2+16
ZZ PSDKEY+2~, PSDKEY+8
ZZ(0 PSDKEY+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All