©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
DGMTHL ;ALB/CJM,SCG,TMK - Hardship Determinations - List Manager Screen; 1/02/2002
Source file <DGMTHL.m>
| Package | Total | Caller Graph |
|---|---|---|
| Registration | 2 | DGMTH HARDSHIPS DGMTHL1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HELP | ;Help code
|
|
| EN(DFN) | ;Entry point for the DGMT HARDSHIP List Template
; Input -- DFN Patient IEN ; Output -- None |
|
| EXPND | ;Expand code
|
|
| HDR | ;Header code
|
|
| ENQ | ||
| INIT | ;Init variables and list array
|
|
| EXIT | ;Exit code
|
|
| HARDSHIP | ;Entry point for hardships
; Input -- None ; Output -- None |
| Name | Field # of Occurrence |
|---|---|
| $$INST^DGENU | HARDSHIP+16 |
| $$CONVERT^DGENUPL1 | HARDSHIP+15, HARDSHIP+21 |
| $$FIND^DGMTH | HARDSHIP+12, INIT+2 |
| $$GET^DGMTH | INIT+3 |
| EN^DGMTHL1 | INIT+6 |
| GETPAT^DGRPTU | HARDSHIP+6 |
| WAIT^DICD | EN+6 |
| ^DIR | HARDSHIP+22 |
| PID^VADPT | HDR+2 |
| EN^VALM | EN+7 |
| $$SETSTR^VALM1 | HDR+5 |
| CLEAR^VALM1 | EXIT+2 |
| CLEAN^VALM10 | INIT+4, EXIT+1 |
| $$FMTE^XLFDT | HARDSHIP+9 |
| DISP^XQORM1 | HELP+1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(391 - [#391] | HDR+4 |
| ^DGMT(408.31 - [#408.31] | HARDSHIP+13 |
| ^DIC(4 - [#4] | HARDSHIP+21 |
| ^DPT - [#2] | HARDSHIP+8, HARDSHIP+19, HDR+3, HDR+4 |
| Name | Line Occurrences |
|---|---|
| EN | HARDSHIP+25 |
| ENQ | HARDSHIP+6 |
| Name | Field # of Occurrence |
|---|---|
| ^("TYPE" | HDR+4 |
| ^(0 | HDR+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | HARDSHIP+3~, HARDSHIP+6, HARDSHIP+8, HARDSHIP+12, HARDSHIP+19, HARDSHIP+25, EN~, EN+4, INIT+2, HDR+3 , HDR+4 |
| DGDUZ | HARDSHIP+3~, HARDSHIP+15*, HARDSHIP+16 |
| DGDUZ(2 | HARDSHIP+15* |
| DGMDOD | HARDSHIP+7~*, HARDSHIP+8*, HARDSHIP+9 |
| DGOK | HARDSHIP+3~, HARDSHIP+11*, HARDSHIP+16*, HARDSHIP+18 |
| DGSITE | HARDSHIP+3~, HARDSHIP+11*, HARDSHIP+16*, HARDSHIP+18 |
| DIR | HARDSHIP+22~ |
| DIR("A" | HARDSHIP+22* |
| DIR(0 | HARDSHIP+22* |
| DT | HARDSHIP+12, INIT+2 |
| DUZ | HARDSHIP+15 |
| DUZ(2 | HARDSHIP+18 |
| HARDSHIP | EN+5~, INIT+3, INIT+6 |
| MTIEN | HARDSHIP+3~, HARDSHIP+11*, HARDSHIP+12*, HARDSHIP+13, INIT+1~, INIT+2*, INIT+3 |
| SGHRD | HARDSHIP+3~, HARDSHIP+11*, HARDSHIP+13*, HARDSHIP+14, HARDSHIP+15, HARDSHIP+18, HARDSHIP+21 |
| U | HARDSHIP+8, HARDSHIP+13, HARDSHIP+19, HARDSHIP+21, HDR+3, HDR+4 |
| VA | HDR+1~ |
| VA("BID" | HDR+3 |
| VAERR | HDR+1~ |
| >> VALMCNT | INIT+5*, INIT+6 |
| >> VALMHDR(1 | HDR+3*, HDR+5* |
| X | HELP+1*, HDR+1~, HDR+4*, HDR+5 |