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

Package: IHS Dental System

Routine: ADELETE


Information

ADELETE ; IHS/HQT/MJL - DELETE DENTAL VISIT ;12:30 PM [ 03/24/1999 9:04 AM ]

Source Information

Source file <ADELETE.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
IHS Dental System 5 ^ADEAPC2  (END,MOD)^ADEGRL  PTLOOK^ADEGRL1  VSLOOK^ADEGRL2  (HRN,LIST)^ADEGRL3  
VA Fileman 4 ^%DT  YN^DICN  ^DIE  ^DIK  

Entry Points

Name Comments DBIA/ICR reference
C
END
CTRL ;------->LOOK UP PATIENT
VS
DELPCD
FAIL
Z

External References

Name Field # of Occurrence
^%DT FAIL+1
^ADEAPC2 Z+2
END^ADEGRL END
MOD^ADEGRL VS+3
PTLOOK^ADEGRL1 CTRL+1
VSLOOK^ADEGRL2 VS
HRN^ADEGRL3 CTRL+1
LIST^ADEGRL3 VS+3
YN^DICN C
^DIE FAIL+4
^DIK DELPCD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: VS+0
Function Call: WRITE
  • Prompt: !!?5,"DELETE THIS VISIT"
  • Line Location: C+0
Function Call: WRITE
  • Prompt: !?10,"ANSWER `Y' TO DELETE THIS VISIT, `N' TO ABORT"
  • Line Location: C+1
Routine Call
  • DIE
  • Line Location:
    • FAIL+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ADEPCD - [#9002007] Classic Fileman Calls
^ADEPAT - [#9002010.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ADEPAT - [#9002010.2] FAIL, FAIL+2, FAIL+3
^ADEPCD - [#9002007] VS+1
^ADEUTL("ADELOCK" CTRL+1*, END!

Label References

Name Line Occurrences
C C+1
DELPCD Z+8
END CTRL+1, VS, Z
FAIL Z+6
VS VS

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % C*, Z
%DT FAIL+1*, FAIL+2!, FAIL+3!, FAIL+5!
>> %Y C+1
>> ADECON VS+1*
>> ADEDFN VS+1, DELPCD
>> ADEDIR VS+1*
>> ADEFAST ADELETE+3*
>> ADELIN ADELETE+3*
>> ADENEWVS VS, Z+2*
>> ADEPAT CTRL+1, END, FAIL, FAIL+2, FAIL+3, FAIL+4
>> ADETITL ADELETE+3*
>> ADEV("9130" Z+6
>> ADEV("9140" Z+6
>> ADEV("9986" Z+6
>> ADEV("9987" Z+6
>> ADEVDATE FAIL+1
>> AUPNLK("ALL" ADELETE+3*, END!
DA DELPCD*, FAIL+3*, FAIL+5!
DA(1 FAIL+4*
DIE FAIL+4*, FAIL+5!
DIK END!, DELPCD*
DR FAIL+4*, FAIL+5!
U VS+1
X FAIL+1*, FAIL+2!, FAIL+3!, FAIL+5!
Y CTRL+1, VS, FAIL+2!, FAIL+3!, FAIL+5!
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