DGR113 ;ALB/TGH,HM,KUM,BDB,ARF - Health Benefit Plan View History - List Manager Screen ;5/21/19 10:56am
Source file <DGR113.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DFN) | ;Main entry point to invoke the DGEN HBP VIEW list
; Input -- DFN Patient IEN |
|
| HDR | ;Header code
|
|
| INIT | ;Build patient HBP View History screen
|
|
| GETPLAN | ;Load History from HBP array into TMP(VALMAR global for display
|
|
| HELP | ;Help code
|
|
| EXIT | ;Exit code
|
|
| ACTION | ; Get users entered data and process entry to add HBP
; DG*5.3*987 - KUM |
|
| ACT(DGACT) | ; Entry point for menu action selection
; INPUT: DGACT = Plan number to be assigned |
|
| EXPND | ; -- expand code
; DG*5.3*987 - KUM - For Expand Functionality |
|
| PEXIT | ; MENU protocol exit code
|
| Name | Field # of Occurrence |
|---|---|
| GETDETL^DGHBPUTL | ACT+4 |
| GETHBP^DGHBPUTL | GETPLAN+4 |
| EN^DGR1131 | EXPND+7 |
| LISTHDR^DGRPU | HDR+2 |
| $$FIND1^DIC | ACTION+11 |
| WAIT^DICD | EN+3 |
| EN^VALM | EN+4 |
| $$SETFLD^VALM1 | GETPLAN+14, GETPLAN+15, GETPLAN+16 |
| $$SETSTR^VALM1 | GETPLAN+18 |
| CLEAR^VALM1 | INIT+3, EXIT+2 |
| FULL^VALM1 | ACTION+3, EXPND+6 |
| CLEAN^VALM10 | INIT+2, EXIT+1 |
| SET^VALM10 | GETPLAN+19 |
| EN^VALM2 | ACTION+5 |
| $$TRIM^XLFSTR | ACTION+11 |
| DISP^XQORM1 | HELP+1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DGHBP(25.11 - [#25.11] | FIND1^DIC |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACT | ACTION+8*, ACTION+9, EXPND+2~ |
| CNT | GETPLAN+1~, GETPLAN+6*, GETPLAN+7*, GETPLAN+9, GETPLAN+11, EXPND+2~ |
| DATA | GETPLAN+10~, GETPLAN+11*, GETPLAN+15, GETPLAN+18 |
| DFN | EN~, EXPND+7 |
| DGACT | ACTION+11*, ACTION+12, ACT~, ACT+2, ACT+4, EXPND+2~, EXPND+5 |
| DGNAME | ACTION+9*, ACTION+11, EXPND+2~, EXPND+7 |
| DGPLAN | INIT+1~ |
| DTTIME | GETPLAN+1~, GETPLAN+8*, GETPLAN+9*, GETPLAN+11, GETPLAN+12 |
| >> HBP | EXPND+7 |
| >> HBP("HIS" | GETPLAN+7, GETPLAN+9, GETPLAN+11 |
| I | ACTION+2~, ACTION+6*, ACTION+7*, ACTION+8 |
| LINEVAR | GETPLAN+1~, GETPLAN+3*, GETPLAN+14*, GETPLAN+15*, GETPLAN+16*, GETPLAN+18*, GETPLAN+19 |
| LST | EXPND+2~ |
| >> VALMAR | ACTION+8, ACTION+9 |
| >> VALMBCK | EXPND+4*, EXPND+8* |
| >> VALMCNT | GETPLAN+2*, GETPLAN+13*, GETPLAN+14, GETPLAN+19 |
| VALMNOD | ACTION+2~, ACTION+4*, ACTION+5 |
| >> VALMSG | PEXIT+1* |
| VALMY | ACTION+2~ |
| VALMY( | ACTION+7 |
| X | HDR+1~, HELP+1* |
| Y | GETPLAN+10~, GETPLAN+12*, GETPLAN+16 |
