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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRSEUTL

Package: PAID

Routine: PRSEUTL


Information

PRSEUTL ;HISC/JH/MD-EMPLOYEE EDUCATION REPORT - UTILITY ;4/24/1998

Source Information

Source file <PRSEUTL.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
PAID 4 MSG20^PRSEMSG  ENDPG^PRSEUTL  ($$EN2,$$EN3)^PRSEUTL2  $$EN4^PRSEUTL3  
VA FileMan 4 ^%DT  C^%DTC  D^DIQ  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 17

Package Total Caller Graph
PAID 17 PRSECAL  PRSEED6  PRSEEMP  PRSEEMP1  PRSEEMP3  PRSEEMP4  PRSEPMC  PRSEPMD1  
PRSEPMD4  PRSEPMD5  PRSEPMD6  PRSEPOL0  PRSEPRG0  PRSERSTR  PRSEUTL  ^PRSE(452.1  
^PRSE(452.8  

Entry Points

Name Comments DBIA/ICR reference
INS ; INSERVICE SELECTION
INS2 ; INSERVICE SELECTION
DATSEL ;
EN2 ; INPUT XFORM: FREQUENCY FIELD IN 452.1
EN3 ; OUTPUT XFORM: FREQUENCY FIELD IN 452.1
DEV ;
Q7
EN3A ; CLASS DATE
LAYGO(SER) ; LAYGO NODE IN 452.8 DETERMINE IF
; ENTRY CAN BE ADDED. RETURNS 1 IF IT CAN ADD
DICS(FOUND) ; SCREEN 452.1
LASTDA(DA) ; DETERMINE IF DATA IS LAST ENTRY IN 452.1
DICS1(FOUND) ; SCREEN 4 LOOKUP IN 452.1
CLOSE ; CLOSE DEVICE
ENDPG ; HANDLE EOP

External References

Name Field # of Occurrence
^%DT DATSEL+7, DATSEL+10, DATSEL+13, DATSEL+15, DATSEL+18, EN3A+1, EN3A+5, EN3A+6
C^%DTC DATSEL+10, DATSEL+13, DATSEL+22
^%ZIS DEV+1
^%ZISC DEV+3, CLOSE+2
^%ZTLOAD DEV+5
D^DIQ DATSEL+7, DATSEL+15, DATSEL+18
^DIR INS+2, INS2+3, DATSEL+4, DATSEL+9, DATSEL+12, DATSEL+17, DATSEL+21, ENDPG+2
MSG20^PRSEMSG DICS+7, DICS1+3
ENDPG^PRSEUTL CLOSE+1
$$EN2^PRSEUTL2 DICS+3
$$EN3^PRSEUTL2 DICS1+2
$$EN4^PRSEUTL3 DICS+4, DICS+5, DICS1+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DATSEL+8
Function Call: WRITE
  • Prompt: !
  • Line Location: DATSEL+11
Function Call: WRITE
  • Prompt: !
  • Line Location: DATSEL+18
Function Call: WRITE
  • Prompt: !,$C(7),"THIS REPORT MUST BE QUEUED TO A PRINTER",!
  • Line Location: DEV+2
Function Call: WRITE
  • Prompt: !,$C(7)," ** THIS REPORT MUST BE SENT TO A 132 COLUMN DEVICE **",!
  • Line Location: DEV+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EN3A+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN3A+5
Function Call: WRITE
  • Prompt: !,"CANNOT ADD THIS ENTRY, USE OPTIONS PROVIDED BY PACKAGE."
  • Line Location: LAYGO+3
Function Call: WRITE
  • Prompt: !,"CANNOT ADD THIS ENTRY AS IT WOULD CREATE A DUPLICATE."
  • Line Location: LAYGO+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DICS+7
Function Call: WRITE
  • Prompt: !
  • Line Location: DICS1+3
Routine Call
  • DIR
  • Line Location:
    • INS+2
    • INS2+3
    • DATSEL+4
    • DATSEL+9
    • DATSEL+12
    • DATSEL+17
    • DATSEL+21
    • ENDPG+2
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRSE(452.1 - [#452.1] DICS+2, LASTDA+2, LASTDA+3, DICS1+2
^PRSE(452.8 - [#452.8] LAYGO+4
^PRSPC - [#450] DICS+4
^PRSPC("SSN" DICS+2
^VA(200 - [#200] DICS+2

Label References

Name Line Occurrences
$$LASTDA DICS+7, DICS1+3
DEV DEV+2, DEV+3
Q7 DEV+1

Naked Globals

Name Field # of Occurrence
^(0 DICS1+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DATSEL+10*!, DATSEL+13*!, DATSEL+18*, EN3A+1*!, EN3A+5*!
%DT("A" EN3A+1*, EN3A+5*
%DT(0 DATSEL+17!, DATSEL+21!
%ZIS DEV+1*!
DA LASTDA~, LASTDA+2, LASTDA+3
DATSEL DATSEL+1*, DATSEL+2, DATSEL+16, DATSEL+20, DATSEL+24!
DIR INS+2!, INS2+3!, DATSEL+4!, DATSEL+9!, DATSEL+12!, DATSEL+14!, DATSEL+17!, DATSEL+21!, ENDPG+2!
DIR("?" DATSEL+7*, DATSEL+15*, DATSEL+16*, DATSEL+19*, DATSEL+20*
DIR("A" INS+1*, INS2+2*, DATSEL+3*, DATSEL+8*, DATSEL+11*, DATSEL+15*, DATSEL+18*
DIR("B" DATSEL+7*, DATSEL+15*, DATSEL+18*
DIR(0 INS+1*, INS2+1*, DATSEL+1*, DATSEL+2*, DATSEL+6*, DATSEL+15*, DATSEL+16*, DATSEL+19*, DATSEL+20*, ENDPG+2*
DT DATSEL+5, DATSEL+15, DATSEL+16, DATSEL+18, DATSEL+20
>> DTOUT INS+2, INS2+3, DATSEL+4, DATSEL+9, DATSEL+12, DATSEL+17, DATSEL+21
>> DUOUT INS+2, INS2+3, DATSEL+4, DATSEL+9, DATSEL+12, DATSEL+17, DATSEL+21
DUP LAYGO+2~*, LAYGO+5*, LAYGO+6
DUZ DICS+2, DICS+4, DICS+5, DICS1+2
>> DUZ(0 DICS+4, DICS+5, DICS1+2
FOUND DICS~, DICS+5*, DICS+7, DICS1~, DICS1+2*, DICS1+3
IO DEV+2
IO("C" DEV+3!, DEV+5!
IO("Q" DEV+1!, DEV+2, DEV+3!, DEV+5!
>> IO("S" DEV+2
>> IO(0 DEV+2
IOM DEV+3, DEV+5
ION DEV+5
IOSL DEV+5
IOST DEV+2, DEV+5, ENDPG+1
LAST LASTDA+1~*, LASTDA+3*, LASTDA+4
>> MN DATSEL+5*
>> NQ DEV+5*
>> NQT DEV+1*
>> NSP(1 EN3A+1*, EN3A+2*
>> NSPC(1 EN3A+4*
>> NSPC(2 EN3A+5*, EN3A+6*, EN3A+8*
>> POP DEV+1, DEV+5*
>> POUT INS+2*, INS2+3*, DATSEL+4*, DATSEL+9*, DATSEL+12*, DATSEL+17*, DATSEL+21*, DEV+1*, EN3A+3*, EN3A+7*
CLOSE+1, ENDPG+2*
>> PRSE132 DEV+3
>> PRSECAL DATSEL+15
>> PRSESEL INS+3*, INS2+4*
>> PRSESER DICS+5, DICS1+2
>> PRSESLF DICS+4
>> PRSETYP DICS+5, DICS1+2
PRSEW DICS+7!, DICS1+3!
PRSX DICS+1~, DICS+2*, DICS+5*, DICS+8, DICS1+1~*, DICS1+2*, DICS1+4
PRSX(0 DICS+2*, DICS+4, DICS+5
>> PYR DATSEL+10*, DATSEL+12*
>> REGSW DICS+3, DICS1+2
SER LAYGO~, LAYGO+2*, LAYGO+3, LAYGO+4
SSN DICS+1~, DICS+2*
>> TYP DATSEL+5*, DATSEL+8, DATSEL+11, DATSEL+14
U INS+2, INS2+3, DATSEL+1, DATSEL+4, DATSEL+17, DATSEL+21, EN3A+1, EN3A+3, EN3A+5, EN3A+7
, DICS+2, DICS+4, DICS+5, LASTDA+2, DICS1+2
VA200DA DICS+1~, DICS+2*
VA450DA DICS+1~, DICS+2*, DICS+4
X INS+2, INS2+3, DATSEL+4, DATSEL+7*, DATSEL+10*, DATSEL+13*, DATSEL+15*, DATSEL+17, DATSEL+18*, DATSEL+21
DATSEL+22, EN2+1*, DEV+4*, EN3A+1*, EN3A+2, EN3A+3, EN3A+5*, EN3A+6*, EN3A+7, LAYGO+4
, LASTDA+1~, LASTDA+2*, LASTDA+3
>> X1 DATSEL+10*, DATSEL+13*, DATSEL+22*
>> X2 DATSEL+10*, DATSEL+13*, DATSEL+22*
Y INS+3, INS2+4, DATSEL+5, DATSEL+7, DATSEL+10, DATSEL+12, DATSEL+13, DATSEL+15, DATSEL+18, DATSEL+23
EN3+1*, EN3A+3, EN3A+4, EN3A+6, EN3A+7, EN3A+8, LAYGO+2, DICS+2, DICS+3, DICS+4
, DICS+7, LASTDA+1~, LASTDA+2*, LASTDA+3*, DICS1+2, DICS1+3, ENDPG+2
Y(0 DATSEL+10, DATSEL+12
YR DATSEL+5*, DATSEL+7, DATSEL+24!
YR(6 DATSEL+10*, DATSEL+12*, DATSEL+13
>> YRCHK DATSEL+10*, DATSEL+13*, DATSEL+22*
>> YREND DATSEL+10*, DATSEL+13*, DATSEL+23*
>> YREND(1 DATSEL+23*
>> YRST DATSEL+10*, DATSEL+13*, DATSEL+18*, DATSEL+19, DATSEL+20, DATSEL+22
>> YRST(1 DATSEL+18*
>> ZTIO DEV+5*
>> ZTQUEUED CLOSE+3
>> ZTREQ CLOSE+3*
ZTRTN Q7!
ZTSAVE Q7!
ZTSAVE( DEV+4*
>> ZTSK DEV+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All