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

Package: Contract Health Management Information System

Routine: ACHSFIM


Information

ACHSFIM ;IHS/ITSC/JVK -AUTHORIZATION MESSAGE TO FI;

Source Information

Source file <ACHSFIM.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Contract Health Management Information System 3 ($$DIE,$$DIR,$$DOC,RTRN)^ACHS  ^ACHSUD  ^ACHSVAR  
VA Fileman 1 DD^%DT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Contract Health Management Information System 1 ACHSFIM  

Entry Points

Name Comments DBIA/ICR reference
ASK ;
SET ;SET MESSAGE IN DOCUMENT
K ;
EN ;EP - From Option to send approval message to FI
DISPLAY ;

External References

Name Field # of Occurrence
DD^%DT DISPLAY+7
$$DIE^ACHS SET+1
$$DIR^ACHS ASK+1, ASK+6
$$DOC^ACHS EN+8, EN+12, DISPLAY+3, DISPLAY+5, DISPLAY+6
RTRN^ACHS ASK+9
^ACHSUD EN+6
^ACHSVAR EN+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Must be an open document."
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !!,"Cannot send a special local document."
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !!,"Approval Message will be sent with next export to the FI ONLY if PO has not been exported",!
  • Line Location: ASK+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISPLAY+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPLAY+2
Function Call: WRITE
  • Prompt: ?5,"DOCUMENT: ",$$DOC^ACHS(0,14)_"-"_$$DOC^ACHS(0,1)
  • Line Location: DISPLAY+3
Function Call: WRITE
  • Prompt: !?5,"DATE OF SERVICE: ",ACHSDOS
  • Line Location: DISPLAY+8
Function Call: WRITE
  • Prompt: ?40,"APRROVAL MESSAGE(S) TO FI: ",!
  • Line Location: DISPLAY+10
Function Call: WRITE
  • Prompt: ?49,I_". "_$S(ACHSVAL(I)="S":"Sterilization",ACHSVAL(I)="D":"In Support of Direct Care",ACHSVAL(I)="":""),!
  • Line Location: DISPLAY+14

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHSF - [#9002080] DISPLAY+9, DISPLAY+12, DISPLAY+13
^DPT - [#2] DISPLAY+5

Label References

Name Line Occurrences
DISPLAY EN+14, SET+2
EN EN+9, EN+13
K EN+7, EN+9, EN+13, ASK+2, ASK+9
SET ASK+3, ASK+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+8*, EN+9, EN+12*, EN+13, ASK+1*, ASK+6*, SET+1*
>> ACHSCFY EN+2
ACHSDIEN EN+4!, EN+7, DISPLAY+9, DISPLAY+12, DISPLAY+13, K+1!
ACHSDOS DISPLAY+6*, DISPLAY+7*, DISPLAY+8, K+1!
>> ACHSFC EN+2
ACHSVAL K+1!
ACHSVAL( DISPLAY+13*, DISPLAY+14
D0 EN+4!, K+1!
D1 EN+4!, K+1!
D2 EN+4!
DIR EN+10!, EN+13!
DR EN+4!
DUZ(2 DISPLAY+9, DISPLAY+12, DISPLAY+13
I DISPLAY+12*, DISPLAY+13, DISPLAY+14, K+1!
IOF DISPLAY+1
J DISPLAY+11*, DISPLAY+12*, DISPLAY+13, K+1!
U DISPLAY+5, DISPLAY+13
>> Y ASK+2, ASK+7, DISPLAY+7*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All