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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: FBAAVR3

Package: Fee Basis

Routine: FBAAVR3


Information

FBAAVR3 ;WOIFO/SAB - FINALIZE BATCH (CONT) ;4/10/2012

Source Information

Source file <FBAAVR3.m>

Entry Points

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This batch contains split invoice(s)."
  • Line Location: CHKSPLT+12
Function Call: WRITE
  • Prompt: !," An invoice is split when some lines on invoice are flagged as"
  • Line Location: CHKSPLT+13
Function Call: WRITE
  • Prompt: !," rejected and other lines are not flagged as rejected."
  • Line Location: CHKSPLT+14
Function Call: WRITE
  • Prompt: !," Current policy is to keep all invoice lines together."
  • Line Location: CHKSPLT+15
Function Call: WRITE
  • Prompt: !," Invoice ",FBIN," is split"
  • Line Location: CHKSPLT+25
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKSPLT+30

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAAA - [#161] GET1^DIQ
162.03 GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call