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

Package: Registration

Routine: DG53P543


Information

DG53P543 ;BAY/JT - cleanup of file 20 ; 9/16/03 4:56pm

Source Information

Source file <DG53P543.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  (,$$S)^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  (BMES,MES)^XPDUTL  
VA Fileman 3 C^%DTC  ^DIE  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
PROGCHK(XPDABORT) ; checks for necessary programmer variables
PRTRPT ;
NOLINK ;
NOONE ;
UPDATE ;
BADZERO ;
HEAD ;
CLEANUP
ENV ; do environment check
DEVICE() ; choose device and whether to queue.
PRINT ;
NOZERO ;

External References

Name Field # of Occurrence
C^%DTC CLEANUP+2
^%ZIS DEVICE+4
HOME^%ZIS DEVICE+12
^%ZTLOAD DEVICE+10
$$S^%ZTLOAD HEAD+1
^DIE UPDATE+11
^DIR PRINT+26, HEAD+2
$$FMTE^XLFDT PRINT+4
$$NOW^XLFDT PRINT+4
BMES^XPDUTL CLEANUP+5, CLEANUP+56
MES^XPDUTL PROGCHK+2, PROGCHK+3, CLEANUP+41, CLEANUP+42, CLEANUP+44, CLEANUP+46, CLEANUP+48, CLEANUP+49, CLEANUP+50, CLEANUP+51
, CLEANUP+52, CLEANUP+54, CLEANUP+55, UPDATE+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,DGDDT,?15,"DG*5.3*543 File #20 Cleanup Utility",?70,"Page:",$J(DGPG,5),!
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: X,!
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: !,"File 2 IEN",?11,"Patient Name///Component Last^First^Middle^Prefix^Suffix",?69,"File 20 IEN",!
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: X,!
  • Line Location: HEAD+7
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+12
Routine Call
  • DIE
  • Line Location:
    • UPDATE+11
Routine Call
  • DIR
  • Line Location:
    • PRINT+26
    • HEAD+2
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] CLEANUP+6, CLEANUP+8, CLEANUP+9, CLEANUP+10, CLEANUP+11, NOLINK+7, UPDATE+10, UPDATE+12, PRINT+19
^VA(20 - [#20] CLEANUP+13, CLEANUP+16, NOLINK+3, NOLINK+5, NOLINK+6
^XTMP("DG53P543" CLEANUP+1!, CLEANUP+3*, CLEANUP+23*, CLEANUP+30*, CLEANUP+38*, NOLINK+2*, NOLINK+3*, NOLINK+7*, NOZERO+2*, BADZERO+2*
, NOONE+2*, UPDATE+1, UPDATE+4, UPDATE+6, UPDATE+8, UPDATE+13!, PRINT+6, PRINT+11, PRINT+12, PRINT+14
, PRINT+16, PRINT+17, PRINT+19, PRINT+21, PRINT+23

Label References

Name Line Occurrences
$$DEVICE PRTRPT+1
BADZERO CLEANUP+15
HEAD PRINT+5, PRINT+13, PRINT+18, PRINT+22
NOLINK CLEANUP+12
NOONE CLEANUP+17
NOZERO CLEANUP+14
PRINT PRTRPT+1
PROGCHK ENV+2
UPDATE CLEANUP+45

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEVICE+1~, DEVICE+3*
CNT CLEANUP~, CLEANUP+29*, CLEANUP+30
DA UPDATE+2~, UPDATE+11*
DG20NAME UPDATE+2~, UPDATE+10*, UPDATE+14!
DGCONC CLEANUP~, CLEANUP+27*
DGDDT PRINT+2~, PRINT+4*, HEAD+5
DGDPT CLEANUP~, NOLINK+6*, NOLINK+7
DGERR CLEANUP~, CLEANUP+4*, CLEANUP+19*, CLEANUP+23*, CLEANUP+30*, CLEANUP+37*, CLEANUP+38, UPDATE+7*, UPDATE+8*, UPDATE+9
, UPDATE+13, PRINT+2~, PRINT+20*, PRINT+21*, PRINT+23
DGFND CLEANUP~, NOLINK+4*, NOLINK+5*, NOLINK+6, NOLINK+7
DGFULLNM CLEANUP~, CLEANUP+10*, CLEANUP+21, CLEANUP+23, CLEANUP+25, CLEANUP+27, CLEANUP+30, CLEANUP+32, CLEANUP+34, CLEANUP+38
, NOLINK+2, NOLINK+3, NOLINK+5, NOLINK+7
DGGLOBAL CLEANUP~, CLEANUP+53*, CLEANUP+54
DGIEN CLEANUP~, CLEANUP+4*, CLEANUP+6*, CLEANUP+8, CLEANUP+9, CLEANUP+10, CLEANUP+11, CLEANUP+15, CLEANUP+23, CLEANUP+30
, CLEANUP+38, NOLINK+2, NOLINK+3, NOLINK+7, NOZERO+2, BADZERO+2, NOONE+2, UPDATE+3*, UPDATE+4*, UPDATE+6
, UPDATE+8, UPDATE+10, UPDATE+11, UPDATE+12, UPDATE+13, PRINT+2~, PRINT+6*, PRINT+7, PRINT+10*, PRINT+11*
, PRINT+12, PRINT+14, PRINT+16, PRINT+17, PRINT+19, PRINT+21, PRINT+23
DGLINK CLEANUP~, CLEANUP+11*, CLEANUP+12, CLEANUP+13, CLEANUP+16, CLEANUP+23, CLEANUP+30, CLEANUP+38, NOZERO+2, BADZERO+2
, NOONE+2, UPDATE+5*, UPDATE+6*, UPDATE+8, UPDATE+13, PRINT+2~, PRINT+15*, PRINT+16*, PRINT+17, PRINT+19
, PRINT+21, PRINT+23
DGLINK0 CLEANUP~, CLEANUP+4*, CLEANUP+47, CLEANUP+51, NOZERO+1*, BADZERO+1*
DGLINK1 CLEANUP~, CLEANUP+4*, CLEANUP+47, CLEANUP+52, NOONE+1*
DGMID CLEANUP~, CLEANUP+32*, CLEANUP+33, CLEANUP+34*, CLEANUP+35, CLEANUP+36
DGNAME CLEANUP~, NOLINK+7*
DGNOLINK CLEANUP~, CLEANUP+4*, CLEANUP+47, CLEANUP+50, NOLINK+1*
DGONE CLEANUP~, CLEANUP+16*, CLEANUP+17, CLEANUP+23, CLEANUP+25, CLEANUP+27, CLEANUP+29, CLEANUP+30, CLEANUP+33, CLEANUP+35
, CLEANUP+36, CLEANUP+38
DGOTHERS CLEANUP~, CLEANUP+4*, CLEANUP+30*, CLEANUP+38*, CLEANUP+47, CLEANUP+49
DGPG PRINT+2~, PRINT+3*, PRINT+26, HEAD+2, HEAD+4*, HEAD+5
DGQUIT PRINT+2~, PRINT+3*, PRINT+11, PRINT+25, PRINT+26*, HEAD+1*, HEAD+2*, HEAD+3
DGTOT CLEANUP~, CLEANUP+4*, CLEANUP+7*, CLEANUP+41
DGUPDT CLEANUP~, CLEANUP+4*, CLEANUP+23*, CLEANUP+42, CLEANUP+43
DGX DEVICE+1~, DEVICE+10*
DGZERO CLEANUP~, CLEANUP+13*, CLEANUP+14, CLEANUP+15
DIE UPDATE+2~, UPDATE+11*
DIR PRINT+26!, HEAD+2!
DIR(0 PRINT+26*, HEAD+2*
DR UPDATE+2~, UPDATE+11*
DT PROGCHK+1, CLEANUP+2, CLEANUP+3
DUZ PROGCHK+1
DUZ(0 PROGCHK+1
IO PRINT+1
IO("Q" DEVICE+6
IOF HEAD+5
IOP DEVICE+1~
IOSL PRINT+13, PRINT+18, PRINT+22
IOST PRINT+26, HEAD+2
OK DEVICE+1~, DEVICE+2*, DEVICE+5*, DEVICE+6, DEVICE+13*, DEVICE+14
POP DEVICE+1~, DEVICE+5
U PROGCHK+1, CLEANUP+8, CLEANUP+10, CLEANUP+11, CLEANUP+15, CLEANUP+23, CLEANUP+25, CLEANUP+27, CLEANUP+29, CLEANUP+30
, CLEANUP+33, CLEANUP+35, CLEANUP+36, CLEANUP+38, NOLINK+6, NOLINK+7, UPDATE+10, UPDATE+12, PRINT+19
X CLEANUP+3, UPDATE+2~, HEAD+5!*, HEAD+7*
X1 CLEANUP~, CLEANUP+2*
X2 CLEANUP~, CLEANUP+2*
XPDABORT ENV+1*, ENV+2, ENV+3!, PROGCHK~, PROGCHK+4*
>> Y PRINT+26, HEAD+2
ZTDESC DEVICE+7~, DEVICE+9*
>> ZTQUEUED PRINT+25, PRINT+27, HEAD+1
ZTREQ DEVICE+7~, PRINT+27*
ZTRTN DEVICE+7~, DEVICE+8*
>> ZTSK DEVICE+10, DEVICE+11
ZTSKM DEVICE+7~
ZTSTOP DEVICE+7~, HEAD+1*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All