Routine: PRCA219P

Package	Total	Call Graph
Kernel	4	(,HOME)^%ZIS ^%ZISC (,$$S)^%ZTLOAD ($$FMTE,$$NOW)^XLFDT
VA FileMan	2	(C,YMD)^%DTC ^DIR

Entry Points

Name	Comments	DBIA/ICR reference
REPORT	;
ENTER	;
DEVICE()	;
BILLFIND	; ; Find older bills that will most likely print next cycle after *219 installed ; Categories are: Adult Day Health Care, C(Means Test), Geriatric Eval-Institutional, Geriatric Eval-Non-Institutional, ; Respite Care-Institutional, Respite Care-Non-Institional, RX Co-Payment/SC Vet, RX Co-Payment/NSC Vet, Hospital Care (NSC), ; Hospital Care Per Diem, Nursing Home Care Per Diem, Nursing Home Care (NSC), Nursing Home Care-LTC, Outpatient Care (NSC), ; Current Employee, Emergency/Humanitarian, Ineligible Hospital, Ex-Employee, Vendor, ChampVA Subsistence, Tricare Patient ;
PRINT	;
HEAD	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"This is a report of older bills that will likely print at the next print cycle" Line Location: REPORT+2
Function Call: WRITE	Prompt: !!,"* COUNT OF LIKELY BILLS TO PRINT "_COUNT," *",!! Line Location: PRINT+8
Function Call: WRITE	Prompt: !,?2,$P(^PRCA(430.2,CAT,0),U,1),?25,BILLNO Line Location: PRINT+14
Function Call: WRITE	Prompt: @IOF,!,PRCADDT,?15,"PRCA4.5219 Older Bills Most Likely to Print",?70,"Page:",$J(PRCAPG,5),! Line Location: HEAD+5
Function Call: WRITE	Prompt: X,! Line Location: HEAD+5
Function Call: WRITE	Prompt: ! Line Location: HEAD+6
Function Call: WRITE	Prompt: !,?2,"Category",?25,"Bill Number",! Line Location: HEAD+7
Function Call: WRITE	Prompt: X,! Line Location: HEAD+8
Routine Call	DIR Line Location: PRINT+17 HEAD+2
Routine Call	%ZIS Line Location: DEVICE+10
Routine Call	%ZIS Line Location: DEVICE+17

Name	Line Occurrences (* Changed, ! Killed)
^PRCA(430 - [#430]	BILLFIND+9, BILLFIND+10, BILLFIND+12, BILLFIND+14, BILLFIND+15, BILLFIND+19
^PRCA(430.2 - [#430.2]	PRINT+14
^XTMP("PRCA219P"	REPORT+4!, REPORT+6, ENTER+5!, BILLFIND+19, PRINT+10, PRINT+11, PRINT+13

Name	Field # of Occurrence
^(7	BILLFIND+10

Name	Field # of Occurrence
>> %H	BILLFIND+13*
%ZIS	DEVICE+7~, DEVICE+9*
BILLDFN	BILLFIND+7~, BILLFIND+8, BILLFIND+9, BILLFIND+10, BILLFIND+12, BILLFIND+14, BILLFIND+15, BILLFIND+19, PRINT+10, PRINT+11 , PRINT+13
BILLNO	PRINT+2~, PRINT+13*, PRINT+14
CAT	BILLFIND+7~, BILLFIND+15, BILLFIND+17, BILLFIND+18, BILLFIND+19, PRINT+9, PRINT+10, PRINT+11, PRINT+13, PRINT+14
COUNT	BILLFIND+7~, BILLFIND+8, BILLFIND+20, PRINT+6, PRINT+8
CURBAL	BILLFIND+7~, BILLFIND+11*
DIR	PRINT+17!, HEAD+2!
DIR(0	PRINT+17, HEAD+2
DT	REPORT+5, REPORT+6
I	BILLFIND+7~, BILLFIND+16*, BILLFIND+17
IO	PRINT+1
IO("Q"	DEVICE+12
IOF	HEAD+5
IOP	DEVICE+7~
IOSL	PRINT+12
IOST	PRINT+17, HEAD+2
LETTER2	BILLFIND+7~, BILLFIND+12*, BILLFIND+13
LETTER3	BILLFIND+7~, BILLFIND+14*
OK	DEVICE+7~, DEVICE+8, DEVICE+11, DEVICE+12, DEVICE+18*, DEVICE+19
PNAME	BILLFIND+7~
POP	DEVICE+7~, DEVICE+11
PRCADDT	PRINT+2~, PRINT+3*, HEAD+5
PRCAPG	PRINT+2~, PRINT+4, PRINT+17, HEAD+2, HEAD+4, HEAD+5
PRCAQUIT	PRINT+2~, PRINT+4, PRINT+10, PRINT+11, PRINT+16, PRINT+17, HEAD+1, HEAD+2, HEAD+3
U	BILLFIND+19, PRINT+13, PRINT+14
X	REPORT+6, BILLFIND+7~, BILLFIND+13, HEAD+5!, HEAD+8
X1	REPORT+3~, REPORT+5*
X2	REPORT+3~, REPORT+5*
Y	BILLFIND+7~, BILLFIND+10*, BILLFIND+11, PRINT+17, HEAD+2
Z	BILLFIND+7~, BILLFIND+10*
ZTDESC	DEVICE+13~, DEVICE+14*
>> ZTQUEUED	ENTER+4, PRINT+16, PRINT+18, HEAD+1
ZTREQ	ENTER+4, DEVICE+13~, PRINT+18
ZTRTN	DEVICE+13~, DEVICE+14*
>> ZTSK	DEVICE+16
ZTSKM	DEVICE+13~
ZTSTOP	DEVICE+13~, HEAD+1*