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  | 
 
  |