DGRRPSXX ; ALB/SGG - DGRR patient services - TEST MUMPS SIDE COMPONENTS ; Compiled December 9, 2003 15:38:25
Source file <DGRRPSXX.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DOC | ; This routine is ======== FOR TESTING PURPOSES ONLY =========
; ; It can be called to print out an XML doc from the mumps database ; for one patient record by inputing that patients DFN ; eg D TEST^DGRRPSXX("DFN",dfn#,,) ; or to get the XML from a patient ICN ; eg D TEST^DGRRPSXX("ICN",icn#,,) |
|
| TEST(TYPE,NUM,ALLICN,ALLDFN,REQDT) | ;
; TYPE DFN OR ICN ; NUM DFN# OR ICN# |
|
| APPLY | ;
|
|
| VIEWLAST(TRACENO) | ; ENTER(-1) TO GET THE ONE BEFORE LAST
|
|
| TESTERR | ; test error
|
