DGRRPSGT ; ALB/SGG - DG R&R PatientServices GET data - return XML ; 09/30/03
Source file <DGRRPSGT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DOC | ;
; ================================================================== ; Documentation for the DGRRPS* routines is in DGRRPSAA. ; ================================================================== ; This routine is called from the RPC DGRR GET PATIENT SERVICES DATA ; ================================================================== |
|
| PATIENT(RESULT,PARAMS) | ;
|
|
| BUILD | ; BUILD THE PATIENT XML
|
|
| EXIT | ||
| APPEND(PSARRAY) | ;
; Append PSARRAY(1...n)= TextOnly ^ XML_attribute ^ ValueOfAttribute ^ FileNowFlag ; In some code there are 5th and 6th pieces to this,, they are not used,, it was the start of a receiver/parser that was never needed |
|
| INITIZE | ; Initialize variables
|
|
| INTRACE | ; Keep a record of what has been requested
|
|
| GETPATID(ICN,PTID,ERRMESS) | ; Get patient PTID and ICN
|
|
| GETGLOBS | ; Get required DPT globals
|
|
| GETNME(PTID) | ; return patient name components
|
|
| OUTTRACE | ; Keep a record of what has been put out
|
|
| PURGE | ; Purge trace > 31 days and >10,000 records
|
|
| ERROR | ; Build an Error XML and quit
|
| RPC Name | Call Tags |
|---|---|
| DGRR GET PATIENT SERVICES DATA | PATIENT |
