XUMF ;OIFO-OAK/RAM - XUMF API's;04/15/02
Source file <XUMF.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| IEN(IFN,CDSYS,ID) | ; -- Internal Entry Number
|
|
| FLD(FILE,FIELD) | ; field
|
|
| LBL(FILE,FIELD) | ; field label
|
|
| TYP(FILE,FIELD) | ; field type
|
|
| PTR(FILE,FIELD) | ; pointer field?
|
|
| FIELD(FILE,FIELD,ATT) | ; field attributes
|
|
| FILE(FILE,ATT) | ; file attributes
|
|
| ECHO(FILE,IDX,X,XUMF) | ; validate field exists and echo name
|
|
| F(XUMF) | ; constrain edits to standard values
|
|
| PKV(IFN,IEN,HLCS) | ; Primary Key Value - MFE.4
|
|
| MFE(IFN,PKV,HLCS,IEN,ERROR) | ; -- update
|
|
| MFP(IFN,ERR) | ; -- validate Master File Parameters entry FALSE=valid
|
|
| ZERO(IFN,ERR) | ; -- zero node
|
|
| MFE1(IFN,ERR) | ; -- MFE node
|
|
| SEQ(IFN,ERR) | ; -- sequence nodes
|
|
| BG(IFN,IEN,TYP) | ; -- background job
|
|
| BG1 | ; -- get file
|
|
| LOAD(IFN) | ; -- query and file
|
|
| ARRAY(IFN) | ; -- query and put in array
|
|
| GETCE(IFN,IEN,TYP,ERROR) | ; -- get master file provide coded element
|
|
| MFS(IFN,IEN,TYP,ERROR) | ; -- get file from Master File Server
|
|
| EXIT | ; -- cleanup and quit
|
|
| NPI | ; -- NPI
|
|
| CDSYS(CDSYS,ID,IEN) | ; udpate coding system / ID
|
