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

Package: Contract Health Management Information System

Routine: ACHSPAP2


Information

ACHSPAP2 ; IHS/ITSC/PMF - MOVE MED DATA TO PATIENT CARE COMPONENT ; [ 12/06/2002 10:36 AM ]

Source Information

Source file <ACHSPAP2.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Contract Health Management Information System 4 ($$DOC,$$FC,RTRN)^ACHS  ^ACHSPAP  $$LINK^ACHSPAP1  ^ACHSUD  
IHS VA Utilities 1 $$DIR^XBDIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Contract Health Management Information System 1 ACHS PCC TRANSFER  

Entry Points

Name Comments DBIA/ICR reference
EPO ;
PO(ACHS) ;
NUM(X) ;
BPO ;
STOP() ;

External References

Name Field # of Occurrence
$$DOC^ACHS PO+4
$$FC^ACHS PO+4
RTRN^ACHS ACHSPAP2+4, EPO+20
^ACHSPAP EPO+16
$$LINK^ACHSPAP1 ACHSPAP2+4
^ACHSUD PO+2
$$DIR^XBDIR ACHSPAP2+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,"FIX THE PARAMETERS!"
  • Line Location: ACHSPAP2+3
Function Call: WRITE
  • Prompt: !,"No link to PCC : ",$P($$LINK^ACHSPAP1,U,2)
  • Line Location: ACHSPAP2+4
Function Call: WRITE
  • Prompt: !!,"You'll be asked for a beginning and ending P.O. number."
  • Line Location: ACHSPAP2+6
Function Call: WRITE
  • Prompt: !,"The medical data for P.O.'s included will be passed to the PCC."
  • Line Location: ACHSPAP2+7
Function Call: WRITE
  • Prompt: !,"Press the ESCAPE key to stop.",!!
  • Line Location: ACHSPAP2+8
Function Call: WRITE
  • Prompt: *7,!,"Beginning P.O. is later than the Ending P.O. ??"
  • Line Location: EPO+8
Function Call: WRITE
  • Prompt: !!,"Processing ",$$NUM(ACHSBPO),", to end at ",$$NUM(ACHSEPO),".",!
  • Line Location: EPO+15
Function Call: WRITE
  • Prompt: !!,"Press the ESCAPE (Esc) key to stop...",!
  • Line Location: EPO+17
Function Call: WRITE
  • Prompt: *7
  • Line Location: STOP+4
Function Call: READ
  • Timeout: 0
  • Variable: X
  • Line Location: STOP+5
Function Call: WRITE
  • Prompt: !!!,"Select the ",ACHS," P.O. Number..."
  • Line Location: PO+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHSF - [#9002080] EPO+10, EPO+11, EPO+12
^DPT - [#2] EPO+14

Label References

Name Line Occurrences
$$NUM EPO+15
$$PO BPO+1, EPO+1
$$STOP EPO+10
BPO EPO+2, EPO+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACHS PO~, PO+1
ACHSBPO ACHSPAP2+11~, BPO+1*, EPO+5*, EPO+8, EPO+10*, EPO+11, EPO+15
ACHSDIEN ACHSPAP2+11~, EPO+11*, EPO+12, PO+3
ACHSDOCR ACHSPAP2+11~, EPO+12*, EPO+13, EPO+14
ACHSEPO ACHSPAP2+11~, EPO+1*, EPO+6*, EPO+8, EPO+10, EPO+15
>> ACHSFC NUM+1
>> DTOUT BPO+2, EPO+3
>> DUOUT BPO+2, EPO+2, PO+3*
DUZ(2 EPO+10, EPO+11, EPO+12, PO+4
U ACHSPAP2+4, EPO+13, EPO+14
X STOP+1~, STOP+2*, STOP+3, STOP+5*, NUM~, NUM+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All