GMRCTIU ;SLC/DCM - Consults - TIU utilities ;2/26/02 11:46
Source file <GMRCTIU.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
GET(GMRCO,GMRCTUFN,GMRCTUST,GMRCAUTH) | ;update Consult from TIU
|
|
DSPLAY(GMRCTUFN,LINECT) | ;Get TIU results narrative and get it ready for display
|
|
ENTER(GMRCO) | ; Complete a consult with TIU note
|
|
ADDEND(GMRCO) | ; Make an addendum to a consult result
|
|
SEND(DFN,OVRRIDE,CP) | ;Get consult list and return in ^TMP for TIU
|
|
RPCLIST(GMRCY,DFN) | ;Get consult list and return in GMRCY for GUI
|
|
GETCONSL(DFN,ORIGIN,OVRRIDE,GMRCCP) | ;Get the patients consults
|
|
BLDGMRCY | ;Build the GMRCY array of existing consults
|
|
BLDTMP | ;Build TMP global for TIU
|
|
ANYPENDG(DFN,USER) | ; Determine if user can update any unresolved CSLTs
; Input: ; DFN = patient being worked on or the one to check from file 2 ; USER = the person to check on from file 200 |
Name | Field # of Occurrence |
---|---|
$$ORTX^GMRCAU | BLDTMP+2 |
$$VALID^GMRCAU | GETCONSL+24, ANYPENDG+23 |
STATUS^GMRCTIU1 | GET+8 |
ADDEND^GMRCTIUE | ADDEND+2 |
ENTER^GMRCTIUE | ENTER+2 |
GETLIST^GMRCTIUL | GETCONSL+29 |
RPC^TIUSRV | DSPLAY+4 |
$$FMADD^XLFDT | GETCONSL+12, ANYPENDG+10 |
$$FMTE^XLFDT | BLDTMP+4 |
$$GET^XPAR | GETCONSL+12, ANYPENDG+10 |
RPC Name | Call Tags |
---|---|
GMRC LIST CONSULT REQUESTS | RPCLIST |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^GMR(123 - [#123] | GETCONSL+14, GETCONSL+16, GETCONSL+17, GETCONSL+19, GETCONSL+26, GETCONSL+27, ANYPENDG+12, ANYPENDG+14, ANYPENDG+15, ANYPENDG+17 , ANYPENDG+18 |
^GMR(123.3 - [#123.3] | BLDGMRCY+3 |
^GMR(123.5 - [#123.5] | BLDGMRCY+2 |
^ORD(100.01 - [#100.01] | BLDGMRCY+1, BLDTMP+1 |
^TMP("GMRCR" | DSPLAY+6*, SEND+8!, BLDTMP+6*, BLDTMP+7* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CP | SEND~, SEND+9 |
DFN | SEND~, SEND+6, SEND+9, RPCLIST~, RPCLIST+2, RPCLIST+3, GETCONSL~, GETCONSL+14, GETCONSL+16, ANYPENDG~ , ANYPENDG+12, ANYPENDG+14 |
DT | GETCONSL+12, ANYPENDG+10 |
GMRC | GETCONSL+7~, ANYPENDG+9~ |
GMRC(0 | GETCONSL+17*, GETCONSL+18, GETCONSL+21, GETCONSL+22, BLDGMRCY+2, BLDGMRCY+3, ANYPENDG+15*, ANYPENDG+16, ANYPENDG+20, ANYPENDG+21 |
GMRCA | GET+5~, GET+6*, GET+7*, GET+8 |
GMRCAD | GET+5~ |
GMRCARR | DSPLAY+3~, DSPLAY+4, DSPLAY+6, DSPLAY+8 |
GMRCAU | GETCONSL+8~, GETCONSL+23, GETCONSL+24*, GETCONSL+25*, ANYPENDG+9~, ANYPENDG+22, ANYPENDG+23*, ANYPENDG+24*, ANYPENDG+25 |
GMRCAUTH | GET~ |
GMRCCP | GETCONSL~, GETCONSL+26, GETCONSL+27 |
GMRCDA | GETCONSL+7~, GETCONSL+15*, GETCONSL+16*, GETCONSL+17, GETCONSL+19, GETCONSL+24, GETCONSL+26, GETCONSL+27, GETCONSL+29, BLDGMRCY+5 , BLDTMP+2, BLDTMP+6, BLDTMP+7, ANYPENDG+9~, ANYPENDG+13*, ANYPENDG+14*, ANYPENDG+15, ANYPENDG+17, ANYPENDG+18, ANYPENDG+23 |
GMRCDAT | GETCONSL+8~, GETCONSL+13*, GETCONSL+14*, GETCONSL+16, ANYPENDG+9~, ANYPENDG+11*, ANYPENDG+12*, ANYPENDG+14 |
GMRCDFN | GET+5~ |
GMRCDONE | ANYPENDG+9~, ANYPENDG+11*, ANYPENDG+12, ANYPENDG+25*, ANYPENDG+26 |
GMRCDT | GETCONSL+7~, GETCONSL+21*, BLDGMRCY+5, BLDTMP+4, ANYPENDG+9~, ANYPENDG+20* |
GMRCEDT | GETCONSL+7~, BLDTMP+4*, BLDTMP+6 |
GMRCI | SEND+5~, RPCLIST+1~, RPCLIST+5, BLDGMRCY+4*, BLDGMRCY+5, BLDTMP+5*, BLDTMP+6, BLDTMP+7 |
GMRCND | GET+9! |
GMRCNOTE | GETCONSL+8~, BLDTMP+3*, BLDTMP+6 |
GMRCO | GET~, ENTER~, ENTER+2, ADDEND~, ADDEND+2 |
GMRCOM | GET+9! |
GMRCORNP | GET+9! |
GMRCORTX | GET+9! |
GMRCPROC | GETCONSL+8~, BLDGMRCY+3*, BLDGMRCY+5 |
GMRCQIT | GETCONSL+7~ |
GMRCSA | GET+9! |
GMRCSP | GETCONSL+7~, BLDTMP+2*, BLDTMP+6 |
GMRCSS | GETCONSL+8~, GETCONSL+22*, GETCONSL+24, BLDGMRCY+2*, ANYPENDG+9~, ANYPENDG+21*, ANYPENDG+23 |
GMRCST | GETCONSL+7~, GETCONSL+18*, GETCONSL+20, BLDGMRCY+1, BLDTMP+1, ANYPENDG+9~, ANYPENDG+16*, ANYPENDG+19 |
GMRCSTS | GET+5~, GET+6*, GET+7*, GET+9!, GETCONSL+7~, BLDGMRCY+1*, BLDGMRCY+5, BLDTMP+1*, BLDTMP+6 |
GMRCSVC | GETCONSL+8~, BLDGMRCY+2*, BLDGMRCY+5 |
GMRCTIU | GETCONSL+8~ |
GMRCTIUC | GETCONSL+8~, GETCONSL+28*, GETCONSL+29 |
GMRCTIUC(0 | BLDGMRCY+5, BLDTMP+3, BLDTMP+6 |
GMRCTIUY | DSPLAY+8! |
GMRCTUFN | GET~, DSPLAY~, DSPLAY+4 |
GMRCTUST | GET~, GET+6 |
GMRCY | RPCLIST~ |
GMRCY( | BLDGMRCY+5* |
GMRCY(0 | RPCLIST+2*, RPCLIST+5* |
GMRCYR | GETCONSL+7~, GETCONSL+12*, GETCONSL+13*, GETCONSL+14, ANYPENDG+9~, ANYPENDG+10*, ANYPENDG+11*, ANYPENDG+12 |
LINECT | DSPLAY~, DSPLAY+6*, DSPLAY+9* |
ND | DSPLAY+3~, DSPLAY+5*, DSPLAY+6* |
ORIGIN | GETCONSL~, GETCONSL+30, GETCONSL+31 |
OVRRIDE | SEND~, SEND+9, GETCONSL~, GETCONSL+23 |
RESFL | DSPLAY+8! |
TAB | SEND+5~, SEND+7*, BLDTMP+6 |
U | GETCONSL+18, GETCONSL+19, GETCONSL+22, BLDGMRCY+2, BLDGMRCY+3, BLDGMRCY+5, ANYPENDG+16, ANYPENDG+17, ANYPENDG+21 |
USER | ANYPENDG~ |
XQA | ENTER+1~, ADDEND+1~ |
XQADATA | ENTER+1~, ADDEND+1~ |
XQAID | ENTER+1~, ADDEND+1~ |
XQAKILL | ENTER+1~, ADDEND+1~ |
XQAROU | ENTER+1~, ADDEND+1~ |
XQFLG | ENTER+1~, ADDEND+1~ |
Y | GETCONSL+8~ |