©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
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#,,) |
|
| VIEWLAST(TRACENO) | ; ENTER(-1) TO GET THE ONE BEFORE LAST
|
|
| APPLY | ;
|
|
| TESTERR | ; test error
|
|
| TEST(TYPE,NUM,ALLICN,ALLDFN,REQDT) | ;
; TYPE DFN OR ICN ; NUM DFN# OR ICN# |
| Name | Field # of Occurrence |
|---|---|
| PATIENT^DGRRPSGT | APPLY+14, TESTERR+5 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | TEST+23 |
| ^DPT("AICN" | TEST+18 |
| ^XTMP("DGRRPS" | VIEWLAST+2, VIEWLAST+3, VIEWLAST+6, VIEWLAST+7, VIEWLAST+9, VIEWLAST+10 |
| Name | Line Occurrences |
|---|---|
| APPLY | TEST+16, TEST+21, TEST+26 |
| VIEWLAST | APPLY+15, TESTERR+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ALLDFN | TEST~, TEST+8, TEST+23 |
| ALLICN | TEST~, TEST+8, TEST+18 |
| DFN | TEST+23~*, TEST+24 |
| DFNALL | TEST+6~ |
| I | VIEWLAST+1~, VIEWLAST+6*, VIEWLAST+7, VIEWLAST+9*, VIEWLAST+10 |
| ICN | TEST+18~*, TEST+19 |
| ICNALL | TEST+6~ |
| NUM | TEST~, TEST+10, TEST+12 |
| PARAMS | TEST+6~, APPLY+14, TESTERR+5 |
| PARAMS("ADTInfo" | APPLY+10* |
| PARAMS("ConfidentialAddress" | APPLY+8*, TESTERR+4* |
| PARAMS("ContactInfo" | APPLY+9* |
| PARAMS("EnrollEligibility" | APPLY+11* |
| PARAMS("Incompetent" | APPLY+12* |
| PARAMS("MainAddress" | APPLY+6* |
| PARAMS("PatientId" | TEST+10*, TEST+15*, TEST+19*, TEST+24*, TESTERR+2* |
| PARAMS("PatientId_Type" | TEST+9*, TEST+14*, TEST+20*, TEST+25*, TESTERR+1* |
| PARAMS("PrimaryDemo" | APPLY+3* |
| PARAMS("REQUESTED_DATE" | TEST+11* |
| PARAMS("SecondaryDemo" | APPLY+4* |
| PARAMS("TemporaryAddress" | APPLY+7*, TESTERR+3* |
| PARAMS("TertiaryDemo" | APPLY+5* |
| PARAMS("UserId" | APPLY+1* |
| PARAMS("UserInstitution" | APPLY+2* |
| PTID | TEST+6~ |
| REQDT | TEST~, TEST+11 |
| RESULT | APPLY+13~, APPLY+14, TESTERR+5 |
| TRACENO | VIEWLAST~, VIEWLAST+2*, VIEWLAST+3*, VIEWLAST+4, VIEWLAST+6, VIEWLAST+7, VIEWLAST+9, VIEWLAST+10, VIEWLAST+11 |
| TYPE | TEST~, TEST+9, TEST+12 |