GMRPNOR1 ;SLC/MKB/DJP Progress Note- OE/RR interface;; 2-14-97 ; 7-DEC-1999 12:10:24
Source file <GMRPNOR1.m>
| 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 |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| ^VA(200 - [#200] | Classic Fileman Calls |
