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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PXQMAIN

Package: PCE Patient Care Encounter

Routine: PXQMAIN


Information

PXQMAIN ;ISL/JVS - DEBUGGINH MAIN ROUTINE #1;8/29/96 10:32

Source Information

Source file <PXQMAIN.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
PCE Patient Care Encounter 6 $$DEC^PXQFE  CHK^PXQFS  $$DEC^PXQFV  $$VISITLST^PXQGVST  ($$ASKPAT,$$EXP,$$RE,$$SOR,READ,SDV)^PXQUTL  ZIS^PXQZIS  
Kernel 1 ^%ZISC  
VA Fileman 1 EN^DIQ  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
PCE Patient Care Encounter 1 PXQUTL2  

Entry Points

Name Comments DBIA/ICR reference
SET7 ;---START
DEPEN ;--1ST OPTION
DEP ;--TITLE OF PRINT OUT
MAX ;--MAXIMUM LENGTH OF GLOBAL REFERENCE
SETUP ;--7TH OPTION
VISIT ;--5TH OPTION
INT ;--TITLE OF PRINT OUT
SOR ;--TITLE OF PRINT OUT
EXIT ;
SOURCE ;--4TH OPTION
EXP ;--TITLE OF PRINT OUT
CLOSE ;--CLOSE DEVICE
INTER ;--3RD OPTION
EXPAND ;--2ND OPTION

External References

Name Field # of Occurrence
^%ZISC DEP+13, EXP+14, INT+14, SOR+14, CLOSE+1, SET7+8
EN^DIQ SET7+3, SET7+5
$$DEC^PXQFE DEP+9, EXP+8, INT+8
CHK^PXQFS SET7+1
$$DEC^PXQFV DEP+5, EXP+4, INT+4, SOR+6
$$VISITLST^PXQGVST DEPEN+5, EXPAND+5, INTER+7, SOURCE+7
$$ASKPAT^PXQUTL DEPEN+3, EXPAND+3, INTER+5, SOURCE+5
$$EXP^PXQUTL DEP+3, SET7+2, SET7+4
$$RE^PXQUTL DEP+1, DEP+4, DEP+8, EXP+1, EXP+3, EXP+7, INT+1, INT+3, INT+7, SOR+1
, SOR+5, SETUP+3
$$SOR^PXQUTL SOR+3
READ^PXQUTL DEP+11, EXP+12, INT+12, SOR+12, SET7+6
SDV^PXQUTL EXP+10, INT+10
ZIS^PXQZIS DEPEN+9, EXPAND+9, INTER+11, SOURCE+11, SETUP+6

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: DEP+1
Function Call: WRITE
  • Prompt: $$EXP^PXQUTL("^AUPNVSIT(",IEN)
  • Line Location: DEP+3
Function Call: WRITE
  • Prompt: $$RE^PXQUTL(" DEPENDENT ENTRY COUNT --- FOR VISIT "_IEN)
  • Line Location: DEP+4
Function Call: WRITE
  • Prompt: $$DEC^PXQFV(IEN,1,"")
  • Line Location: DEP+5
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: EXP+1
Function Call: WRITE
  • Prompt: $$RE^PXQUTL(" DEPENDENT ENTRY COUNT---FOR VISIT "_IEN_"-----")
  • Line Location: EXP+3
Function Call: WRITE
  • Prompt: $$DEC^PXQFV(IEN,1,1)
  • Line Location: EXP+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: INT+1
Function Call: WRITE
  • Prompt: $$RE^PXQUTL(" DEPENDENT ENTRY COUNT---FOR VISIT "_IEN_"-----")
  • Line Location: INT+3
Function Call: WRITE
  • Prompt: $$DEC^PXQFV(IEN,1,1)
  • Line Location: INT+4
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: SOR+1
Function Call: WRITE
  • Prompt: $$SOR^PXQUTL(VISIT)
  • Line Location: SOR+3
Function Call: WRITE
  • Prompt: $$RE^PXQUTL(" DEPENDENT ENTRY COUNT---FOR VISIT "_IEN)
  • Line Location: SOR+5
Function Call: WRITE
  • Prompt: $$DEC^PXQFV(IEN,1,1)
  • Line Location: SOR+6
Function Call: WRITE
  • Prompt: !," I M F O R M A T I O N O N L Y"
  • Line Location: MAX+1
Function Call: WRITE
  • Prompt: !,"This routine can only be run buy someone who is"
  • Line Location: MAX+2
Function Call: WRITE
  • Prompt: !,"AUTHORIZED to be in progammer mode. If you run"
  • Line Location: MAX+3
Function Call: WRITE
  • Prompt: !,"the routine, 'D ^PXQGRLT' ,it will error out when"
  • Line Location: MAX+4
Function Call: WRITE
  • Prompt: !,"the mazimum length is reached."
  • Line Location: MAX+5
Function Call: WRITE
  • Prompt: $$RE^PXQUTL("** P A R A M E T E R S S E T U P **")
  • Line Location: SETUP+3
Function Call: WRITE
  • Prompt: $$EXP^PXQUTL("^DIC(",150.9)
  • Line Location: SET7+2
Function Call: WRITE
  • Prompt: $$EXP^PXQUTL("^PX(",815)
  • Line Location: SET7+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(150.9 - [#150.9] Classic Fileman Calls
^PX(815 - [#815] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("XY" DEPEN+11, EXPAND+11, INTER+13, SOURCE+13, SETUP+8
^DISV( DEPEN+6*, EXPAND+6*, INTER+8*, SOURCE+8*
^SCE("AVSIT" DEP+7, EXP+6, INT+6

Label References

Name Line Occurrences
DEPEN DEP+15
EXIT DEPEN+9, DEP+14, EXPAND+9, EXP+16, INTER+11, INT+16, SOURCE+11, SOR+15, SETUP+6, SET7+9
EXPAND EXP+17
INTER INT+17
SOURCE SOR+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS DEPEN+1~, EXPAND+1~, INTER+1~, SOURCE+1~, MAX+7*
DA SETUP+1~, SET7+3*, SET7+5*
DATEC SOR+17!, EXIT+1!
DATEE SOR+17!, EXIT+1!
DFN DEPEN+1~, DEPEN+3*, DEPEN+5, EXPAND+1~, EXPAND+3*, EXPAND+5, INTER+1~, INTER+5*, INTER+7, SOURCE+1~
, SOURCE+5*, SOURCE+7
DIC SETUP+1~, SET7+3*, SET7+5*
DTIME MAX+7
DUZ DEPEN+6, EXPAND+6, INTER+8, SOURCE+8
DX DEPEN+11~*, EXPAND+11~*, INTER+13~*, SOURCE+13~*, SETUP+8~*
DY DEPEN+11~*, EXPAND+11~*, INTER+13~*, SOURCE+13~*, SETUP+8~*
I DEPEN+1~, DEP+7~*, DEP+8, DEP+9, EXPAND+1~, EXP+6~*, EXP+7, EXP+8, INTER+1~, INT+6~*
, INT+7, INT+8, SOURCE+1~
IEN DEPEN+1~, DEPEN+5*, DEPEN+6, DEP+3, DEP+4, DEP+5, DEP+7, EXPAND+1~, EXPAND+5*, EXPAND+6
, EXP+3, EXP+4, EXP+6, INTER+1~, INTER+7*, INTER+8, INT+3, INT+4, INT+6, SOURCE+1~
, SOURCE+7*, SOURCE+8, SOR+5, SOR+6
OPTION DEPEN+8*, EXPAND+8*, INTER+10*, SOURCE+10*, SOR+17!, SETUP+5*, EXIT+1!, EXIT+2!
PACKAGE SOR+17!, EXIT+1!
POP DEPEN+9, EXPAND+1~, EXPAND+9, INTER+1~, INTER+11, SOURCE+1~, SOURCE+11, SETUP+1~, SETUP+6
PROTOCOL SOR+17!, EXIT+1!
PXBCNT DEPEN+1~, EXPAND+1~, INTER+1~, SOURCE+1~
PXBHIGH DEPEN+1~, EXPAND+1~, INTER+1~, SOURCE+1~
PXQAUDIT SOURCE+1~, SOURCE+3*
PXQINT INTER+1~, INTER+3*
PXQSOR SOURCE+1~, SOURCE+3*
SOURCE SOR+17!, EXIT+1!
USER SOR+17!, EXIT+1!
VISIT DEPEN+1~, DEPEN+5*, EXPAND+1~, EXPAND+5*, INTER+1~, INTER+7*, SOURCE+1~, SOURCE+7*, SOR+3
>> ZTSK DEP+14, EXP+16, INT+16, SOR+15, SET7+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All