IBCEFP ;ALB/TAZ - Provider ID functions ;28-OCT-10
Source file <IBCEFP.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ALLIDS(IBIFN,IBXSAVE,IBSTRIP,SEG) | ; Return all of the Provider IDS
|
|
| ALLIDSQ | ;
|
|
| PSID(IBIFN,IBXPROV,IBXIDS) | ; Build array of either the Fac/Lab ID or Rendering Provider IDs
|
|
| PSIDQ | ;
|
|
| SLPRV(IBXIEN,IBX,PRTYPE) | ;Build SLPRV nodes for the line provider type record
|
|
| SLPRVQ | ;
|
|
| PROVIDER(IB399,IBPROV,IBRES,IBFRMTYP,IBCARE,IBCURR,IBXDATA) | ;
|
|
| PROVINF(IB399,IBPRNUM,IBRES,IBSORT,IBINSTP,IBFRMTYP,IBCARE,IBLIMIT,IBCURR,IBXDATA) | ;
|
|
| PROVINFQ | ;Exit PROVINF
|
|
| GETPRV(IBINSCO,IBFRMTYP,IBCARE,IBPROV,IBRES,IBPRTYP,IBINSTP,IBD) | ;
|
|
| GETPRVQ | ;
|
|
| PROVPTR(IBIEN399,IBFUNC,IBCP) | ; Retrieve Provider Pointer from appropriate file
|
|
| AMB(IBXIEN,IBXSAVE) | ; Gather Ambulance Data for AMB Record(s) - IB*2.0*447/TAZ
|
|
| SNDS2(IBXDATA,PIECE) | ;Determine if a SUB2 record is necessary.
; Input: IBXDATA ; May contain data from field 232 of file 399. ; Output: IBXDATA ; Returns Output for piece 2 or 3 or 1 for any other piece (like 1.5) |
