| DFN |
Input |
Patient ien in file #2. This is required.
|
IBADT |
Input |
Date of Service in Fileman format. Defaults to today
if not passed in.
|
IBINS |
Output |
This is the name of destination or target array.
Pass by reference in order to return the contents of the array data.
IBINS = total number of Rx ins policies returned
IBINS("S",COB seq#,pt ins sub-file ien)=""
IBINS(pt ins sub-file ien,0) = ^DPT(DFN,.312,pt ins sub-file ien,0)
IBINS(pt ins sub-file ien,1) = ^DPT(DFN,.312,pt ins sub-file ien,1)
IBINS(pt ins sub-file ien,2) = ^DPT(DFN,.312,pt ins sub-file ien,2)
IBINS(pt ins sub-file ien,3) = ^DPT(DFN,.312,pt ins sub-file ien,3)
IBINS(pt ins sub-file ien,4) = ^DPT(DFN,.312,pt ins sub-file ien,4)
IBINS(pt ins sub-file ien,5) = ^DPT(DFN,.312,pt ins sub-file ien,5)
IBINS(pt ins sub-file ien,355.3) = ^IBA(355.3,plan ien,0)
The pt ins sub-file ien is the internal entry number of the INSURANCE TYPE
sub-file (#2.312) of the PATIENT file (#2).
|