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

Package: Contract Health Management Information System

Routine: ACHSDARR


Information

ACHSDARR ; IHS/ITSC/PMF - PATIENT RELEASE OF INFORMATION FOR ALT RES ; [ 10/16/2001 8:16 AM ]

Source Information

Source file <ACHSDARR.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 2 ^DIWP  ^DIWW  
Contract Health Management Information System 1 ($$DN,$$SUD)^ACHS  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Contract Health Management Information System 2 ACHSDAR4  ACHSDFL1  

Entry Points

Name Comments DBIA/ICR reference
START ;
START1 ;
END ;
DATE(D,P,O) ;EP - "D" = Date, "P" = Part of Date, "O" = Option
; if Month or day.

External References

Name Field # of Occurrence
$$DN^ACHS ACHSDARR+8, ACHSDARR+9
$$SUD^ACHS START1+6, START1+7, START1+9
^DIWP START1+3, START1+5, START1+11
^DIWW START1+5, START1+11
$$FMTE^XLFDT DATE+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!!!!!!!!!
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !!!?DIWL+10,$$SUD^ACHS(1)
  • Line Location: START1+6
Function Call: WRITE
  • Prompt: !?DIWL+10,$$SUD^ACHS(7)
  • Line Location: START1+7
Function Call: WRITE
  • Prompt: !?DIWL+10,$$SUD^ACHS(2),!?DIWL+10,$$SUD^ACHS(3),", ",$P($G(^DIC(5,$$SUD^ACHS(4),0)),U,2)," ",$$SUD^ACHS(5),!?DIWL+10,"Telephone: ",$$SUD^ACHS(6),!?DIWL+10,"ATTN: Contract Health",!!!
  • Line Location: START1+9
Function Call: WRITE
  • Prompt: !!!?DIWL+5,"Dated this ",$$DATE(DT,"DD",1)," day of ",$$DATE(DT,"MM",1),", ",$$DATE(DT,"YY"),"."
  • Line Location: START1+12
Function Call: WRITE
  • Prompt: !!!!!?DIWL+30,"_________________________________",!!?DIWL+30,ACHDNAME
  • Line Location: START1+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHSDEN - [#9002071] ACHSDARR+4, START1+1
^AUTNINS - [#9999999.18] START1+1
^DIC(5 - [#5] START1+9
^DPT - [#2] ACHSDARR+8

Label References

Name Line Occurrences
$$DATE START1+12
START ACHSDARR+5, ACHSDARR+8
START1 START+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DATE+11*, DATE+15*
>> ACHD START+2*, START+3*
>> ACHDALRS ACHSDARR+4, START1+1
>> ACHDNAME ACHSDARR+4*, ACHSDARR+5, ACHSDARR+8*, ACHSDARR+9*, START+3, START+4*, START1+2, START1+13
>> ACHSA ACHSDARR+4, START1+1
D DATE~, DATE+2, DATE+6
>> DIWL START1+6, START1+7, START1+9, START1+12, START1+13
DT START1+12
DUZ(2 ACHSDARR+4, START1+1
>> I START+3*
IOF START+1
O DATE~, DATE+5*, DATE+10, DATE+14
P DATE~, DATE+3, DATE+4, DATE+7, DATE+8
U ACHSDARR+4, ACHSDARR+8, START1+1, START1+9
>> X START1+1*, START1+2*, START1+4*, START1+10*
>> Y DATE+6*, DATE+7, DATE+8, DATE+9*, DATE+11*, DATE+13*, DATE+14, DATE+15*, DATE+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All