DGRP62 ;ALB/PJH,LBD,ARF - Patient MSDS History - List Manager Screen;12 JUN 1997 10:00 am ; 6/23/09 3:48pm
Source file <DGRP62.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Registration | 2 | DGEN MSDS PATIENT VIEW DGEN MSDS VIEW HISTORY |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DFN) | ;Main entry point to invoke the DGEN PATIENT MSDS VIEW list
; Input -- DFN Patient IEN |
|
| HDR | ;Header code
|
|
| INIT | ;Build patient MSDS screen
|
|
| GETMSE(DFN,GLBL,NUM) | ;Get old format MSE data from node .32
|
|
| SETDAT(DGRP,FLD) | ;Set MSE data into DGDATA
|
|
| HELP | ;Help code
|
|
| EXIT | ;Exit code
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | GETMSE+3, GETMSE+4 |
| ^TMP("DGRP62" | INIT+2!, INIT+5, EXIT+3! |
| Name | Line Occurrences |
|---|---|
| $$SETDAT | GETMSE+6, GETMSE+10, GETMSE+14 |
| GETMSE | INIT+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | EN~, INIT+6, GETMSE~, GETMSE+3, GETMSE+4 |
| DGDATA | GETMSE+1~, GETMSE+6*, GETMSE+7, GETMSE+10*, GETMSE+11, GETMSE+14*, GETMSE+15 |
| DGPREFNM | HDR+1~ |
| DGRP | GETMSE+6, GETMSE+10, GETMSE+14, SETDAT~ |
| DGRP( | GETMSE+3*, GETMSE+4*, GETMSE+9, GETMSE+13, SETDAT+3, SETDAT+4 |
| DGX | SETDAT+1~, SETDAT+3*, SETDAT+5 |
| DGY | SETDAT+1~, SETDAT+4*, SETDAT+5 |
| FLD | SETDAT~, SETDAT+2, SETDAT+5 |
| GLBL | INIT+4~, INIT+5*, INIT+6, GETMSE~, GETMSE+7, GETMSE+11, GETMSE+15 |
| NUM | GETMSE~, GETMSE+7, GETMSE+11, GETMSE+15 |
| U | GETMSE+9, GETMSE+13, SETDAT+5 |
| VA | HDR+1~ |
| VAERR | HDR+1~ |
| >> VALMCNT | GETMSE+2* |
| >> VALMHDR(1 | HDR+2* |
| >> VALMHDR(4 | HDR+12*, HDR+13* |
| X | HDR+1~, HELP+1* |