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

Package: Registration

Routine: DGPTDD


Information

DGPTDD ;ALB/LD - DD CALLS FOR PTF (#45) FILE;Nov 20, 2020@09:44

Source Information

Source file <DGPTDD.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 ($$FMADD,$$NOW)^XLFDT  F4^XUAF4  
VA FileMan 2 $$IENS^DILF  ^DIR  
Registration 1 INP^VADPT  

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

Package Total Caller Graph
Registration 16 DGPTX1  DGPTX53  DGPTX75  DGPTXC2  DGPTXC3  DGPTXX1  DGPTXX11  DGPTXX14  
DGPTXX4  DGPTXX7  DGPTXX8  DGX59  DGX5F4  DGX5FD10  DGX76  ^DGPT  

Entry Points

Name Comments DBIA/ICR reference
ACTIVE(X,Y,DGADM) ; Suffix active during patient's admission date?
ACTLST(DGADM) ; List of active suffixes
NEXTSCR ;
NEXTSCRQ ;
NOTIFY(OLDVAL,NEWVAL,DA,FILE,TYPE,ACTION) ;
ALLCLEAR(DATA) ;RETURN TRUE IF ALL NODES ARE EMPTY
GETNODE(NAME,FILE,IEN) ;RETURN A FREE NODE IN NOTIFIER DATA
GETFIELD(TYPE,SUB) ;RETURN SUBSCRIPT FIELD NAME

External References

Name Field # of Occurrence
$$IENS^DILF NOTIFY+6
^DIR NEXTSCR+2
INP^VADPT NOTIFY+59
$$FMADD^XLFDT GETNODE+4
$$NOW^XLFDT NOTIFY+57, GETNODE+3
F4^XUAF4 NOTIFY+68

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,"Choose From:",!
  • Line Location: ACTLST+19
Function Call: WRITE
  • Prompt: !
  • Line Location: NEXTSCR+1
Function Call: WRITE
  • Prompt: @IOF,"Choose From:",!
  • Line Location: NEXTSCR+3
Routine Call
  • DIR
  • Line Location:
    • NEXTSCR+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] NOTIFY+65
^DGPT - [#45] ACTIVE+16, ACTLST+11, NOTIFY+10, NOTIFY+11, NOTIFY+21, NOTIFY+22, NOTIFY+56, NOTIFY+67
^DIC(42 - [#42] NOTIFY+64
^DIC(45.68 - [#45.68] ACTIVE+15, ACTIVE+18, ACTIVE+19, ACTIVE+20, ACTIVE+21, ACTLST+15, ACTLST+16, ACTLST+17, ACTLST+18
^DIC(45.81 - [#45.81] ACTIVE+14, ACTLST+13, ACTLST+14, ACTLST+18
^TMP("ACTSUFF" ACTLST+18*, ACTLST+20, ACTLST+22, ACTLST+23!
^XTMP( NOTIFY+36, NOTIFY+37, NOTIFY+38, NOTIFY+41!, NOTIFY+42*, NOTIFY+43*, NOTIFY+46, NOTIFY+47, NOTIFY+49!, NOTIFY+52!
, NOTIFY+53!, NOTIFY+54*, NOTIFY+55*, NOTIFY+56*, NOTIFY+57*, NOTIFY+58*, NOTIFY+61*, NOTIFY+62*, NOTIFY+70*, NOTIFY+71*
, GETNODE+2, GETNODE+3, GETNODE+4*

Label References

Name Line Occurrences
$$ALLCLEAR NOTIFY+14, NOTIFY+24
$$GETFIELD NOTIFY+35
$$GETNODE NOTIFY+32
NEXTSCR ACTLST+21
NEXTSCRQ NEXTSCR+2

Naked Globals

Name Field # of Occurrence
^(0 ACTIVE+16, ACTLST+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTION NOTIFY~, NOTIFY+3
CLEAR NOTIFY+4~, NOTIFY+13*, NOTIFY+14*, NOTIFY+15, NOTIFY+16, NOTIFY+18!, NOTIFY+23*, NOTIFY+24*, NOTIFY+25, NOTIFY+26
, NOTIFY+28!, NOTIFY+44*, NOTIFY+47, NOTIFY+48*, NOTIFY+49, NOTIFY+50*
CLEAR("ALL" NOTIFY+44*, NOTIFY+48*, NOTIFY+51
DA NOTIFY~, NOTIFY+6
DATA ALLCLEAR~
DATA( ALLCLEAR+3, ALLCLEAR+4
DFN NOTIFY+4~, NOTIFY+8*, NOTIFY+10*, NOTIFY+21*, NOTIFY+31, NOTIFY+55
DGACT ACTIVE+12~, ACTIVE+13*, ACTIVE+21*, ACTIVE+22
DGADM ACTIVE~, ACTIVE+16*, ACTIVE+17*, ACTIVE+18, ACTLST~, ACTLST+11*, ACTLST+12*, ACTLST+15
DGCTR ACTLST+9~, ACTLST+10*, ACTLST+18*
DGEFDT ACTIVE+12~, ACTIVE+13*, ACTIVE+18*, ACTIVE+19*, ACTIVE+20
DGEFFDT ACTLST+9~, ACTLST+10*, ACTLST+15*, ACTLST+16*, ACTLST+17
DGEFFIEN ACTLST+9~, ACTLST+17*, ACTLST+18
DGEFIEN ACTIVE+12~, ACTIVE+13*, ACTIVE+20*, ACTIVE+21
DGFL ACTIVE+12~, ACTIVE+13*, ACTIVE+14, ACTIVE+15*
DGI ACTIVE+12~, ACTIVE+14*, ACTIVE+15, ACTLST+9~, ACTLST+14*, ACTLST+15, ACTLST+16, ACTLST+17, ACTLST+18
DGOUT ACTLST+9~, ACTLST+10*, ACTLST+20, ACTLST+22, NEXTSCR+2*
DGST ACTLST+9~, ACTLST+13*, ACTLST+14, ACTLST+18
DGSUFPTR ACTIVE+12~, ACTIVE+13*, ACTIVE+15*, ACTIVE+18, ACTIVE+19, ACTIVE+20, ACTIVE+21
DGX ACTLST+9~, ACTLST+20*, ACTLST+22
DGY ACTLST+9~, NEXTSCR+1*
DIR NEXTSCR+2!
DIR(0 NEXTSCR+2*
DIRUT NEXTSCR+2!
DT ACTIVE+17, ACTLST+12, GETNODE+4
DTOUT NEXTSCR+2!
DUOUT NEXTSCR+2!
EXISTS NOTIFY+4~, NOTIFY+36*, NOTIFY+40, NOTIFY+42
EXISTS("NEW" NOTIFY+37*, NOTIFY+40
EXISTS("OLD" NOTIFY+38*, NOTIFY+40
FIELD NOTIFY+4~, NOTIFY+35*, NOTIFY+36, NOTIFY+37, NOTIFY+38, NOTIFY+41, NOTIFY+42, NOTIFY+43
FILE NOTIFY~, NOTIFY+32, NOTIFY+52, NOTIFY+58, NOTIFY+71, GETNODE~, GETNODE+2
GTYPE NOTIFY+4~, NOTIFY+45*, NOTIFY+46, NOTIFY+47, NOTIFY+49
IEN NOTIFY+4~, NOTIFY+6*, NOTIFY+7, NOTIFY+54, GETNODE~, GETNODE+2
IEN("TOP" NOTIFY+7*, NOTIFY+10, NOTIFY+11, NOTIFY+22*, NOTIFY+32, NOTIFY+52, NOTIFY+56, NOTIFY+67, NOTIFY+71
INST NOTIFY+5~, NOTIFY+64*, NOTIFY+65*, NOTIFY+67*, NOTIFY+68, NOTIFY+69*, NOTIFY+70
IOF ACTLST+19, NEXTSCR+3
IOSL ACTLST+21, NEXTSCR+1
NAME NOTIFY+4~, NOTIFY+32*, NOTIFY+36, NOTIFY+37, NOTIFY+38, NOTIFY+41, NOTIFY+42, NOTIFY+43, NOTIFY+46, NOTIFY+47
, NOTIFY+49, NOTIFY+52, NOTIFY+53, NOTIFY+54, NOTIFY+55, NOTIFY+56, NOTIFY+57, NOTIFY+58, NOTIFY+61, NOTIFY+62
, NOTIFY+70, NOTIFY+71, GETNODE~, GETNODE+2, GETNODE+3, GETNODE+4
NEWVAL NOTIFY~, NOTIFY+14, NOTIFY+24
NEWVAL( NOTIFY+34, NOTIFY+40, NOTIFY+43
NEWVAL(1 NOTIFY+3, NOTIFY+8
NEWVAL(11 NOTIFY+23, NOTIFY+24, NOTIFY+29!
NEWVAL(2 NOTIFY+8, NOTIFY+20, NOTIFY+21, NOTIFY+22
NEWVAL(3 NOTIFY+13, NOTIFY+14, NOTIFY+19!
NODE NOTIFY+4~, NOTIFY+32*, NOTIFY+36, NOTIFY+37, NOTIFY+38, NOTIFY+41, NOTIFY+42, NOTIFY+43, NOTIFY+46, NOTIFY+47
, NOTIFY+49, NOTIFY+52, NOTIFY+54, NOTIFY+55, NOTIFY+56, NOTIFY+57, NOTIFY+58, NOTIFY+61, NOTIFY+62, NOTIFY+70
, NOTIFY+71
NUMBER GETFIELD+1~, GETFIELD+5*, GETFIELD+8*, GETFIELD+12*
OLDVAL NOTIFY~
OLDVAL( NOTIFY+33, NOTIFY+34, NOTIFY+40, NOTIFY+42
OLDVAL(11 NOTIFY+23, NOTIFY+24, NOTIFY+29!
OLDVAL(3 NOTIFY+13, NOTIFY+14, NOTIFY+19!
RECTYPE NOTIFY+4~, NOTIFY+8*, NOTIFY+11*, NOTIFY+22*, NOTIFY+31
RETURN ALLCLEAR+1~, ALLCLEAR+2*, ALLCLEAR+3, ALLCLEAR+4*, ALLCLEAR+5, GETNODE+1~, GETNODE+2*, GETNODE+3*, GETNODE+5, GETFIELD+1~
, GETFIELD+2*, GETFIELD+4*, GETFIELD+5*, GETFIELD+6*, GETFIELD+8*, GETFIELD+9*, GETFIELD+11*, GETFIELD+12*, GETFIELD+13
STATION NOTIFY+4~, NOTIFY+68, NOTIFY+69
SUB NOTIFY+4~, NOTIFY+8*, NOTIFY+11*, NOTIFY+16*, NOTIFY+17*, NOTIFY+22*, NOTIFY+26*, NOTIFY+27*, NOTIFY+31, NOTIFY+33*
, NOTIFY+34, NOTIFY+35, NOTIFY+40, NOTIFY+42, NOTIFY+43, NOTIFY+47*, NOTIFY+48, ALLCLEAR+1~, ALLCLEAR+3*, ALLCLEAR+4
, GETFIELD~, GETFIELD+4, GETFIELD+5, GETFIELD+6, GETFIELD+8, GETFIELD+9, GETFIELD+11, GETFIELD+12
TYPE NOTIFY~, NOTIFY+7*, NOTIFY+8, NOTIFY+9, NOTIFY+12, NOTIFY+20, NOTIFY+35, NOTIFY+36, NOTIFY+37, NOTIFY+38
, NOTIFY+41, NOTIFY+42, NOTIFY+43, NOTIFY+54, GETFIELD~, GETFIELD+3, GETFIELD+7, GETFIELD+9, GETFIELD+10
U ACTIVE+15, ACTIVE+16, ACTIVE+21, ACTLST+11, ACTLST+18, ACTLST+22, NOTIFY+10, NOTIFY+11, NOTIFY+21, NOTIFY+22
, NOTIFY+56, NOTIFY+64, NOTIFY+65, NOTIFY+67, NOTIFY+68, NOTIFY+69, GETNODE+4
VAERR NOTIFY+4~, NOTIFY+60
VAIN NOTIFY+4~
VAIN(11 NOTIFY+62
VAIN(2 NOTIFY+61
VAIN(4 NOTIFY+63, NOTIFY+64, NOTIFY+66
X ACTIVE~, ACTIVE+15
>> XPDNM NOTIFY+3
Y ACTIVE~, ACTIVE+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All