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

Package: Integrated Billing

Routine: IBEFUNC3


Information

IBEFUNC3 ;ALB/ARH - EXTRINSIC FUNCTIONS ;26-FEB-02

Source Information

Source file <IBEFUNC3.m>

Entry Points

Name Comments DBIA/ICR reference
BDSRC(IBVIFN) ; Check if billable Visit Data Source (9000010,81203)
; only 'PROSTHETICS DATA' is non-billable (patch IB*2*174) (these are item, not visits)
; Input: IBVIFN pointer to Visit (9000010)
; Returns: true if Billable Data Source
VALNDC(IBIFN,IBDFN,IBRXARY) ; NDC validation between file 362.4 and 52
; IB*2*363 - NDC from file 352.4 can become out-of-synch with the latest
; NDC# stored in the PRESCRIPTION file (#52) as the NDC can change after
; the bill has been entered. This algorithm compares the NDC# between
; the 2 files and returns a value which represents whether the NDC# values
; are the same or not the same.
; input - IBIFN = internal entry number of BILL/CLAIMS file (#399)
; IBDFN = internal entry number of PATIENT file (#2) associated with the billing record
; output - IBRXARY = array (passed in by reference) representing the collection of Rx records
; that have different NDC#S between IB and OP files.
; IBARRAY = array containing values returned from the entry in file 362.4
; IBDA = internal entry number of the entry in file 362.4
; IBRXDA = pointer to entry in the PRESCRIPTION file (#52) associated with billing record
; IBDATE = Fill/refill date taken from entry in 362.4
; IBNDC = National Drug Code (NDC) number taken from entry in 362.4
; IB52NDC = NDC number taken from entry in file 52 associated with the billing record
GETNDC(IBDFN,IBRXIEN,IBDT) ; get NDC# associated with fill/refill in file 52
; Approved usage of $$GETNDC^PSONDCUT function (IA 4705)
; Input - IBDFN = internal entry number of PATIENT file (#2) associated with the billing record
; IBRXIEN = internal entry number of PRESCRIPTION file (#50) associated with the
; billing record
; IBDT = Fill/refill date taken from entry in 362.4
; Output - IBRXNDC = NDC number taken from sub-entry of REFILL multiple of file 52 associated
; with the billing record
; ; IB52DT = Fill/refill date taken from top entry or refill multiple of 52

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(362.4 - [#362.4] GETS^DIQ
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call