GMRPNOR1 ;SLC/MKB/DJP Progress Note- OE/RR interface;; 2-14-97 ; 7-DEC-1999 12:10:24
Source file <GMRPNOR1.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 |
---|---|---|
Text Integration Utility | 2 | TIULX TIUROR |
Order Entry Results Reporting | 1 | ORUHDR |
Name | Comments | DBIA/ICR reference |
---|---|---|
SELPT | ;select new patient using IN^OR to update ORVP, etc. GMRP*2.5*50
; IN^OR doesn't exist, code no longer used |
|
PAT | ;set up patient info for use - expects ORVP or DFN
|
|
CWAD(GMRPDFN) | ;;check if any clinical warnings exist for patient
|
|
QUIT | ;quits out of review screen
|
|
SEL | ;selects single note from screen -- assumes GMRPN(GMRPNN) array
|
|
CURR | ;Redisplay current screen -- needs GMRPPG & calls SCREEN
|
|
NEXT | ;Display next screen -- needs GMRPPG & calls SCREEN
|
|
PREV | ;Display previous screen -- needs GMRPPG & calls SCREEN
|
|
CTXT | ;Select new context for viewing/acting on notes
|
|
AUTHOR | ;selects author - Returns GMRPDUZ=#^NAME or GMRPQT
|
|
SETERM | ;sets up GMRPTRML variable to hi-lite <CWAD> flag on review screen
|
|
INV() | ||
UNSIGN | ;entry point for follow-up action on unsigned pn's
|
|
COSIGN | ;entry point for follow-up action on uncosigned pn's
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |
^VA(200 - [#200] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZIS(2 - [#3.2] | SETERM+3, SETERM+5 |
^%ZOSF("XY" | INV+1 |
^DIC(42 - [#42] | PAT+9 |
^GMR(121 | SEL+6 |
^ORD(101 - [#101] | UNSIGN+3, COSIGN+3 |
^SC - [#44] | PAT+10 |
^TIU(8925 - [#8925] | CWAD+9, CWAD+10, CWAD+11 |
^VA(200 - [#200] | AUTHOR+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CWA | CWAD+16! |
DFN | PAT+1, PAT+6~*, CWAD+13* |
DIC | PAT+3*!, AUTHOR+1*, AUTHOR+2! |
DIC("A" | AUTHOR+1* |
DIC("B" | AUTHOR+2* |
DIC(0 | PAT+3*, AUTHOR+1* |
DIR | SEL+3!, CTXT+8! |
DIR("?" | SEL+2*, CTXT+6*, CTXT+7* |
DIR("??" | SEL+3* |
DIR("A" | SEL+1*, CTXT+3*, CTXT+4*, CTXT+5* |
DIR("B" | CTXT+7* |
DIR(0 | SEL+1*, CTXT+2* |
>> DIROUT | SEL+4, SEL+9, CTXT+8, CTXT+9, AUTHOR+3 |
>> DIRUT | SEL+4 |
>> DTOUT | SEL+4, SEL+9, CTXT+9 |
DUOUT | SEL+9!, CTXT+9 |
DUZ | AUTHOR+2 |
DX | INV+1~* |
DY | INV+1~* |
>> GMRPADDM | SEL+6 |
>> GMRPAGE | PAT+8* |
GMRPALG | CWAD+13, CWAD+16! |
GMRPBLD | CTXT+11! |
>> GMRPCTXT | CTXT+11*, UNSIGN+2*, COSIGN+2* |
GMRPCWA1 | CWAD+4~, CWAD+7*, CWAD+9*, CWAD+10*, CWAD+11*, CWAD+13*, CWAD+15 |
GMRPCWAD | PAT+11!*, CWAD+6*, CWAD+15*, CWAD+17 |
GMRPDFN | PAT+1*, PAT+2, PAT+5*, PAT+6, PAT+7*, PAT+11, CWAD~, CWAD+5, CWAD+9, CWAD+10 , CWAD+11, CWAD+13 |
>> GMRPDOB | PAT+8* |
>> GMRPDUZ | AUTHOR+4* |
>> GMRPEND | QUIT+1*, CTXT+8*, AUTHOR+3* |
GMRPI | CWAD+4~, CWAD+8*, CWAD+9, CWAD+10, CWAD+11, CWAD+14*, CWAD+15, SETERM+7*, SETERM+8! |
GMRPIFN | SEL+5*, SEL+6, SEL+8! |
>> GMRPLOC | PAT+8*, PAT+9*, PAT+10* |
>> GMRPN( | SEL+5 |
>> GMRPN("PG" | NEXT+2 |
>> GMRPNN | SEL+1 |
>> GMRPPG | CURR+1*, NEXT+1*, NEXT+2*, PREV+1*, PREV+2* |
GMRPQT | PAT+2, PAT+4*, SEL+4*, SEL+8*, SEL+9!, CTXT+10, AUTHOR+3*, AUTHOR+4! |
>> GMRPRB | PAT+8* |
GMRPSAV | CTXT+10*, CTXT+11! |
>> GMRPSSN | PAT+7* |
>> GMRPTRML | SETERM+2*, SETERM+5*, SETERM+6*, SETERM+7* |
IOST | SETERM+2, SETERM+3 |
ORVP | PAT+1, UNSIGN+1~, UNSIGN+2*, COSIGN+1~, COSIGN+2* |
TIUST | CWAD+16! |
U | PAT+7, PAT+8, PAT+9, PAT+10, SEL+6, AUTHOR+2, SETERM+5, SETERM+6, SETERM+7 |
>> VA("PID" | PAT+7 |
VADM | PAT+11! |
VADM(1 | PAT+7 |
VADM(3 | PAT+8 |
VADM(4 | PAT+8 |
VAIN | PAT+11! |
VAIN(4 | PAT+8 |
VAIN(5 | PAT+8 |
>> X | SETERM+3*, SETERM+5, INV, INV+1, UNSIGN+3*, COSIGN+3* |
>> XQAID | UNSIGN+2, COSIGN+2 |
>> XQAKILL | UNSIGN+1*, COSIGN+1* |
>> Y | PAT+4, PAT+5, SEL+5, CTXT+10, AUTHOR+3, AUTHOR+4 |