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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DGMTDEL1

Package: Registration

Routine: DGMTDEL1


Information

DGMTDEL1 ;ALB/CAW,LBD,PHH - Delete MT for a Patient (con't) ;12/6/94

Source Information

Source file <DGMTDEL1.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Registration 6 EN^DGMTAUD  ($$S,$$SR)^DGMTAUD1  LKP^DGMTDEL  (AFTER,EN)^DGMTEVT  $$MTS^DGMTU  PID^VADPT6  
Income Verification Match 2 DELETE^IVMPLOG  ^IVMPMTE  
VA FileMan 2 ^DIE  ^DIK  
Kernel 1 $$FMTE^XLFDT  

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

Package Total Caller Graph
Registration 2 DGMTDEL  DGMTDELS  

Entry Points

Name Comments DBIA/ICR reference
ID ;write identifiers
DEL ;delete
VAR ;set variables
LOOP ;loop through all means test for patient and delete
DATE(X) ;function to return date in external format
PID(X) ;function to return pid
DELLNK ;Deletion of Linked tests

External References

Name Field # of Occurrence
EN^DGMTAUD DEL+26, DELLNK+17
$$S^DGMTAUD1 ID+6
$$SR^DGMTAUD1 ID+3
LKP^DGMTDEL LOOP+1
AFTER^DGMTEVT DEL+23, DELLNK+16
EN^DGMTEVT DEL+24
$$MTS^DGMTU VAR+1
^DIE DEL+11, DEL+22, DELLNK+10, DELLNK+23
^DIK DEL+8, DELLNK+15
DELETE^IVMPLOG DEL+5, DELLNK+12
^IVMPMTE DEL+27
PID^VADPT6 PID+3
$$FMTE^XLFDT DATE+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?21,$S(DGMTYPT=1:"MEANS",DGMTYPT=2:"COPAY",DGMTYPT=4:"LTC Copay Exemption",1:"")_" TEST DATE"
  • Line Location: ID+2
Function Call: WRITE
  • Prompt: ?40,"SOURCE: ",$S($L(DGMTSRC)>10:$E(DGMTSRC,1,10),1:DGMTSRC),?60,"PRIMARY TEST: ",$S($G(^DGMT(408.31,DGI,"PRIM"))=1:"YES",1:"NO")
  • Line Location: ID+5
Routine Call
  • DIE
  • Line Location:
    • DEL+11
    • DEL+22
    • DELLNK+10
    • DELLNK+23

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGMT(408.21 - [#408.21] Classic Fileman Calls
^DGMT(408.22 - [#408.22] Classic Fileman Calls
^DGMT(408.31 - [#408.31] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGMT(408.21 - [#408.21] DEL+19, DEL+20
^DGMT(408.22 - [#408.22] DEL+9, DEL+17
^DGMT(408.31 - [#408.31] ID+1, ID+5, ID+6, VAR+1, LOOP+1, DELLNK+4, DELLNK+5, DELLNK+9, DELLNK+14, DELLNK+22

Label References

Name Line Occurrences
$$DATE ID+6
DEL LOOP+1
DELLNK DEL+7
VAR LOOP+1

Naked Globals

Name Field # of Occurrence
^(0 ID+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMTFLG DEL+16~, DEL+21*, DEL+22
CNT DEL+16~, DEL+21*
DA DEL+10*, DEL+11, DEL+16~, DEL+17*, DEL+18, DEL+19, DEL+20, VAR+1*, DELLNK+1~, DELLNK+10*
, DELLNK+15*, DELLNK+23*
DE DEL+12!
>> DFN DEL+5, DEL+9, VAR+1, LOOP+1, DELLNK+12
>> DGCAT VAR+1*
>> DGCT LOOP+1*, LOOP+2
>> DGI ID+1*, ID+5, ID+6, LOOP+1*
>> DGMT0 VAR+1, LOOP+1*
DGMTA DELLNK+13~
DGMTACT DEL+8*, DELLNK+13~, DELLNK+16*
>> DGMTD DEL+5, VAR+1*
DGMTI DEL+9, VAR+1, LOOP+1*, DELLNK+4, DELLNK+13~, DELLNK+14*, DELLNK+15, DELLNK+22
DGMTINF DEL+23*, DELLNK+13~, DELLNK+16*
DGMTP VAR+1*, LOOP+1*, DELLNK+13~, DELLNK+14*
>> DGMTSRC ID+3*, ID+4*, ID+5
>> DGMTX DEL+9*, DEL+10, DEL+17
>> DGMTY DEL+9*
DGMTYPT ID+2, DEL+5, DEL+24, DEL+25, VAR+1*, LOOP+2, DELLNK+2, DELLNK+13~, DELLNK+17*, DELLNK+18
>> DGN ID+1*, ID+3
>> DGP VAR+1*, LOOP+1
DIE DEL+11*, DEL+16~, DEL+22*, DELLNK+1~, DELLNK+10*, DELLNK+23*
DIK DEL+8*, DEL+12!, DELLNK+1~, DELLNK+15*
DQ DEL+12!
DR DEL+11*, DEL+12!, DEL+16~, DEL+22*, DELLNK+1~, DELLNK+10*, DELLNK+23*
GIEN DELLNK+1~, DELLNK+9*, DELLNK+10, DELLNK+22*, DELLNK+23
IEN4 DELLNK+1~, DELLNK+4*, DELLNK+5, DELLNK+9, DELLNK+14
LTCDT DELLNK+1~, DELLNK+5*, DELLNK+12
NODE0 DEL+16~, DEL+20*, DEL+21
U ID+6, VAR+1
>> VA("PID" PID+4
X DATE~, DATE+3, PID~
>> Y ID+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All