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* |