©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
PXRRPAD ;ISL/PKR,ALB/Zoltan - Driver for PCE Patient Activity Reports.;9/22/98
Source file <PXRRPAD.m>
| Package | Total | Caller Graph |
|---|---|---|
| PCE Patient Care Encounter | 1 | PXRR PATIENT ACTIVITY BY LOC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NEWPAGE | ;See if the user wants each location to start a new page.
|
|
| APDR | ;Get the appointment date range.
|
|
| FUTDR | ;Get the future appointment date range.
|
|
| SAVE | ;Save the variables for queing.
|
|
| LOC | ;Get the location list.
|
|
| EXIT | ;
|
|
| FAC | ;Get the facility list.
|
|
| ACDR | ;Get the activity date range.
|
|
| MAIN | ;
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZIS | FUTDR+15 |
| FDR^PXRRADUT | FUTDR+8 |
| GDR^PXRRADUT | APDR+16 |
| PDR^PXRRADUT | ACDR+17 |
| EXIT^PXRRGUT | EXIT+1 |
| FACILITY^PXRRLCSC | FAC+2 |
| LOC^PXRRLCSC | LOC+2 |
| NEWPAGE^PXRRLCSC | NEWPAGE+4 |
| SORT^PXRRPASA | FUTDR+39 |
| $$QUE^PXRRQUE | FUTDR+26, FUTDR+32, FUTDR+38 |
| $$PXRRXTMP^PXRRWLD | MAIN+2 |
| $$FMADD^XLFDT | MAIN+3 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^XTMP( | MAIN+3*, FUTDR+26*, FUTDR+32*, FUTDR+38* |
| Name | Line Occurrences |
|---|---|
| ACDR | FUTDR+10 |
| APDR | ACDR+19 |
| EXIT | FAC+3, LOC+3, NEWPAGE+5, APDR+17, ACDR+18, FUTDR+9, FUTDR+16 |
| FAC | LOC+4 |
| LOC | NEWPAGE+6 |
| NEWPAGE | APDR+18 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %ZIS | FUTDR+13* |
| BHT | APDR+1~, APDR+16, ACDR+2!, ACDR+17, FUTDR+2!, FUTDR+8 |
| BHT(1 | APDR+2*, ACDR+3*, FUTDR+3* |
| BHT(2 | APDR+3*, APDR+10, ACDR+4*, FUTDR+4* |
| BHT(3 | APDR+4*, APDR+11, ACDR+5*, FUTDR+5* |
| BHT(4 | APDR+5*, APDR+12, ACDR+6* |
| BHT(5 | APDR+6*, APDR+13, ACDR+7* |
| BHT(6 | APDR+7*, APDR+14, ACDR+8* |
| BHT(7 | APDR+8*, APDR+15, ACDR+9* |
| DESC | FUTDR+22~, FUTDR+23*, FUTDR+26, FUTDR+28*, FUTDR+32, FUTDR+34*, FUTDR+38 |
| DT | MAIN+3 |
| >> DTOUT | FAC+3, LOC+3, NEWPAGE+5, APDR+17, ACDR+18, FUTDR+9 |
| >> DUOUT | FAC+3, LOC+4, NEWPAGE+6, APDR+18, ACDR+19, FUTDR+10 |
| EHT | APDR+1~, APDR+16, ACDR+2!, ACDR+17, FUTDR+2!, FUTDR+8 |
| EHT(1 | APDR+9*, ACDR+10*, FUTDR+6* |
| EHT(2 | APDR+10*, ACDR+11*, FUTDR+7* |
| EHT(3 | APDR+11*, ACDR+12* |
| EHT(4 | APDR+12*, ACDR+13* |
| EHT(5 | APDR+13*, ACDR+14* |
| EHT(6 | APDR+14*, ACDR+15* |
| EHT(7 | APDR+15*, ACDR+16* |
| IO("Q" | FUTDR+18 |
| IODEV | FUTDR+22~, FUTDR+24*, FUTDR+26, FUTDR+29*, FUTDR+32, FUTDR+35*, FUTDR+38 |
| IOM | FUTDR+17 |
| ION | FUTDR+17 |
| IOSL | FUTDR+17 |
| IOST | FUTDR+17 |
| NCS | LOC+1~, NEWPAGE+3 |
| NFAC | FAC+1~ |
| NHL | LOC+1~, NEWPAGE+3 |
| >> POP | FUTDR+16 |
| PXRRBADT | APDR+1~, APDR+16 |
| PXRRBCDT | ACDR+1~, ACDR+17 |
| PXRRBFDT | FUTDR+1~, FUTDR+8 |
| PXRRCS | LOC+1~ |
| PXRREADT | APDR+1~, APDR+16 |
| PXRRECDT | ACDR+1~, ACDR+17 |
| PXRREFDT | FUTDR+1~, FUTDR+8 |
| PXRRFAC | FAC+1~ |
| PXRRFACN | FAC+1~ |
| PXRRIOD | MAIN+1~, FUTDR+17*, FUTDR+35 |
| PXRRLCHL | LOC+1~ |
| PXRRLCNP | NEWPAGE+1~, NEWPAGE+2* |
| PXRRLCSC | LOC+1~, NEWPAGE+3 |
| PXRROPT | MAIN+1~ |
| PXRRPAJB | MAIN+1~ |
| PXRRPAST | MAIN+1~ |
| PXRRQUE | MAIN+1~, FUTDR+18*, FUTDR+20 |
| PXRRXTMP | MAIN+1~, MAIN+2*, MAIN+3, FUTDR+26, FUTDR+32, FUTDR+38 |
| ROUTINE | FUTDR+22~, FUTDR+25*, FUTDR+26, FUTDR+30*, FUTDR+32, FUTDR+36*, FUTDR+38 |
| U | MAIN+3, NEWPAGE+3 |
| >> ZTDTH | FUTDR+31*, FUTDR+37* |
| >> ZTSAVE("NCS" | SAVE+4* |
| >> ZTSAVE("NFAC" | SAVE+5* |
| >> ZTSAVE("NHL" | SAVE+8* |
| >> ZTSAVE("PXRRBADT" | SAVE+1* |
| >> ZTSAVE("PXRRBCDT" | SAVE+2* |
| >> ZTSAVE("PXRRBFDT" | SAVE+3* |
| >> ZTSAVE("PXRRCS(" | SAVE+4* |
| >> ZTSAVE("PXRREADT" | SAVE+1* |
| >> ZTSAVE("PXRRECDT" | SAVE+2* |
| >> ZTSAVE("PXRREFDT" | SAVE+3* |
| >> ZTSAVE("PXRRFAC(" | SAVE+5* |
| >> ZTSAVE("PXRRFACN(" | SAVE+6* |
| >> ZTSAVE("PXRRIOD" | SAVE+7* |
| >> ZTSAVE("PXRRLCHL(" | SAVE+8* |
| >> ZTSAVE("PXRRLCNP" | SAVE+9* |
| >> ZTSAVE("PXRRLCSC" | SAVE+10* |
| >> ZTSAVE("PXRRQUE" | SAVE+11* |
| >> ZTSAVE("PXRRXTMP" | SAVE+12* |