IBECUSMU ;ALB/CPM - PHARMACY BILLING OPTION UTILITIES ; 12-DEC-96
Source file <IBECUSMU.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 2 | $$DAT1^IBOUTL ($$FILE,$$SUBFILE)^IBRXUTL |
| Outpatient Pharmacy | 1 | RX^PSO52API |
| VA FileMan | 1 | ^DIR |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| 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 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBA(351.5 - [#351.5] | FINDC+9, FINDB+10, FINDB+15, FINDB+22 |
| ^TMP($J | FINDB+13, FINDB+17! |
| Name | Line Occurrences |
|---|---|
| SELQ | SEL+13, SEL+16 |
| Name | Field # of Occurrence |
|---|---|
| ^(6 | FINDC+9, FINDB+22 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIR | SEL+4~ |
| DIR("A" | SEL+15* |
| DIR(0 | SEL+15* |
| DIROUT | SEL+4~, SEL+16 |
| DIRUT | SEL+4~ |
| DTOUT | SEL+4~, SEL+16 |
| DUOUT | SEL+4~, SEL+16 |
| IBARR | FINDB+6~, SEL~ |
| IBARR( | FINDB+10*, FINDB+15*, FINDB+18, FINDB+19, SEL+8 |
| IBCHTRN | FINDC+6~, FINDC+8*, FINDC+9, FINDC+14, FINDB+6~, FINDB+19*, FINDB+20, FINDB+22, FINDB+26 |
| IBCHTRN5 | FINDC+6~, FINDC+9*, FINDC+14, FINDC+20, FINDB+6~, FINDB+22*, FINDB+26 |
| IBCHTRN6 | FINDC+6~, FINDC+9*, FINDC+14, FINDB+6~, FINDB+22*, FINDB+26, FINDB+32 |
| IBFILL | SEL+4~, SEL+10*, SEL+11 |
| IBIN | FINDC~ |
| IBIN( | FINDC+7, FINDC+8 |
| IBKEY | FINDC+6~, FINDC+7*, FINDC+8, FINDC+14, FINDC+20, FINDC+23, FINDB+6~, FINDB+18*, FINDB+19, FINDB+20 , FINDB+26, FINDB+32, FINDB+35, SEL+4~, SEL+7*, SEL+8*, SEL+9 |
| IBNUM | SEL+4~, SEL+7*, SEL+18*, SELQ |
| IBOUT | FINDC~, FINDB~ |
| IBOUT( | FINDC+14*, FINDB+20*, FINDB+26* |
| IBREF | FINDB+6~, FINDB+11*, FINDB+13*, FINDB+14, FINDB+15, SEL+4~, SEL+9*, SEL+10, SEL+11 |
| IBREF1 | FINDB+6~ |
| IBRX | FINDB~, FINDB+10, FINDB+12, FINDB+13, FINDB+15, SEL+4~, SEL+9*, SEL+10 |
| IBSTR | SEL+4~, SEL+7*, SEL+11*, SEL+13, SEL+15 |
| IBW | FINDC~, FINDC+17, FINDB~, FINDB+29 |
| LIST | FINDB+6~, FINDB+7*, FINDB+12, FINDB+13, FINDB+17 |
| >> Y | SEL+18 |