FBAAVR3 ;WOIFO/SAB - FINALIZE BATCH (CONT) ;4/10/2012
Source file <FBAAVR3.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 2 | $$GET1^DIQ ^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 |
---|---|---|
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 |