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

Package: Contract Health Management Information System

Routine: ACHSDAR


Information

ACHSDAR ; IHS/ITSC/PMF - PATIENT ALTERNATE RESOURCE LETTER (1/2) ; [ 10/16/2001 8:16 AM ]

Source Information

Source file <ACHSDAR.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Contract Health Management Information System 4 ($$DIR,$$ZEROTH)^ACHS  (END,END1,START)^ACHSDAR1  END^ACHSDAR4  ^ACHSDLK  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 3 ^DIC  ^DIE  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Contract Health Management Information System 1 ACHS DEN ALTRESC  

Entry Points

Name Comments DBIA/ICR reference
PAT ;
OPTION ;
P4 ;
P5 ;
DEV ;
ENTER ;
OPTION1 ;

External References

Name Field # of Occurrence
^%ZIS DEV+3
HOME^%ZIS DEV+4
^%ZISC DEV+7
^%ZTLOAD DEV+10
$$DIR^ACHS P4+7
$$ZEROTH^ACHS ENTER+2
END^ACHSDAR1 DEV+4
END1^ACHSDAR1 PAT+3
START^ACHSDAR1 DEV+5
END^ACHSDAR4 P4+9
^ACHSDLK PAT+2
^DIC ENTER+7
^DIE ENTER+14
^DIR P5+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,*7,*7,?10,"No Alternate Resources For This Patient. ",!
  • Line Location: P4+6
Function Call: WRITE
  • Prompt: !!?10,"ALTERNATE RESOURCES AVAILABLE FOR THIS PATIENT.",!!
  • Line Location: P5+2
Function Call: WRITE
  • Prompt: !!!,"No Alternate Resources Options on File",!
  • Line Location: OPTION+1
Function Call: WRITE
  • Prompt: !!!,"Alternate Resources Options On File",!
  • Line Location: OPTION+2
Function Call: WRITE
  • Prompt: !,"No alternate resource options found for this facility!"
  • Line Location: OPTION1+6
Function Call: WRITE
  • Prompt: !!,*7,"Option Already Selected",*7,!!
  • Line Location: OPTION1+12
Function Call: WRITE
  • Prompt: !!,"Do You Want To Enter Documentation Now",!!
  • Line Location: OPTION1+27
Function Call: WRITE
  • Prompt: !!
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: *7,!,"Please queue to system printers."
  • Line Location: DEV+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: ENTER+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: ENTER+9
Routine Call
  • %ZIS
  • Line Location:
    • DEV+4
Routine Call
  • DIE
  • Line Location:
    • ENTER+14
Routine Call
  • DIC
  • Line Location:
    • ENTER+7
Routine Call
  • DIR
  • Line Location:
    • P5+14
Routine Call
  • %ZIS
  • Line Location:
    • DEV+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHSDEN - [#9002071] P4+2, P4+5, P5+6, P5+8, ENTER+2*
^AUTNINS - [#9999999.18] P5+8

Label References

Name Line Occurrences
DEV DEV+7, DEV+11
ENTER P4+7
P4 ENTER+8, ENTER+15
P5 P4+2, P4+5
PAT P5+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % P5+15, P5+16, DEV+9*
>> %ZIS DEV+2*
>> ACHD P5+5*, P5+6*, P5+8
>> ACHDALRS P5+16*
>> ACHDLKER PAT+3, P4+8*
>> ACHDOCT PAT+1*
>> ACHDX P5+5*, P5+7*, P5+8, P5+11
>> ACHSA P4+2, P4+5, P5+6, P5+8, ENTER+2, ENTER+4, ENTER+5, ENTER+11
>> DA(1 ENTER+4*, ENTER+11*
>> DA(2 ENTER+3*, ENTER+10*
>> DIC ENTER+5*, ENTER+12
>> DIC(0 ENTER+6*
>> DIE ENTER+12*
>> DIR("?" P5+13*
>> DIR("A" P5+12*
>> DIR(0 P5+11*
>> DR ENTER+13*
>> DTOUT P5+15
>> DUOUT P5+15
DUZ(2 P4+2, P4+5, P5+6, P5+8, ENTER+2, ENTER+3, ENTER+5, ENTER+10
IO("Q" DEV+5, DEV+6!
IO("S" DEV+7
IOST DEV+7
>> POP DEV+4
U P4+2, P4+5, P5+8
>> Y ENTER+8
>> ZTDESC DEV+8*
>> ZTRTN DEV+8*
>> ZTSAVE( DEV+9*
>> ZTSK DEV+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All