©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
DG1010P ;ALB/JDS;REW - 1010 PRINT--INQUIRY PATIENT ; 1/3/05 6:18pm
Source file <DG1010P.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | (NOW,YX)^%DTC ^DIC $$GET1^DIQ ^DIR |
| Registration | 3 | ($$PROMPRN,NOREG)^DG1010PA RET^DGBLRV (CLOSE,ZIS)^DGUTQ |
| Enrollment Application System | 1 | ($$ENEZ,$$ENEZR,EN)^EASEZPDG |
| Health Summary | 1 | ENXQ^GMTSDVR |
| Kernel | 1 | ^%ZISC |
| Outpatient Pharmacy | 1 | DFN^PSOSD1 |
| Package | Total | Caller Graph |
|---|---|---|
| Registration | 6 | DG REGISTRATION 10/10 REPRINT DG1010PA DGEN1 DGMTE DGMTSCC DGREG00 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RESTORE | ||
| EN | ;
|
|
| QU | ;
|
|
| EMB | ;emboss card?
|
|
| SEL1010(PROMPT) | ;* Prompt user to select the 1010EZ to print
|
|
| EZRPRMPT() | ;* Prompt for 1010EZR print
; OUTPUT - ; RPTSEL : -1 REPORT NOT SELECTED ; RPTSEL : -2 USER EXITED WITHOUT RESPONSE ; RPTSEL : 0 USER ANSWERED "NO" ; RPTSEL : 1 USER ANSWERED "YES" |
|
| EF | ;encounter form?
|
|
| Q | ||
| MTPRMPT(DFN,DGMTI) | ;* Prompt for Means test included on 1010EZ
|
|
| W1 | ||
| PRT1010(PRT1010,DFN,MTIEN) | ;* Print 1010EZ reports
|
|
| EZPRMPT() | ;* Prompt for 1010EZ print
; OUTPUT - ; RPTSEL : -1 REPORT NOT SELECTED ; RPTSEL : -2 USER EXITED WITHOUT RESPONSE ; RPTSEL : 0 USER ANSWERED "NO" ; RPTSEL : 1 USER ANSWERED "YES" |
|
| FIND | ||
| DQ | ;
|
| Name | Field # of Occurrence |
|---|---|
| NOW^%DTC | DQ+1 |
| YX^%DTC | DQ+1 |
| ^%ZISC | DQ+14 |
| $$PROMPRN^DG1010PA | EF+2 |
| NOREG^DG1010PA | W1 |
| RET^DGBLRV | DQ+11 |
| CLOSE^DGUTQ | DQ+15 |
| ZIS^DGUTQ | QU+15 |
| ^DIC | FIND |
| $$GET1^DIQ | QU+5 |
| ^DIR | QU+13, EZPRMPT+15, EZRPRMPT+15 |
| $$ENEZ^EASEZPDG | MTPRMPT+9, PRT1010+15 |
| $$ENEZR^EASEZPDG | PRT1010+16 |
| EN^EASEZPDG | DQ+5, DQ+9 |
| ENXQ^GMTSDVR | DQ+12 |
| DFN^PSOSD1 | DQ+13 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("RM" | DQ+2, DQ+13 |
| ^DGMT(408.31 - [#408.31] | MTPRMPT+8 |
| ^DPT - [#2] | FIND+2 |
| ^EAS(712 | QU+4, QU+7 |
| Name | Line Occurrences |
|---|---|
| $$EZPRMPT | SEL1010+22, SEL1010+32, SEL1010+38 |
| $$EZRPRMPT | SEL1010+24, SEL1010+30, SEL1010+44 |
| DQ | QU+15 |
| EF | EMB+3 |
| EMB | QU+15, QU+17 |
| FIND | EMB+4 |
| Q | FIND, DQ+15 |
| RESTORE | DQ+11, DQ+12, DQ+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | Q! |
| %DT | Q! |
| DA | FIND*, DQ+4*, DQ+8*, Q! |
| DB | Q! |
| DFN | FIND*, FIND+2, W1, QU+1, QU+4, DQ+4, DQ+8, Q!, EMB+1*, MTPRMPT~ , MTPRMPT+9, PRT1010~, PRT1010+15, PRT1010+16 |
| DFN1 | FIND+1*, FIND+2*, Q! |
| >> DG1 | EF+2 |
| DGHDFN | QU+1*, EMB+1, EMB+4! |
| DGHOLD | DQ+15! |
| DGHOLD( | DQ+2*, RESTORE |
| DGHSFLG | Q! |
| DGL2 | Q! |
| DGLDASH | Q! |
| DGLDOUBL | Q! |
| DGLSUP | Q! |
| DGLSUP1 | Q! |
| DGLUND | Q! |
| DGMTDT | Q! |
| DGMTI | Q!, MTPRMPT~, MTPRMPT+7 |
| DGMTYPT | Q! |
| DGNOW | DQ+1*, Q! |
| DGOPT | QU+2, QU+14*, QU+15, QU+16, DQ+3, DQ+7, DQ+11, DQ+12, DQ+13, DQ+15! , Q! |
| DGPGM | QU+15*, Q! |
| DGPMDA | DQ+15!, Q! |
| DGSTOP | DQ+3, DQ+7, DQ+11, DQ+12, DQ+13, Q! |
| DGTASK | PRT1010+12~, PRT1010+13*, PRT1010+15*, PRT1010+16*, PRT1010+17 |
| DGVAR | QU+15*, Q! |
| DGX | Q! |
| DIC | FIND*, Q! |
| DIC(0 | FIND* |
| DIR | QU+9~, EZPRMPT+9!, EZPRMPT+20!, EZRPRMPT+9!, EZRPRMPT+20! |
| DIR("?" | EZPRMPT+12*, EZPRMPT+13*, EZRPRMPT+12*, EZRPRMPT+13* |
| DIR("A" | EZPRMPT+11*, EZRPRMPT+11* |
| DIR("B" | EZPRMPT+14*, EZRPRMPT+14* |
| DIR(0 | QU+13*, EZPRMPT+10*, EZRPRMPT+10* |
| DIROUT | EZPRMPT+9!, EZPRMPT+16, EZPRMPT+20!, EZRPRMPT+9!, EZRPRMPT+16, EZRPRMPT+20! |
| DIRUT | Q!, EZPRMPT+9!, EZPRMPT+16, EZPRMPT+20!, EZRPRMPT+9!, EZRPRMPT+16, EZRPRMPT+20! |
| DTOUT | Q!, EZPRMPT+9!, EZPRMPT+16, EZPRMPT+20!, EZRPRMPT+9!, EZRPRMPT+16, EZRPRMPT+20! |
| DUOUT | Q!, EZPRMPT+9!, EZPRMPT+16, EZPRMPT+20!, EZRPRMPT+9!, EZRPRMPT+16, EZRPRMPT+20! |
| DUZ | DQ+4, DQ+8 |
| EADT | QU+6~, QU+7* |
| EAIP | QU+3~, QU+4*, QU+6, QU+7*, QU+8 |
| EAIX | QU+6~*, QU+7 |
| EAPP | QU+3~, QU+4*, QU+5, QU+7 |
| EASDFN | DQ+4*, DQ+6!, DQ+8*, DQ+10! |
| EASFLAG | DQ+8*, DQ+10! |
| EASMTIEN | DQ+6!, DQ+10!, Q+2! |
| EFX | EF+1~, EF+2* |
| GMTSTYP | Q+2! |
| I | DQ+2*, Q!, RESTORE* |
| IBDFRION | EF+1~ |
| IO | QU+15 |
| J | Q! |
| L | Q! |
| LMI | Q+1! |
| MTIEN | PRT1010~, PRT1010+15, PRT1010+16 |
| MTSEL | MTPRMPT+6~, MTPRMPT+7*, MTPRMPT+8 |
| POP | QU+15, DQ+13*!, Q! |
| PRF | Q! |
| PROMPT | SEL1010~, SEL1010+15*, SEL1010+21, SEL1010+29, SEL1010+37, SEL1010+43 |
| PRT1010 | SEL1010+14~, SEL1010+16*, SEL1010+22*, SEL1010+23, SEL1010+24, SEL1010+26, SEL1010+32*, SEL1010+33, SEL1010+34, SEL1010+38* , SEL1010+39, SEL1010+40, EZPRMPT+7~, PRT1010~, PRT1010+15, PRT1010+16 |
| PRT1010R | SEL1010+14~, SEL1010+17*, SEL1010+24*, SEL1010+25, SEL1010+26, SEL1010+30*, SEL1010+31, SEL1010+32, SEL1010+34, SEL1010+44* , SEL1010+45, SEL1010+46, EZRPRMPT+7~ |
| PSCNT | Q+1! |
| PSDIS | Q+1! |
| PSDT | Q+1! |
| PSII | Q+1! |
| PSOPRINT | Q+1! |
| RPTSEL | SEL1010+14~, SEL1010+18*, SEL1010+23*, SEL1010+25*, SEL1010+26*, SEL1010+31*, SEL1010+33*, SEL1010+34*, SEL1010+39*, SEL1010+40* , SEL1010+45*, SEL1010+46*, SEL1010+48, EZPRMPT+7~, EZPRMPT+8*, EZPRMPT+16*, EZPRMPT+17*, EZPRMPT+21, EZRPRMPT+7~, EZRPRMPT+8* , EZRPRMPT+16*, EZRPRMPT+17*, EZRPRMPT+21 |
| WITHDATA | EF+1~, EF+3* |
| X | DQ+2*, DQ+13*, Q!, EZPRMPT+9!, EZPRMPT+20!, EZRPRMPT+9!, EZRPRMPT+20! |
| Y | FIND, DQ+1, Q!, EZPRMPT+9!, EZPRMPT+17, EZPRMPT+20!, EZRPRMPT+9!, EZRPRMPT+17, EZRPRMPT+20! |
| ZUSR | DQ+4*, DQ+6!, DQ+8*, DQ+10! |