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 |