VPRUTILS ;SLC/AGP -- VPR utilities routine ;8/14/13 11:22
Source file <VPRUTILS.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SETERROR(RESULT,ERROR,EXTERROR,DATA) | ; -- error text for JSON
 | 
|
| SETERRTX(TEMP,ERROR) | ;
 | 
|
| SETTEXT(X,VALUE) | ; -- format word processing
 | 
|
| SPLITVAL(NODE,ARRAY) | ; -- split a value into a list
 | 
|
| SETPROV(NODE,PROV) | ; -- providers
 | 
|
| SETUID(DOMAIN,PAT,ID,ADDDATA) | ; -- create uid string
 | 
|
| SETFCURN(DOMAIN,FACILITY,VALUE) | ; -- create facility urn
 | 
|
| SETVURN(DOMAIN,VALUE) | ; -- create VA urn
 | 
|
| SYS() | ; -- return hashed system name
 | 
|
| SETNCS(CODESET,VALUE) | ; -- create national codeset urn
 | 
|
| JSONDT(X) | ; -- convert FileMan DT to HL7 DT for JSON
 | 
|
| FACILITY(X,Y) | ; -- add facility info to array for JSON
 ; X=STATION NUMBER^STATION NAME ; Y=Variable array name ; >D FACILITY^VPRUTILS("500^CAMP MASTER","LAB")  |