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