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

Package: Contract Health Management Information System

Routine: ACHS3PP2


Information

ACHS3PP2 ; IHS/ITSC/PMF - PRINT CHS THIRD PARTY PAYMENT REPORT - INDIVIDUAL PAT ; [ 10/16/2001 8:16 AM ]

Source Information

Source file <ACHS3PP2.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Contract Health Management Information System 3 $$LOC^ACHS  ^ACHS3PP5  BRPT^ACHSFU  
Kernel 3 ^%ZISC  $$HTE^XLFDT  $$REPEAT^XLFSTR  
IHS VA Utilities 1 $$DIR^XBDIR  
VA Fileman 1 COMMA^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Contract Health Management Information System 1 ACHS3PP1  

Entry Points

Name Comments DBIA/ICR reference
SUBTOTL ;
END ;Close device, kill variables, quit
PDATA
DETAIL ;DETAIL LINE
TOTL ;
HEADER2 ;
HEADER ;Prints Heading
HEADER1 ;
GETPAT ;
NODATA ;

External References

Name Field # of Occurrence
COMMA^%DTC DETAIL+3, DETAIL+6, DETAIL+9, SUBTOTL+3, SUBTOTL+6, SUBTOTL+9, TOTL+3, TOTL+6, TOTL+9
^%ZISC END+1
$$LOC^ACHS HEADER+7
^ACHS3PP5 NODATA+8
BRPT^ACHSFU ACHS3PP2+6
$$DIR^XBDIR PDATA+5, SUBTOTL+17, TOTL+15, NODATA+6
$$HTE^XLFDT HEADER+5
$$REPEAT^XLFSTR SUBTOTL+1, TOTL+1, HEADER+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?1,ACHSDOC,?22,ACHSSERV,?30,ACHSIDT,?40
  • Line Location: DETAIL+1
Function Call: WRITE
  • Prompt: $J(X,12),?53
  • Line Location: DETAIL+4
Function Call: WRITE
  • Prompt: $J(X,12),?65
  • Line Location: DETAIL+7
Function Call: WRITE
  • Prompt: $J(X,11)
  • Line Location: DETAIL+10
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",80),!?1,"SUBTOTAL",?4,$J(ACHSDOCS,4)
  • Line Location: SUBTOTL+1
Function Call: WRITE
  • Prompt: ?40,$J(X,12)
  • Line Location: SUBTOTL+4
Function Call: WRITE
  • Prompt: ?53,$J(X,12)
  • Line Location: SUBTOTL+7
Function Call: WRITE
  • Prompt: ?65,$J(X,12)
  • Line Location: SUBTOTL+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: SUBTOTL+11
Function Call: WRITE
  • Prompt: "PERCENTAGES OF PAYMENT TO OBLIGATED",?59,$E(Z,1,5)_"%"
  • Line Location: SUBTOTL+11
Function Call: WRITE
  • Prompt: ?71,$E(X,1,5)_"%"
  • Line Location: SUBTOTL+12
Function Call: WRITE
  • Prompt: !?5,"*HOSP - ",ACHS43ST,"*",?25,"*DENT - ",ACHS57ST,"*",?45,"*OUTP - ",ACHS64ST,"*",?65,"*UNKN - ",ACHS0ST,"*"
  • Line Location: SUBTOTL+13
Function Call: WRITE
  • Prompt: !!!!,$$REPEAT^XLFSTR("=",80),!!?1,"TOTAL",?9,$J(ACHSDOCT,4)
  • Line Location: TOTL+1
Function Call: WRITE
  • Prompt: ?40,$J(X,12)
  • Line Location: TOTL+4
Function Call: WRITE
  • Prompt: ?53,$J(X,12)
  • Line Location: TOTL+7
Function Call: WRITE
  • Prompt: ?65,$J(X,12)
  • Line Location: TOTL+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: TOTL+11
Function Call: WRITE
  • Prompt: "PERCENTAGES OF PAYMENT TO OBLIGATED",?59,$E(Z,1,5)_"%"
  • Line Location: TOTL+11
Function Call: WRITE
  • Prompt: ?71,$E(X,1,5)_"%"
  • Line Location: TOTL+12
Function Call: WRITE
  • Prompt: !?5,"*HOSP - ",ACHS43T,"*",?25,"*DENT - ",ACHS57T,"*",?45,"*OUTP - ",ACHS64T,"*",?65,"*UNKN - ",ACHS0T,"*"
  • Line Location: TOTL+13
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !,"*",ACHSDAT
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: ?((80/2)-($L(X)/2)),X
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: ?71,ACHSTIM,"*",!,"*User: ",ACHSUSR,?70,"Device:",IO,"*"
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !!
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: ?((80/2)-($L(X)/2)),X_ACHSPAGE
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: ?((80/2)-($L(X)/2)),X_ACHSFY
  • Line Location: HEADER+15
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("*",80)
  • Line Location: HEADER+16
Function Call: WRITE
  • Prompt: !!?5,"PATIENT NAME: ",ACHSPATP,?62,"CHART#: ",ACHSHRN
  • Line Location: HEADER1+1
Function Call: WRITE
  • Prompt: !!?1,"DOCUMENT #"
  • Line Location: HEADER2+1
Function Call: WRITE
  • Prompt: ?42,"$ OBLIGD $",?55,"$ IHS PMT $",?69,"$ 3P PMT $"
  • Line Location: HEADER2+3
Function Call: WRITE
  • Prompt: !!!,"NO DATA FOR SPECIFIED FISCAL YEAR FOR ",ACHSPATP
  • Line Location: NODATA+3
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: NODATA+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] GETPAT+4
^DPT - [#2] GETPAT+3, NODATA+1
^TMP("ACHS3PP" ACHS3PP2+15, ACHS3PP2+17, GETPAT+8, GETPAT+9, END+7!, NODATA+4!, NODATA+7

Label References

Name Line Occurrences
DETAIL PDATA+1
END PDATA+5, SUBTOTL+17, TOTL+15, NODATA+6
GETPAT ACHS3PP2+19
HEADER ACHS3PP2+17, ACHS3PP2+18, PDATA+3, PDATA+4, PDATA+6
HEADER1 GETPAT+4
HEADER2 GETPAT+5
NODATA ACHS3PP2+17
SUBTOTL PDATA+14
TOTL ACHS3PP2+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACHS0ST ACHS3PP2+10*, PDATA+12*, SUBTOTL+13, SUBTOTL+14, SUBTOTL+18*
>> ACHS0T ACHS3PP2+10*, SUBTOTL+14*, TOTL+13
ACHS3PP ACHS3PP2+8*, GETPAT+12*, PDATA+7, DETAIL+8, END+3!
ACHS3PPS ACHS3PP2+8*, PDATA+7*, SUBTOTL+8, SUBTOTL+12, SUBTOTL+15, SUBTOTL+18*, END+3!
ACHS3PPT ACHS3PP2+8*, SUBTOTL+15*, TOTL+8, TOTL+12, END+3!
ACHS43ST ACHS3PP2+9*, PDATA+9*, SUBTOTL+13, SUBTOTL+14, SUBTOTL+18*, END+6!
ACHS43T ACHS3PP2+10*, SUBTOTL+14*, TOTL+13, END+6!
ACHS57ST ACHS3PP2+9*, PDATA+10*, SUBTOTL+13, SUBTOTL+14, SUBTOTL+18*, END+6!
ACHS57T ACHS3PP2+10*, SUBTOTL+14*, TOTL+13, END+6!
ACHS64 END+7!
ACHS64ST ACHS3PP2+10*, PDATA+11*, SUBTOTL+13, SUBTOTL+14, SUBTOTL+18*, END+7!
>> ACHS64T ACHS3PP2+10*, SUBTOTL+14*, TOTL+13
ACHSDAT END+3!, HEADER+5*, HEADER+6
ACHSDOC GETPAT+7*, GETPAT+8*, GETPAT+9, DETAIL+1, END+3!
ACHSDOCS ACHS3PP2+8*, GETPAT+13*, SUBTOTL+1, SUBTOTL+15, SUBTOTL+18*, END+3!
ACHSDOCT ACHS3PP2+9*, SUBTOTL+15*, TOTL+1, END+3!
ACHSFLG PDATA+13*, SUBTOTL+18*, END+6!
>> ACHSFY HEADER+15
ACHSHRN GETPAT+4*, END+4!, HEADER1+1
ACHSIDT GETPAT+10*, DETAIL+1, END+4!
ACHSIHSP ACHS3PP2+9*, GETPAT+12*, PDATA+7, DETAIL+5, END+4!
ACHSIHSS ACHS3PP2+9*, PDATA+7*, SUBTOTL+5, SUBTOTL+11, SUBTOTL+15, SUBTOTL+18*, END+4!
ACHSIHST ACHS3PP2+9*, SUBTOTL+15*, TOTL+5, TOTL+11, END+4!
ACHSOBL ACHS3PP2+8*, GETPAT+12*, PDATA+7, DETAIL+2, END+5!
ACHSOBLS ACHS3PP2+8*, PDATA+7*, SUBTOTL+2, SUBTOTL+11, SUBTOTL+12, SUBTOTL+15, SUBTOTL+18*, END+5!
ACHSOBLT ACHS3PP2+8*, SUBTOTL+15*, TOTL+2, TOTL+11, TOTL+12, END+5!
ACHSOST END+6!
ACHSOT END+6!
ACHSPAGE ACHS3PP2+9*, ACHS3PP2+16*, END+7!, HEADER+3*, HEADER+12
ACHSPAT ACHS3PP2+14*, ACHS3PP2+15*, ACHS3PP2+17, GETPAT+3, GETPAT+4, GETPAT+8, GETPAT+9, END+5!, NODATA+1, NODATA+4
ACHSPATP ACHS3PP2+11!, GETPAT+3*, HEADER1+1, NODATA+1*, NODATA+2*, NODATA+3
ACHSQIO END+4!
>> ACHSRTYP PDATA+1, HEADER2+2
>> ACHSSER PDATA+8, SUBTOTL+13, TOTL+13
ACHSSERV GETPAT+11*, DETAIL+1, END+5!
ACHSTIM END+5!, HEADER+5*, HEADER+9
ACHSUSR END+5!, HEADER+9
C ACHS3PP2+9*, GETPAT+13*, SUBTOTL+18*, END+5!
D GETPAT+10*, END+5!
DIR SUBTOTL+16!, TOTL+14!, END+7!
DUZ(2 GETPAT+4
I END+7!
IO HEADER+1, HEADER+9
IO("S" PDATA+4, SUBTOTL+17, TOTL+15, NODATA+8
IOF HEADER+2
IOST PDATA+3, PDATA+4, SUBTOTL+17, TOTL+15, NODATA+8
P END+5!
S GETPAT+11*, PDATA+9, PDATA+10, PDATA+11, PDATA+12, END+5!
U GETPAT+3, GETPAT+4, GETPAT+10, GETPAT+11, GETPAT+12, NODATA+1
X DETAIL+2*, DETAIL+4, DETAIL+5*, DETAIL+7, DETAIL+8*, DETAIL+10, SUBTOTL+2*, SUBTOTL+4, SUBTOTL+5*, SUBTOTL+7
, SUBTOTL+8*, SUBTOTL+10, SUBTOTL+12*, TOTL+2*, TOTL+4, TOTL+5*, TOTL+7, TOTL+8*, TOTL+10, TOTL+12*
, END+7!, HEADER+7*, HEADER+8, HEADER+11*, HEADER+12, HEADER+14*, HEADER+15
X2 DETAIL+2*, DETAIL+5*, DETAIL+8*, SUBTOTL+2*, SUBTOTL+5*, SUBTOTL+8*, TOTL+2*, TOTL+5*, TOTL+8*, END+7!
Y END+7!, HEADER+5*
Z GETPAT+9*, GETPAT+10, GETPAT+11, GETPAT+12, SUBTOTL+11*, TOTL+11*, END+5!
>> ZTQUEUED END+2
>> ZTREQ END+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All