VPRDJ ;SLC/MKB -- Serve VistA data as JSON via RPC ;10/18/12 6:26pm
Source file <VPRDJ.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| GET(VPR,FILTER) | ; -- Return search results as JSON in @VPR@(n)
 ; RPC = VPR GET PATIENT DATA JSON ; where FILTER("patientId") = DFN or DFN;ICN ; FILTER("domain") = name of desired data type (see VPRDJ0) ; FILTER("text") = boolean, to include document text [opt] ; FILTER("start") = start date.time of search [opt] ; FILTER("stop") = stop date.time of search [opt] ; FILTER("max") = maximum number of items to return [opt] ; FILTER("id") = single item id to return [opt] ; FILTER("uid") = single record uid to return [opt] ; FILTER("nowrap") = include line breaks in comments [opt]  | 
 
 
 
  | 
| GTQ | ; add item count and terminating characters
 | 
|
| SEPUID(FILTER) | ; -- separate uid into FILTER pieces
 | 
|
| SYS() | ; -- return system info for JSON header
 | 
|
| TAG(X) | ; -- Return linetag in VPRDJ0 routine for clinical domain X
 | 
|
| ALL() | ; -- return string for all types of data
 | 
|
| ERR(X,VAL) | ; -- return error message
 | 
|
| HL7NOW() | ; -- Return current time in HL7 format
 | 
|
| ADD(ITEM,COLL) | ; -- add ITEM to results
 | 
|
| TEST(DFN,TYPE,ID,TEXT,IN) | ; -- test GET, write results to screen
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| RPC Name | Call Tags | 
|---|---|
| VPR GET PATIENT DATA JSON | GET |