©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
DGMTCOU ;ALB/CAW - Copay Utilities ; 12/10/92
Source file <DGMTCOU.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 6 | ADD^DGMTA PAUSE^DGMTE EN^DGMTSC $$LST^DGMTU DISPLAY^DGMTU23 ($$LOCK,UNLOCK)^DGMTUTL |
| VA Fileman | 2 | ^%DTC ^DIR |
| Package | Total | Caller Graph |
|---|---|---|
| Registration | 12 | DG CO-PAY TEST ADD DG CO-PAY TEST DELETE DG CO-PAY TEST EDIT DG CO-PAY TEST INCOMPLETE DG CO-PAY TEST VIEW EDITING DG10 DGMTCOR DGMTP2 DGMTR1 DGMTSCC DGMTSCU DGREG0 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EDT(DFN,DGDT) | ;Display patients current copay test information and provide
; the user with the option of proceeding with adding a ; copay test or editing an existing copay test ; Input -- DFN Patient IEN ; DGDT Date/Time ; Output -- None |
|
| ON | ; Check to see of copay software is on
; Input - none ; Output - 1 = YES ; 0 = NO |
|
| EDTQ | ||
| ASKNW() | ;
|
|
| YR(DFN,DGDT,DGMT0) | ;Check to see if test is greater than 365 days
; Input -- DFN Patient IEN ; DGDT Date/Time to check against ; DGMT0 Zeroth node of Copay test ; Output -- 1 = TEST IS 365 OR MORE DAYS OLD ; 0 = TEST IS LESS THAN 365 DAYS OLD |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(408.34 - [#408.34] | EDT+22 |
| ^DG(43 - [#43] | ON+4 |
| ^DGMT(408.31 - [#408.31] | EDT+15, EDT+21 |
| Name | Line Occurrences |
|---|---|
| $$YR | EDT+16 |
| EDTQ | EDT+22, EDT+29 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | EDT~, EDT+12, EDT+14, EDT+16, EDTQ+3, YR~ |
| DGDT | EDT~, EDT+14, EDT+16, YR~, YR+9 |
| DGLDYR | YR+7~, YR+8*, YR+9 |
| DGMT0 | EDT+15*, EDT+16, EDTQ!, YR~, YR+8, YR+9 |
| DGMTACT | EDT+30*, EDT+31*, EDTQ! |
| DGMTDT | EDT+15*, EDT+31*, EDTQ! |
| DGMTERR | EDT+8~, EDT+22, EDT+25*! |
| DGMTI | EDT+14*, EDT+15, EDT+21, EDT+22, EDTQ!, YR+9 |
| DGMTROU | EDT+30*, EDT+31*, EDTQ! |
| DGMTS | EDT+15*, EDT+16*, EDT+27, EDT+28, EDT+30, EDT+31, EDTQ! |
| DGMTYPT | EDT+8~, EDT+9*, EDT+30*, EDT+31* |
| DGY | YR+7~*, YR+9*, YR+10 |
| DIR | EDT+25!, EDTQ! |
| DIR("A" | EDT+24*, EDT+27* |
| DIR("B" | EDT+24*, EDT+28* |
| DIR(0 | EDT+24*, EDT+28* |
| DT | EDT+31 |
| DTOUT | EDT+25!, EDT+29 |
| DUOUT | EDT+25!, EDT+29 |
| SOURCE | EDT+8~, EDT+21*, EDT+22 |
| U | EDT+21, EDT+22, YR+9, ON+4 |
| X | YR+7~, YR+9 |
| X1 | YR+7~, YR+9* |
| X2 | YR+7~, YR+9* |
| Y | EDT+25, EDT+30, EDT+31, EDTQ!, ON+4*, ON+5* |