IBCNBES ;ALB/ARH-Ins Buffer: stuff new entries/data into buffer ;1 Jun 97
Source file <IBCNBES.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADDSTF(IBSOURCE,DFN,IBDATA) | ; add new entry to Insurance Buffer file (355.33) and stuff the data passed in, no user interaction
; IBSOURCE = source of information (required) ; 1 = interview 2 = data match ; 3 = ivm 4 = pre-registration ; 5 = eIV etc., refer to file #365.12 for full list of sources ;IB*743/CKB ; DFN = patient's ifn in file 2 (required) ; IBDATA = data to file in Buffer in an array subscripted by field number of the data field in 355.33 ; ex: IBDATA(20.01)="Insurance Company Name", etc, ; returns ien of new entry or 0 followed by error if entry not added |
|
| EXIT | ||
| EDITSTF(IBBUFDA,IBDATA) | ; loop though data array and stuff each buffer field, no user interaction
|
|
| FLDCHK(FILE,FIELD,VALUE) | ; minor checks on data: truncate if length too long, if pointer add ' so can be processed as external format
|
|
| FLDCHKQ |
