Routine: ACHSDPVO2

Package	Total	Caller Graph
Contract Health Management Information System	1	ACHS DEN PVDRLIST-SPECIFIED

Name	Comments	DBIA/ICR reference
END1	;
END	;
SUBTOT	;
START	;
PRNT25	;OPTIONS
PRINT	;
HDR1	;
DEV	;
PRNT1	;
VEND	;Select one vendor
PRNT3	;
PRNT2	;
PRNT4	;
GO	;
HDR	;
SELV	; ; all or select one vendor to run
TOTAL	;
GO1	;
GO2	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!,"NO DOCUMENTS FOR THIS REPORT",!!! Line Location: PRINT+5
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("=",79) Line Location: PRNT1+2
Function Call: WRITE	Prompt: !?20,"PROVIDER: ",$P($G(^AUTTVNDR(ACHDPROV,0)),U),!,$$REPEAT^XLFSTR("-",79),! Line Location: PRNT1+5
Function Call: WRITE	Prompt: !?5,"PRIMARY DENIAL REASON: ",$P($G(^ACHSDENS(ACHDNR,0)),U),! Line Location: PRNT25+3
Function Call: WRITE	Prompt: !?5,"PRIMARY DENIAL OPTION: ",$P($G(^ACHSDENS(ACHDNR,20,ACHDNRO,0)),U),! Line Location: PRNT25+4
Function Call: WRITE	Prompt: $$FMTE^XLFDT(ACHDAT),?15,ACHDN,?30,ACHSNAME,?55,$$FMTE^XLFDT(ACHSDOS),?67,ACHDECHG,! Line Location: PRNT4+9
Function Call: WRITE	Prompt: !?67,"___________",!?20,"PROVIDER TOTAL",?67,$J(ACHDTET,8),!! Line Location: SUBTOT+6
Function Call: WRITE	Prompt: !!,$$REPEAT^XLFSTR("-",79),!!!?20,"TOTAL",?67,$J(ACHDETOT,10),! Line Location: TOTAL+6
Function Call: WRITE	Prompt: @IOF,ACHSUSR,?70,"PAGE ",ACHSPG,!,ACHSLOC,!,ACHDTIT,!,$$C^ACHS("From "_$$FMTE^XLFDT(ACHDBDT)_" To "_$$FMTE^XLFDT(ACHDEDT)),!!,ACHSTIME,! Line Location: HDR+4
Function Call: WRITE	Prompt: !,"ISSUE DATE",?15,"DOCUMENT #",?30,"PATIENT",?55,"DOS",?72,"EST AMT",!,$$REPEAT^XLFSTR("-",79),! Line Location: HDR1+1

Information