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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: DG53P750

Package: Registration

Routine: DG53P750


Information

DG53P750 ;BAY/JT - Patient full name > 30 characters ; 9/16/03 4:56pm

Source Information

Source file <DG53P750.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 5 (,HOME)^%ZIS  (,$$S)^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  $$NAMEFMT^XLFNAME  (BMES,MES)^XPDUTL  
VA FileMan 3 C^%DTC  FILE^DIE  ^DIR  

Entry Points

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

External References

Name Field # of Occurrence
C^%DTC SEARCH+3
^%ZIS DEVICE+4
HOME^%ZIS DEVICE+12
^%ZTLOAD DEVICE+10
$$S^%ZTLOAD HEAD+1
FILE^DIE SEARCH+37
^DIR PRINT+18, HEAD+2
$$FMTE^XLFDT PRINT+4
$$NOW^XLFDT PRINT+4
$$NAMEFMT^XLFNAME SEARCH+31
BMES^XPDUTL SEARCH+6
MES^XPDUTL PROGCHK+2, PROGCHK+3, SEARCH+42, SEARCH+43

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,DGDDT,?15,"DG*5.3*750 List of patients with long names",?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,"File 20 IEN",?25,"Patient Name Before///Patient Name After",!
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: X,!
  • Line Location: HEAD+7
Routine Call
  • DIE
  • Line Location:
    • SEARCH+37
Routine Call
  • DIR
  • Line Location:
    • PRINT+18
    • HEAD+2
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+4
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] SEARCH+7, SEARCH+9, SEARCH+12, SEARCH+17
^VA(20 - [#20] SEARCH+19, SEARCH+23
^XTMP("DG53P750" SEARCH+2!, SEARCH+4*, SEARCH+39*, PRINT+6, PRINT+11, PRINT+13, PRINT+15

Label References

Name Line Occurrences
$$DEVICE PRTRPT+1
HEAD PRINT+5, PRINT+14
PRINT PRTRPT+1
PROGCHK ENV+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEVICE+1~, DEVICE+3*
DG20NAME SEARCH+1~, SEARCH+26*, SEARCH+27*, SEARCH+28*, SEARCH+29*, SEARCH+31*, SEARCH+33, SEARCH+39
DGDDT PRINT+2~, PRINT+4*, HEAD+5
DGERR PRINT+2~
DGFULLNM SEARCH~, SEARCH+9*, SEARCH+11, SEARCH+13, SEARCH+14, SEARCH+16, SEARCH+39
DGIEN SEARCH~, SEARCH+5*, SEARCH+7*, SEARCH+9, SEARCH+12, SEARCH+17, SEARCH+22, SEARCH+32, SEARCH+39, PRINT+2~
, PRINT+6*, PRINT+7, PRINT+10*, PRINT+11*, PRINT+13, PRINT+15
DGLINK SEARCH~, SEARCH+17*, SEARCH+18, SEARCH+19, SEARCH+23, SEARCH+39, PRINT+2~, PRINT+12*, PRINT+13*, PRINT+15
DGONE SEARCH~, SEARCH+23*, SEARCH+24, SEARCH+26, SEARCH+27, SEARCH+28, SEARCH+29
DGOTHERS SEARCH~, SEARCH+5*, SEARCH+40*, SEARCH+43
DGPG PRINT+2~, PRINT+3*, PRINT+18, HEAD+2, HEAD+4*, HEAD+5
DGQUIT PRINT+2~, PRINT+3*, PRINT+11, PRINT+17, PRINT+18*, HEAD+1*, HEAD+2*, HEAD+3
DGTOT SEARCH~, SEARCH+5*, SEARCH+8*, SEARCH+42
DGX DEVICE+1~, DEVICE+10*
DGZERO SEARCH~, SEARCH+19*, SEARCH+20, SEARCH+22
DIERR SEARCH+1~
DIR PRINT+18!, HEAD+2!
DIR(0 PRINT+18*, HEAD+2*
DT PROGCHK+1, SEARCH+3, SEARCH+4
DUZ PROGCHK+1
DUZ(0 PROGCHK+1
FDAIEN SEARCH+1~, SEARCH+32*, SEARCH+33
FDANAME SEARCH+1~
FDANAME(2 SEARCH+33*
IO PRINT+1
IO("Q" DEVICE+6
IOF HEAD+5
IOP DEVICE+1~
IOSL PRINT+14
IOST PRINT+18, HEAD+2
OK DEVICE+1~, DEVICE+2*, DEVICE+5*, DEVICE+6, DEVICE+13*, DEVICE+14
POP DEVICE+1~, DEVICE+5
U PROGCHK+1, SEARCH+9, SEARCH+17, SEARCH+22, SEARCH+26, SEARCH+27, SEARCH+28, SEARCH+29
X SEARCH+4, HEAD+5!*, HEAD+7*
X1 SEARCH~, SEARCH+3*
X2 SEARCH~, SEARCH+3*
XPDABORT ENV+1*, ENV+2, ENV+3!, PROGCHK~, PROGCHK+4*
XUNOTRIG SEARCH+1~, SEARCH+35*
>> Y PRINT+18, HEAD+2
ZTDESC DEVICE+7~, DEVICE+9*
>> ZTQUEUED PRINT+17, PRINT+19, HEAD+1
ZTREQ DEVICE+7~, PRINT+19*
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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All