Routine: FBAAEPI1

Information

FBAAEPI1 ;WOIFO/SAB-EDIT PREVIOUSLY ENTERED PHARMACY INVOICE (cont) ;7/9/2003

Name	Comments	DBIA/ICR reference
CKINVEDI(FBFPPSC0,FBFPPSC1,FBDA1)	; Check Invoice for EDI ; Input ; FBFPPSC0 - old FPPS CLAIM ID ; FBFPPSC1 - new FPPS CLAIM ID ; FBDA1 - invoice (internal entry number) ; Result ; Prescriptions on invoice may be updated (FPPS LINE ITEM)
DSPLIL(FBDA1,FBDA)	; Display Invoice Line (Rx) ; input ; FBDA1 - invoice ien ; FBDA - prescription ien

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"EDI Claim from FPPS was changed. Updating each Rx on invoice..." Line Location: CKINVEDI+25
Function Call: WRITE	Prompt: !,"Since EDI Claim from FPPS was changed from NO to YES, the" Line Location: CKINVEDI+27
Function Call: WRITE	Prompt: !,"FPPS LINE ITEM must be entered for each Rx on the invoice." Line Location: CKINVEDI+28
Function Call: WRITE	Prompt: !,"Finished updating FPPS LINE ITEM on each Rx.",! Line Location: CKINVEDI+37
Function Call: WRITE	Prompt: !!,"Patient: ",FBPATN," Patient ID: ",FBPID Line Location: DSPLIL+14
Function Call: WRITE	Prompt: !,"Drug Name",?32," RX # "," Strength "," Qty"," Amt Claimed ",!,$$REPEAT^XLFSTR("-",78) Line Location: DSPLIL+15
Function Call: WRITE	Prompt: !,FBDRUG,?34,FBRX,?43,FBSTR,?54,FBQTY,?63,FBAC Line Location: DSPLIL+16