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

Package: Contract Health Management Information System

Routine: ACHSEDOC


Information

ACHSEDOC ; IHS/ITSC/PMF - PRINT EOBRS BY PATIENT ; [ 10/16/2001 8:16 AM ]

Source Information

Source file <ACHSEDOC.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Contract Health Management Information System 6 RTRN^ACHS  ^ACHSEOB2  ^ACHSEOBA  (BRPT,READ)^ACHSFU  ^ACHSUD  ^ACHSVAR  
Kernel 3 ^%ZIS  ^%ZISC  $$REPEAT^XLFSTR  
IHS VA Utilities 2 $$DIR^XBDIR  EN^XBVK  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Contract Health Management Information System 1 ACHSPRINTEOBRDOC  

Entry Points

Name Comments DBIA/ICR reference
R(X,Y)
DOCPRT2 ;
DOCPRT1 ;
END ;
DOCSEL1 ;
DOC ;
DOCSEL2 ;
DOCSEL ;
NON ;
DOCSELPR ;
DOCPRT ;
DOCNO ;
DIR ;

External References

Name Field # of Occurrence
^%ZIS DOCPRT+3
^%ZISC END+1
RTRN^ACHS ACHSEDOC+12
^ACHSEOB2 DOCPRT1+2
^ACHSEOBA DOCPRT1+2
BRPT^ACHSFU DOCPRT+6
READ^ACHSFU DOCSEL+13
^ACHSUD ACHSEDOC+5
^ACHSVAR ACHSEDOC+4, END+1
$$DIR^XBDIR DIR+1, NON+1
EN^XBVK END+1
$$REPEAT^XLFSTR R

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $G(IORVON),!,"THIS REPORT WILL ONLY INCLUDE PROCESSED DOCUMENTS. ANY UNPROCESSED",!,"DOCUMENT WILL HAVE TO BE PRINTED USING ANOTHER OPTION.",!!,$G(IORVOFF),!
  • Line Location: ACHSEDOC+3
Function Call: WRITE
  • Prompt: !!,*7,"Document ",ACHSDIEN," is not complete!"
  • Line Location: ACHSEDOC+10
Function Call: WRITE
  • Prompt: !!,"ENTRY #",?10,"DOCUMENT #",?30,"PATIENT NAME",?60,"CHART #",?70,"TRANS TYPE",!,$$R("-",79)
  • Line Location: DOCSEL+8
Function Call: WRITE
  • Prompt: !!,"Press <RETURN> To Continue ",!!
  • Line Location: DOCSEL+13
Function Call: WRITE
  • Prompt: !,I_".",?10,ACHSPO,?30,ACHSPAT,?60,ACHSCHRT,?70,ACHSTTYP,!
  • Line Location: DOCSELPR+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: DOCPRT+1
Function Call: WRITE
  • Prompt: !!,"NO EOBRS FOR THIS DOCUMENT",!!
  • Line Location: DOCNO+1
Routine Call
  • %ZIS
  • Line Location:
    • DOCPRT+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHSEOBE - [#9002065] DOCSEL2+2
^ACHSF - [#9002080] ACHSEDOC+8, DOC+1, DOCSEL1+2, DOCSEL1+3, DOCSEL1+5, DOCSEL1+6
^AUPNPAT - [#9000001] DOCSEL1+4, DOCSEL2+2
^DPT - [#2] DOCSEL1+4, DOCSEL2+2

Label References

Name Line Occurrences
$$R DOCSEL+8
DOCNO DOCSEL+1
DOCPRT DOCSEL+5, DIR+2
DOCPRT1 DOCPRT+8
DOCSEL DOC+3, DOCPRT+7
DOCSEL1 DOCSEL+11
DOCSELPR DOCSEL1+7, DOCSEL2+3
END ACHSEDOC+6, DOCSEL+5, DIR+2, DOCPRT+4, DOCPRT+9, DOCNO+2, NON+2

Naked Globals

Name Field # of Occurrence
^(0 DOCSEL1+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DOCSEL1+3*, DOCSEL1+4, DOCSEL1+5*
>> %ZIS DOCPRT+2*
>> ACHSCHRT DOCSEL1+4*, DOCSEL1+5*, DOCSEL2+2*, DOCSELPR+1
>> ACHSDIEN ACHSEDOC+6, ACHSEDOC+8, ACHSEDOC+10, DOC+1, DOCSEL1+2, DOCSEL1+3, DOCSEL1+5, DOCSEL1+6
>> ACHSDOC0 ACHSEDOC+8*, ACHSEDOC+10, ACHSEDOC+15
>> ACHSEOIO DOCPRT+5*
>> ACHSFC ACHSEDOC+4, ACHSEDOC+15, DOCSEL1+6
>> ACHSN NON+1*
>> ACHSNON DOCSEL2+2*
>> ACHSPAT DOCSEL1+4*, DOCSEL1+5*, DOCSEL2+2*, DOCSELPR+1
>> ACHSPO ACHSEDOC+15*, DOCSEL1+6*, DOCSELPR+1
>> ACHSPO1 ACHSEDOC+16*, DOCSEL2+2*
>> ACHSPO1( DOCSEL2+1, DOCSEL2+2
>> ACHSQUIT ACHSEDOC+13
>> ACHSTIEN ACHSEDOC+16*, DOC+1*, DOC+2, DOCSEL1+2*, DOCSEL1+3, DOCPRT1+1*
>> ACHSTIEN( DOC+2*, DOCSEL+10, DOCSEL1+1, DOCSEL1+2, DOCPRT+8, DOCPRT1+1
>> ACHSTTYP DOCSEL1+2*, DOCSEL2+2*, DOCSELPR+1
>> ACHSX ACHSEDOC+16*, DOC+2*, DOCSEL+1, DOCSEL+5, DIR+1
>> ACHSX1 DOCPRT+8*, DOCPRT1+1
>> ACHSY ACHSEDOC+16*, DOCSEL+3*, DOCSEL+12*, DOCSEL+13, DIR+1*, DOCPRT+7, DOCPRT+8
>> DIRUT NON+2
>> DTOUT ACHSEDOC+6, DIR+2, NON+2
>> DUOUT ACHSEDOC+6, DIR+2, NON+2
DUZ(2 ACHSEDOC+8, DOC+1, DOCSEL1+2, DOCSEL1+3, DOCSEL1+4, DOCSEL1+5, DOCSEL1+6, DOCSEL2+2
>> I DOCSEL+9*, DOCSEL+10*, DOCSEL1+1, DOCSEL1+2, DOCSEL2+1, DOCSEL2+2, DOCSELPR+1, DOCPRT+8*
IO DOCPRT+5
>> IORVOFF ACHSEDOC+3
>> IORVON ACHSEDOC+3
>> POP DOCPRT+4
U ACHSEDOC+15, DOCSEL1+2, DOCSEL1+3, DOCSEL1+4, DOCSEL1+5, DOCSEL1+6, DOCSEL2+2
X R~
Y R~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All