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

Package: PCE Patient Care Encounter

Routine: PXUTIL


Information

PXUTIL ;SLC/PKR - Utility routines for use by PX. ;03/02/2022

Source Information

Source file <PXUTIL.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA FileMan 7 EN^DDIOL  $$FIND1^DIC  FILE^DIE  ^DIK  ($$CREF,$$OREF)^DILF  $$ROOT^DILFD  ^DIR  
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  (BMES,MES)^XPDUTL  
List Manager 1 FULL^VALM1  
PCE Patient Care Encounter 1 APRINT^PXUTIL  

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
PCE Patient Care Encounter 16 PXCOPY  PXEDUINQ  PXEDUSM  PXEXINQ  PXEXSM  PXHFINQ  PXHFMGR  PXHFSM  
PXKMCODE  PXMCLINK  PXP211I  PXSINQ  PXSMAN  PXUTIL  PXXDPT  VSITPUT1  
Clinical Reminders 1 PXRMDLGBREPAIR  

Entry Points

Name Comments DBIA/ICR reference
ACOPY(REF,OUTPUT) ;Copy all the descendants of the array reference into a linear
APRINT(REF) ;Write all the descendants of the array reference.
AWRITE(REF) ;Write all the descendants of the array reference, including the
BORP(DEFAULT) ;Ask the user if they want to browse or print.
DELFE(FILENUM,DA) ;Delete a file entry.
DELTLFE(FILENUM,NAME) ;Delete top level entries from a file.
FNFR(ROOT) ;Given the root of a file return the file number.
GPRINT(REF) ;General printing.
GPRINTQ ;Queued general printing.
RENAME(FILENUM,OLDNAME,NEWNAME) ;Rename entry OLDNAME to NEWNAME in
RMANPC(STRING) ;Remove any non-printing characters from the end of STRING.
STRREP(STRING,TS,RS) ;Replace every occurrence of the target string (TS)

External References

Name Field # of Occurrence
^%ZIS GPRINT+3
HOME^%ZIS GPRINT+16
^%ZISC GPRINT+24, GPRINTQ+3
^%ZTLOAD GPRINT+14
EN^DDIOL AWRITE+21
$$FIND1^DIC DELTLFE+2, RENAME+3, RENAME+7
FILE^DIE DELTLFE+6, RENAME+11
^DIK DELFE+3
$$CREF^DILF GPRINT+9
$$OREF^DILF GPRINT+11
$$ROOT^DILFD DELFE+2
^DIR BORP+5, GPRINT+25
APRINT^PXUTIL GPRINT+23, GPRINTQ+2
FULL^VALM1 GPRINT+20
BMES^XPDUTL RENAME+5, RENAME+9
MES^XPDUTL APRINT+20, AWRITE+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Task number ",ZTSK
  • Line Location: GPRINT+15
Routine Call
  • %ZIS
  • Line Location:
    • GPRINT+3
Routine Call
  • %ZIS
  • Line Location:
    • GPRINT+16
Routine Call
  • DIC
  • Line Location:
    • DELTLFE+2
    • RENAME+3
    • RENAME+7
Routine Call
  • DIE
  • Line Location:
    • DELTLFE+6
    • RENAME+11
Routine Call
  • DIR
  • Line Location:
    • BORP+5
    • GPRINT+25

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS GPRINT+2*
DA DELFE~
DEFAULT BORP~, BORP+4
DIK DELFE+1~, DELFE+2*
DIR BORP+1~, GPRINT+1~
DIR("A" BORP+3*, GPRINT+25*
DIR("B" BORP+4*
DIR(0 BORP+2*, GPRINT+25*
>> DIROUT BORP+6
DONE ACOPY+5~, ACOPY+15*, ACOPY+16, ACOPY+24*, APRINT+3~, APRINT+12*, APRINT+13, APRINT+19*, AWRITE+3~, AWRITE+12*
, AWRITE+13, AWRITE+19*, RMANPC+1~, RMANPC+2*, RMANPC+3, RMANPC+6*
>> DTOUT BORP+6*, BORP+7
>> DUOUT BORP+7
FDA DELTLFE+1~
FDA( DELTLFE+5*, RENAME+10*
FILENUM DELFE~, DELFE+2, DELTLFE~, DELTLFE+2, DELTLFE+5, RENAME~, RENAME+3, RENAME+5, RENAME+7, RENAME+9
, RENAME+10
IEN RENAME+2~, RENAME+3*, RENAME+4, RENAME+10
IENS DELTLFE+1~, DELTLFE+2*, DELTLFE+3, DELTLFE+4*, DELTLFE+5
IND ACOPY+5~, ACOPY+19*, ACOPY+22, APRINT+3~, APRINT+16*, AWRITE+3~, AWRITE+16*, AWRITE+17, STRREP+7~, STRREP+13*
IO GPRINT+21, GPRINTQ+1
IO("Q" GPRINT+5, GPRINT+17!
>> IOT GPRINT+22
IOTP GPRINT+1~, GPRINT+22*, GPRINT+25
LC RMANPC+1~, RMANPC+4*, RMANPC+5
LEN ACOPY+5~, ACOPY+18*, ACOPY+19, APRINT+3~, APRINT+15*, APRINT+16, AWRITE+3~, AWRITE+15*, AWRITE+16, RMANPC+1~
, RMANPC+2*, RMANPC+4, RMANPC+5*
LN APRINT+3~, APRINT+5*, APRINT+17*, AWRITE+3~, AWRITE+5*, AWRITE+17*
MSG DELTLFE+1~, RENAME+2~
NAME DELTLFE~, DELTLFE+2
NEWNAME RENAME~, RENAME+7, RENAME+9, RENAME+10
NIEN RENAME+2~, RENAME+7*, RENAME+8
NL ACOPY+5~, ACOPY+7*, ACOPY+20*, ACOPY+21
NPCS STRREP+7~, STRREP+10*, STRREP+13, STRREP+14
OLDNAME RENAME~, RENAME+3, RENAME+5
OROOT ACOPY+5~, ACOPY+8*, ACOPY+21
OUT ACOPY+5~, ACOPY+21*, ACOPY+22
OUTPUT ACOPY~, ACOPY+8
POP BORP+1~, GPRINT+1~, GPRINT+4
PROOT ACOPY+5~, ACOPY+9*, ACOPY+22, APRINT+3~, APRINT+6*, AWRITE+3~, AWRITE+6*, AWRITE+17
PXNAT RENAME+2~, RENAME+6*
REF ACOPY~, ACOPY+6, ACOPY+9, ACOPY+11, ACOPY+13*, ACOPY+14, ACOPY+16, ACOPY+17, ACOPY+18, ACOPY+19
, ACOPY+22, ACOPY+23*, ACOPY+24, APRINT~, APRINT+4, APRINT+6, APRINT+8, APRINT+10*, APRINT+11, APRINT+13
, APRINT+14, APRINT+15, APRINT+16, APRINT+17, APRINT+18*, APRINT+19, AWRITE~, AWRITE+4, AWRITE+6, AWRITE+8
, AWRITE+10*, AWRITE+11, AWRITE+13, AWRITE+14, AWRITE+15, AWRITE+16, AWRITE+17, AWRITE+18*, AWRITE+19, GPRINT~
, GPRINT+9, GPRINT+23, GPRINTQ+2
ROOT ACOPY+5~, ACOPY+12*, ACOPY+14, ACOPY+17, ACOPY+24, APRINT+3~, APRINT+9*, APRINT+11, APRINT+14, APRINT+19
, AWRITE+3~, AWRITE+9*, AWRITE+11, AWRITE+14, AWRITE+19, FNFR~, FNFR+1
RS STRREP~, STRREP+13
START ACOPY+5~, ACOPY+17*, ACOPY+19, APRINT+3~, APRINT+14*, APRINT+16, AWRITE+3~, AWRITE+14*, AWRITE+16
STR STRREP+7~, STRREP+12*, STRREP+13*, STRREP+14*, STRREP+15
STRING RMANPC~, RMANPC+2, RMANPC+4, RMANPC+5*, RMANPC+7, STRREP~, STRREP+8, STRREP+10, STRREP+13, STRREP+14
TEMP ACOPY+5~, ACOPY+11*, ACOPY+12, APRINT+3~, APRINT+8*, APRINT+9, AWRITE+3~, AWRITE+8*, AWRITE+9
TEXT APRINT+3~, APRINT+20, AWRITE+3~, AWRITE+20, AWRITE+21
TEXT( APRINT+17*, AWRITE+17*
TS STRREP~, STRREP+8, STRREP+10, STRREP+13, STRREP+14
U BORP+2, FNFR+1
>> VALMBCK GPRINT+26*
>> VALMDDF GPRINT+20, GPRINT+26
X BORP+1~
>> XPDNM AWRITE+20
Y BORP+1~, BORP+8
ZTDESC GPRINT+6~, GPRINT+13*
>> ZTREQ GPRINTQ+4*
ZTRTN GPRINT+6~, GPRINT+12*
ZTSAVE GPRINT+6~
ZTSAVE( GPRINT+11*
ZTSAVE("IO" GPRINT+7*
ZTSAVE("REF" GPRINT+9*, GPRINT+11
>> ZTSK GPRINT+15
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Local Variables  | All