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

Package: Registration

Routine: DGDIS


Information

DGDIS ;ALB/JDS - DISPOSITION A REGISTRATION ; 8/6/04 3:17pm

Source Information

Source file <DGDIS.m>

Call Graph

Call Graph Total: 16

Package Total Call Graph
Registration 6 EN1^DGEN  EN^DGMTR  ($$MTS,EDT)^DGMTU  EL^DGREGE  LO^DGUTL  PT^DGYZODS  
Scheduling 4 FINAL^SCDXHLDR  (BEFORE,EVT)^SDAMEVT3  EN^SDCODEL  $$GETOE^SDOE  
VA Fileman 3 H^%DTC  ^DIC  ^DIE  
Kernel 2 ^%ZIS  $$FMTE^XLFDT  
Uncategorized 1 ADD^A1B2UTL  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DG DISPOSITION APPLICATION  DGREGE  

Entry Points

Name Comments DBIA/ICR reference
DISP
GETL
VALIDATE(DFN,DFN1) ; -- c/o validator
; -- use tag for NEWing
ODS ;if operation desert shield admission, create an entry in the ODS ADMISSIONS file
BEFORE(DFN,SDDT,SDEVT,SDISHDL) ; -- set 'before' vars for opt evt drv
; -- use tag for NEWing
EVT(DFN,SDDT,SDEVT,SDISHDL) ; -- opt evt drv
; -- use tag for NEWing
Q
MT ;Check if user requires a means test. Ask user if s/he wants to
DEL
DONE
ACT ;Execute Program Action
ANS ;
CHT
FIND
DP

External References

Name Field # of Occurrence
H^%DTC CHT
^%ZIS DISP+5
ADD^A1B2UTL ODS+5
EN1^DGEN DISP+9
EN^DGMTR MT+3
$$MTS^DGMTU MT+4
EDT^DGMTU MT+4
EL^DGREGE DISP+7
LO^DGUTL DGDIS+3
PT^DGYZODS ODS+4
^DIC FIND, DISP
^DIE ANS+2, DISP+4, ODS+6
FINAL^SCDXHLDR VALIDATE+18
BEFORE^SDAMEVT3 BEFORE+3
EVT^SDAMEVT3 EVT+3
EN^SDCODEL DEL+1
$$GETOE^SDOE VALIDATE+13
$$FMTE^XLFDT DP+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There are no open registrations to disposition for this patient.",!!,*7,*7
  • Line Location: FIND+1
Function Call: WRITE
  • Prompt: !!,"LOG DATE",?20,"TYPE OF BENEFIT APPLIED FOR",!
  • Line Location: DP+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: DP+0
Function Call: WRITE
  • Prompt: !,$$FMTE^XLFDT($E($P(L,U),1,12),"5Z"),?20,$P($P(L2,L3,2),";",1)
  • Line Location: DP+2
Function Call: WRITE
  • Prompt: !!,"Primary Eligibility Code and Period of Service are unspecified."
  • Line Location: ANS+6
Function Call: WRITE
  • Prompt: !!,"Primary Eligibility Code is unspecified."
  • Line Location: ANS+7
Function Call: WRITE
  • Prompt: !!,"Period of Service is unspecified."
  • Line Location: ANS+8
Function Call: WRITE
  • Prompt: !!,"A disposition must be entered to continue.",!!,*7,*7
  • Line Location: DISP+0
Function Call: WRITE
  • Prompt: !!,"***** Registration dispositioned *****",!!,*7
  • Line Location: DISP+10
Function Call: WRITE
  • Prompt: !!,"* Disposition deleted *",!!,*7,*7
  • Line Location: DEL+2
Routine Call
  • DIE
  • Line Location:
    • ANS+2
    • DISP+4
    • ODS+6
Routine Call
  • DIC
  • Line Location:
    • FIND
    • DISP
Routine Call
  • %ZIS
  • Line Location:
    • DISP+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(1 - [#3.5] DISP+5
^DD(2.101 DP+1, DEL
^DG(40.8 - [#40.8] DISP+6
^DG(43 - [#43] GETL, DISP+5
^DIC(37 - [#37] ACT+2
^DPT - [#2] FIND+1, ANS+2, ANS+4, ANS+5, DISP+4, CHT, DEL, DEL+1, VALIDATE+5

Label References

Name Line Occurrences
ACT DISP+12
DEL ANS+2, ANS+6, ANS+7, ANS+8, DISP
DISP DISP
FIND DONE, DEL+2
MT DISP+8
ODS DISP+1
Q FIND, DONE, DEL+2
VALIDATE DISP+11

Naked Globals

Name Field # of Occurrence
^( FIND+1, ANS+4, ANS+5, DEL
^("DEV" DISP+6
^("P" ACT+2
^(0 FIND+1, ANS+2, DISP+4, DISP+5, DEL*, DEL+1
^(99 DISP+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%H Q!, CHT
%Y Q!
>> %ZIS DISP+5*
>> A1B2DT ODS+5*
>> A1B2FL ODS+5*
C Q!
D0 Q!
D1 Q!
DA FIND*, FIND+1*, ANS+2, DISP+4*, Q!, CHT, ODS+5*, ODS+7!, BEFORE+2~
DA(1 ANS+2*, DISP+4*, CHT
DDT DISP+4*, Q!
DFN FIND*, ANS+2, ANS+4, ANS+5, DISP+4, DISP+7*, DISP+9, DISP+11, Q!, DEL
, DEL+1, MT+4, ACT+2, BEFORE~, BEFORE+3, EVT~, EVT+3, VALIDATE~, VALIDATE+5
DFN1 FIND+1*, DISP+4, DISP+7*, DISP+11, Q!, DEL, DEL+1, ACT+1~, BEFORE+2~, EVT+2~
, VALIDATE~, VALIDATE+5
DG1 Q!
DGA1 Q!
DGDFN FIND*, DISP+7, Q!, ACT+2*, BEFORE+2~, EVT+2~, VALIDATE+2~
DGDFN1 FIND+1*, DISP+7, DISP+13!, Q!, BEFORE+2~, EVT+2~, VALIDATE+2~
DGDIS0 VALIDATE+4~, VALIDATE+5*, VALIDATE+6, VALIDATE+9
DGDISTYP ODS+1~, ODS+2*
DGDIV DISP+4*, DISP+6, Q!, EVT+2~, VALIDATE+2~
DGDOM DISP+13!, EVT+2~, VALIDATE+2~
DGELIGX ANS+3~, ANS+4*, ANS+6!, ANS+7!, ANS+8!
DGHEM DISP+13!, EVT+2~, VALIDATE+2~
DGIO Q!
DGIO(10 DISP+5*, DISP+6*
DGKAAS DISP+13!, EVT+2~, VALIDATE+2~
DGL DISP+13!, Q!, CHT*, CHT+2*, EVT+2~, VALIDATE+2~
DGNHCU DISP+13!, EVT+2~, VALIDATE+2~
DGODS Q+1!, ODS+2*, ODS+4
>> DGODSE ODS+5*
DGODSND DP+3*, Q+1!, ODS+5, BEFORE+2~
DGOE VALIDATE+4~, VALIDATE+9*, VALIDATE+10, VALIDATE+13
DGOE0 VALIDATE+4~, VALIDATE+13*, VALIDATE+14
DGPOSX ANS+3~, ANS+5*, ANS+6!, ANS+7!, ANS+8!
DGREQF MT+2~
DGSTRX ANS+3~, ANS+6!, ANS+7!, ANS+8!
DGT Q!
DGVST VALIDATE+4~, VALIDATE+14*, VALIDATE+15, VALIDATE+18
DGW DISP+13!, EVT+2~, VALIDATE+2~
>> DGXXXD DISP+7*
DIC FIND*, DISP*, Q!
DIC("A" FIND*!, DISP*!
DIC("B" DISP!
DIC("S" FIND*!, DISP*
DIC(0 FIND*, DISP*
DIE ANS+2*, DISP+7*, Q!, ODS+1~, ODS+6*, ODS+7!
DIE("NO^" DISP+2*, DISP+4!
>> DISL GETL*, CHT+2
DISP DISP+4*, Q!, ACT+2, EVT+2~, VALIDATE+2~
DIV EVT+2~, VALIDATE+2~
DP ANS+2*, DISP+4*, Q!
DQ Q!
DR ANS+2*, DISP+2*, DISP+3*, DISP+4*, Q!, ODS+6*
DT MT+4
DUZ ANS+2, CHT+2
I FIND+1*, DP*, Q!, DEL*, EVT+2~, VALIDATE+2~
I1 Q!
>> IOP DISP+5*
>> IOS DISP+5
L GETL*, FIND+1*, DP+1, DP+2, DP+3, Q!, CHT*, DEL*
>> L1 CHT*, CHT+1
>> L2 DP+1*, DP+2, CHT*, CHT+1
>> L3 DP+1*, DP+2
>> LL1 CHT*, CHT+1
>> LL2 CHT*, CHT+1
MASD DISP+13!, EVT+2~, VALIDATE+2~
MASDEV DISP+13!, EVT+2~, VALIDATE+2~
PARA DISP+13!, EVT+2~, VALIDATE+2~
POP DISP+13!, EVT+2~, VALIDATE+2~
SD321 Q!, EVT+2~, VALIDATE+2~
SDDIV Q!, EVT+2~, VALIDATE+2~
SDDT BEFORE~, BEFORE+3, EVT~, EVT+3
SDEVT BEFORE~, BEFORE+3, EVT~, EVT+3
SDISDEL Q+1!
SDISHDL GETL~, DEL+1, BEFORE~, BEFORE+3, EVT~, EVT+3
SDL FIND+1*, Q!, EVT+2~, VALIDATE+2~
U DP+2, DISP+5, DISP+6, DEL, MT+4, VALIDATE+6, VALIDATE+9, VALIDATE+14
VA Q!
VAROOT Q!
X DISP, DISP+6*, Q!, CHT*, DEL*
>> X1 CHT+1*
>> X2 CHT+1*
>> X3 CHT+1*, CHT+2
Y FIND, DISP, DISP+4, DISP+5*, Q!, CHT+2*, ODS+2, ODS+4~, ODS+5
Y(0 DISP+2, ODS+3
Z Q!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All