FBAAVR3 ;WOIFO/SAB - FINALIZE BATCH (CONT) ;4/10/2012
Source file <FBAAVR3.m>
| 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 |
|---|---|---|
| CHKSPLT | ; check for split invoices for batch
; input FBN - batch IEN (file 161.7), must be type B3 ; output FBLNLST(FBIENS) - array of line items still in batch for ; split invoices |
|
| LSTSPIN(FBN,FBINLST) | ; build list of split invoices for a batch
; input ; FBN - batch IEN file 161.7. must be type B3 ; FBINLST - array, passed by reference ; output ; FBLST - initialized and updated ; FBINLST(FBIN)="" ; where FBIN is an invoice number ; note: FBINLST will not be defined if batch is empty |
|
| LSTLN(FBN,FBINLST,FBLNLST) | ; build list of line items
; input ; FBN - batch IEN file 161.7. must be type B3 ; FBINLST - array of invoices, passed by reference ; FBINLST(FBIN) ; where FBIN is an invoice number ; FBLNLST - array of line items, passed by reference ; output ; FBINLST - array of invoices, passed by reference ; will be updated by adding the following node ; FBINLST(FBIN,FBDFN)=patient name^line item count ; where FBDFN is the patient IEN (file 161 & file 2) ; FBLNLST - array of line items, passed by reference ; FBLNLST(FBIENS)="" ; where FBIENS is the IENS for a line item, ; FileMan DBS format ; this array will contain a list of line items still in ; input batch FBN for the invoices in input array FBINLST ; Note: array is initialized and will not be defined ; if there are no line items |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^FBAAA - [#161] | GET1^DIQ |
| 162.03 | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^FBAAC("AH" | LSTSPIN+15, LSTSPIN+17, LSTSPIN+19, LSTSPIN+21 |
| ^FBAAC("AJ" | LSTSPIN+25, LSTLN+29, LSTLN+32, LSTLN+34, LSTLN+35 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIR | CHKSPLT+4~ |
| DIR("A" | CHKSPLT+17* |
| DIR("B" | CHKSPLT+18* |
| DIR(0 | CHKSPLT+17* |
| DIROUT | CHKSPLT+4~ |
| DIRUT | CHKSPLT+4~, CHKSPLT+19 |
| DTOUT | CHKSPLT+4~ |
| FBC | LSTLN+21~, LSTLN+30*, LSTLN+39*, LSTLN+42 |
| FBDA | LSTSPIN+10~, LSTSPIN+20*, LSTSPIN+21*, LSTSPIN+22, LSTLN+21~, LSTLN+35*, LSTLN+37 |
| FBDA(1 | LSTSPIN+18*, LSTSPIN+19*, LSTSPIN+21, LSTSPIN+22, LSTLN+33*, LSTLN+34*, LSTLN+35, LSTLN+37 |
| FBDA(2 | LSTSPIN+16*, LSTSPIN+17*, LSTSPIN+19, LSTSPIN+21, LSTSPIN+22, LSTLN+31*, LSTLN+32*, LSTLN+34, LSTLN+35, LSTLN+37 |
| FBDA(3 | LSTSPIN+15*, LSTSPIN+17, LSTSPIN+19, LSTSPIN+21, LSTSPIN+22, LSTLN+28*, LSTLN+29*, LSTLN+32, LSTLN+34, LSTLN+35 , LSTLN+37, LSTLN+42 |
| FBDFN | CHKSPLT+22~, CHKSPLT+26*, CHKSPLT+27 |
| FBIENS | LSTSPIN+10~, LSTSPIN+22*, LSTSPIN+23 |
| FBIN | CHKSPLT+22~, CHKSPLT+24*, CHKSPLT+25, CHKSPLT+26, CHKSPLT+27, LSTSPIN+10~, LSTSPIN+23*, LSTSPIN+24, LSTSPIN+25, LSTSPIN+26 , LSTLN+21~, LSTLN+26*, LSTLN+29, LSTLN+32, LSTLN+34, LSTLN+35, LSTLN+42 |
| FBINLST | CHKSPLT+4~, CHKSPLT+7, CHKSPLT+9, CHKSPLT+11, LSTSPIN~, LSTSPIN+11!, LSTLN~ |
| FBINLST( | CHKSPLT+24, CHKSPLT+26, CHKSPLT+27, LSTSPIN+26*, LSTLN+26, LSTLN+42* |
| FBLNLST | CHKSPLT+9, LSTLN~, LSTLN+22! |
| FBLNLST( | LSTLN+37* |
| FBN | CHKSPLT+7, CHKSPLT+9, LSTSPIN~, LSTSPIN+12, LSTSPIN+15, LSTSPIN+17, LSTSPIN+19, LSTSPIN+21, LSTSPIN+25, LSTLN~ , LSTLN+23, LSTLN+29, LSTLN+32, LSTLN+34, LSTLN+35 |
| FBX | CHKSPLT+22~, CHKSPLT+27*, CHKSPLT+28 |
| X | CHKSPLT+4~ |
| Y | CHKSPLT+4~, CHKSPLT+21 |