XUAF4 ;ISC-SF/RWF/RAM - Institution file access. ;12/03/2019 08:07
Source file <XUAF4.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PARENT(ROOT,CHILD,ASSO) | ;sr. Return array of IEN's of parents
|
|
| CHILDREN(ROOT,PAR,ASSO,XUAC) | ;sr. Return the children
|
|
| SIBLING(ROOT,CHILD,ASSO) | ;sr. Return the siblings
|
|
| NNT(%) | ;ef.sr. Return Name, Station Number, ASSO
|
|
| LKUP(%) | ;ef.sr. Resolve a value into IEN
|
|
| STATUS(%) | ;Get the status of a IEN
|
|
| TYPE(%) | ;Lookup a Faclity TYPE in file 4.1
|
|
| ASSO(%) | ;Lookup an Asso
|
|
| NS(IEN) | ;ef.sr. Return name and station #
|
|
| WHAT(IEN,FLD) | ;ef.sr. Field to return
|
|
| CIRN(%1,%2) | ;ef.sr. Is this a CIRN Enables inst.
|
|
| IEN(STA) | ;return IEN for a station number
|
|
| STA(IEN) | ;return station number for an IEN
|
|
| TF(IEN) | ;active treating facility? (1=YES,0=NO)
|
|
| RT(IEN) | ;realigned to
|
|
| RF(IEN) | ;realigned from
|
|
| O99(IEN) | ;returns pointer to new station number IEN
|
|
| LEGACY(STA) | ; -- legacy station number (1=yes; 0=no)
|
|
| PRNT(STA) | ; -- parent facility
|
|
| NAME(IEN) | ; -- Official Name
|
|
| ACTIVE(IEN) | ; -- active facility (1=active, 0=inactive)
|
|
| PADD(IEN) | ; -- physical address (street addr^city^state^zip)
|
|
| HPADD(IEN,XUEDT) | ; -- historical physical address based on effective date
|
|
| MADD(IEN) | ; -- mailing address (street addr^city^state^zip)
|
|
| F4(STA,ARRAY,FLAG,ONDT) | ;File #4 multipurpose API
|
|
| IDT(IEN) | ; inactive date
|
|
| SCRN() | ;sreen IEN
|
|
| LOOKUP | ; -- lookup an enty by coding system / ID pair
|
|
| IDX(CDSYS,ID) | ; -- return IEN for a given coding system / ID pair
|
|
| ID(CDSYS,IEN) | ; returns the ID for a given coding system / IEN
|
|
| CDSYS(Y) | ; coding systems
|
|
| LCDSYS(Y) | ; list coding systems
|
|
| BNIEN(IEN) | ; -- Billing Facility Name - Internal Entry Number
|
|
| BNSTA(STA) | ; -- Billing Facility Name - Station Number
|
|
| CERNER(STA) | ; Check if a facility has been converted to CERNER
; Take in STA = Station number ; Return -1 for invalid station number ; Return 1 for CERNER station |
|