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: PXQMAIN1

Package: PCE Patient Care Encounter

Routine: PXQMAIN1


Information

PXQMAIN1 ;ISL/JVS - MAIN MENU ROUTINE #2 ;8/29/96 10:33

Source Information

Source file <PXQMAIN1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
PCE Patient Care Encounter 4 $$DEC^PXQFE  $$DEC^PXQFV  ($$ASKNUM,$$EXP,$$RE,$$SOR,READ,SDV)^PXQUTL  ZIS^PXQZIS  
Kernel 1 ^%ZISC  
VA FileMan 1 ^DIR  

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: 1

Package Total Caller Graph
PCE Patient Care Encounter 1 PXQUTL2  

Entry Points

Name Comments DBIA/ICR reference
ASK ;--5TH OPTION
MEN ;--MENU FOR WHAT TO DISPLAY FOR VISIT
DEC ;--ENTRIES POINTING TO VISIT
DEC5D ;--TITLE OF PRINT OUT
EXP ;--EXPANDED VIEW
EXP5E ;--TITLE OF PRINT OUT
AUD ;--AUDIT TRAIL AND SOURCE
AUD5A ;--TITLE OF PRINT OUT
ALL ;--ALL OF THE ABOVE
ALL5A ;--TITLE OF PRINT OUT
CLOSE ;--CLOSE DEVICE
EXIT ;--EXIT

External References

Name Field # of Occurrence
^%ZISC DEC5D+11, EXP5E+11, AUD5A+9, ALL5A+15, CLOSE+1
^DIR MEN+3
$$DEC^PXQFE DEC5D+8, EXP5E+7, ALL5A+11
$$DEC^PXQFV DEC5D+4, EXP5E+3, AUD5A+6, ALL5A+7
$$ASKNUM^PXQUTL ASK+4
$$EXP^PXQUTL DEC5D+2
$$RE^PXQUTL DEC5D+1, DEC5D+3, DEC5D+7, EXP5E+1, EXP5E+2, EXP5E+6, AUD5A+1, AUD5A+4, AUD5A+5, ALL5A+1
, ALL5A+5, ALL5A+6, ALL5A+10
$$SOR^PXQUTL AUD5A+3, ALL5A+4
READ^PXQUTL DEC5D+10, EXP5E+10, AUD5A+8, ALL5A+14
SDV^PXQUTL EXP5E+8, ALL5A+12
ZIS^PXQZIS DEC+3, EXP+3, AUD+5, ALL+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$RE^PXQUTL("** D E P E N D E N T E N T R Y C O U N T **")
  • Line Location: DEC5D+1
Function Call: WRITE
  • Prompt: $$EXP^PXQUTL("^AUPNVSIT(",IEN)
  • Line Location: DEC5D+2
Function Call: WRITE
  • Prompt: $$RE^PXQUTL(" DEPENDENT ENTRY COUNT---FOR VISIT "_IEN_"-----")
  • Line Location: DEC5D+3
Function Call: WRITE
  • Prompt: $$DEC^PXQFV(IEN,1,"")
  • Line Location: DEC5D+4
Function Call: WRITE
  • Prompt: $$RE^PXQUTL("** E X P A N D E D D E P E N D E N T E N T R Y C O U N T **")
  • Line Location: EXP5E+1
Function Call: WRITE
  • Prompt: $$RE^PXQUTL(" DEPENDENT ENTRY COUNT---FOR VISIT "_IEN_"-----")
  • Line Location: EXP5E+2
Function Call: WRITE
  • Prompt: $$DEC^PXQFV(IEN,1,1)
  • Line Location: EXP5E+3
Function Call: WRITE
  • Prompt: $$RE^PXQUTL("** S O U R C E S / A U D I T T R A I L **")
  • Line Location: AUD5A+1
Function Call: WRITE
  • Prompt: $$SOR^PXQUTL(VISIT)
  • Line Location: AUD5A+3
Function Call: WRITE
  • Prompt: $$RE^PXQUTL(" ")
  • Line Location: AUD5A+4
Function Call: WRITE
  • Prompt: $$RE^PXQUTL(" DEPENDENT ENTRY COUNT---FOR VISIT "_IEN_"-----")
  • Line Location: AUD5A+5
Function Call: WRITE
  • Prompt: $$DEC^PXQFV(IEN,1,1)
  • Line Location: AUD5A+6
Function Call: WRITE
  • Prompt: $$RE^PXQUTL("** A L L S O U R C E S / A U D I T T R A I L **")
  • Line Location: ALL5A+1
Function Call: WRITE
  • Prompt: $$SOR^PXQUTL(VISIT)
  • Line Location: ALL5A+4
Function Call: WRITE
  • Prompt: $$RE^PXQUTL(" ")
  • Line Location: ALL5A+5
Function Call: WRITE
  • Prompt: $$RE^PXQUTL(" DEPENDENT ENTRY COUNT---FOR VISIT "_IEN_"-----")
  • Line Location: ALL5A+6
Function Call: WRITE
  • Prompt: $$DEC^PXQFV(IEN,1,1)
  • Line Location: ALL5A+7
Routine Call
  • DIR
  • Line Location:
    • MEN+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("XY" DEC+5, EXP+5, AUD+7, ALL+6
^AUPNVSIT - [#9000010] ASK+10
^DISV( ASK+11*
^SCE("AVSIT" DEC5D+6, EXP5E+5, ALL5A+9

Label References

Name Line Occurrences
ALL MEN+7
AUD MEN+6
CLOSE MEN+3, MEN+8, DEC+3, DEC5D+12, EXP+3, EXP5E+12, AUD5A+10, ALL5A+16
DEC MEN+4
EXIT AUD+5, ALL+4
EXP MEN+5
MEN MEN+4, MEN+5, MEN+6, MEN+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS ASK+1~, ASK+5*, ASK+6, ASK+7*, ASK+8, ASK+9, ASK+10
BROKEN ASK+1~, ASK+10*
DFN ASK+1~
>> DIR("A" MEN+1*
>> DIR(0 MEN+2*
DTIME ASK+5, ASK+7
DUZ ASK+11
DX DEC+5~*, EXP+5~*, AUD+7~*, ALL+6~*
DY DEC+5~*, EXP+5~*, AUD+7~*, ALL+6~*
I ASK+1~, DEC5D+6~*, DEC5D+7, DEC5D+8, EXP5E+5~*, EXP5E+6, EXP5E+7, ALL5A+9~*, ALL5A+10, ALL5A+11
IEN ASK+1~, ASK+4*, ASK+9*, ASK+11, DEC5D+2, DEC5D+3, DEC5D+4, DEC5D+6, EXP5E+2, EXP5E+3
, EXP5E+5, AUD5A+5, AUD5A+6, ALL5A+6, ALL5A+7, ALL5A+9
OPTION DEC+2*, EXP+2*, AUD+4*, ALL+3*, EXIT+1!
>> POP DEC+3, EXP+3, AUD+5, ALL+4
PXQAUDIT AUD+1~, AUD+2*, ALL+1~, ALL5A+2*
PXQSOR AUD+1~, AUD+2*, ALL+1~, ALL5A+2*
VISIT ASK+1~, ASK+4*, ASK+9*, AUD5A+3, ALL5A+4
>> Y MEN+3, MEN+4, MEN+5, MEN+6, MEN+7
>> ZTSK DEC5D+12, EXP5E+12, AUD5A+10, ALL5A+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All