Routine: FBCHPSA

Information

FBCHPSA ;AISC/DMK-CALCULATES COSTS BY PSA ;13JUN90

Source file <FBCHPSA.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !?2,FBSTA,?44,"$ ",$P(^TMP("FBPSA",$J,I),"^") Line Location: REPORT+5
Function Call: WRITE	Prompt: !,$E(FBNAME,1,30)," -",$$SSN^FBAAUTL(FBDFN,1),?42,FBOBL,?57,FBCOUNTY,!,?4,FBINV,?21,FBAMTPD,?39,FBPDDT,?60,FBSTA,!,Q,! Line Location: MORE+7
Function Call: WRITE	Prompt: !?25,$S(FBPROG=6:"CIVIL HOSPITAL PSA REPORT",FBPROG=2:"OUTPATIENT MEDICAL PSA REPORT",FBPROG=3:"PHARMACY PSA REPORT",1:"COMMUNITY N.H. PSA REPORT") Line Location: HED+1
Function Call: WRITE	Prompt: !?24,"-------------------------------",!,"Patient Name",?40,"Obligation #",?56,"County Code",! Line Location: HED+2
Function Call: WRITE	Prompt: ?3,"Invoice #",?20,"Amount Paid",?38,"Date Finalized",?59,"PSA",!,QQ Line Location: HED+3
Function Call: WRITE	Prompt: !,QQ,!?7,"Total Dollars spent by PSA for the dates of ",BEGDATE," to ",ENDDATE,". ",!!?5,"PSA",?40,"TOTAL AMOUNT PAID",!,?4,"-----",?39,"--------------------" Line Location: HED1+0