Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: IBECUSMU

Package: Integrated Billing

Routine: IBECUSMU


Information

IBECUSMU ;ALB/CPM - PHARMACY BILLING OPTION UTILITIES ; 12-DEC-96

Source Information

Source file <IBECUSMU.m>

Entry Points

Name Comments DBIA/ICR reference
FINDC(IBIN,IBW,IBOUT) ; Find transactions which can be cancelled.
; Input: IBIN -- Array of transactions, passed by reference
; IBW -- 1 => Write reject statements
; 2 => No writes
; Output: IBOUT -- Array of transactions which can be cancelled
FINDB(IBRX,IBW,IBOUT) ; Find prescriptions which can be billed.
; Input: IBRX -- Pointer to the prescription in file #52
; IBW -- 1 => Write reject statements
; 2 => No writes
; Output: IBOUT -- Array of transactions which can be billed
SEL(IBARR) ; Select a fill for a prescription.
; Input: IBARR -- Array of prescriptions passed by reference.
; Output: IBNUM -- One of the fill numbers, or -1 (none selected)
SELQ

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," The claim for ",$S($P(IBKEY,";",2):"refill #"_$P(IBKEY,";",2),1:"the original fill")," for this prescription was rejected."
  • Line Location: FINDC+20
Function Call: WRITE
  • Prompt: !!," The previous cancellation for ",$S($P(IBKEY,";",2):"refill #"_$P(IBKEY,";",2),1:"the original fill")," was rejected."
  • Line Location: FINDB+32
Info |  Source |  Entry Points |  Interaction Calls