GMVRPCP ;HOIFO/DP-RPC for GMV_PtSelect.pas ; 7/8/05 8:05am
Source file <GMVRPCP.m>
Package | Total | Caller Graph |
---|---|---|
General Medical Record - Vitals | 1 | GMVUTL3 |
Name | Comments | DBIA/ICR reference |
---|---|---|
CCOW | ; Return CCOW site and production indicator
|
|
HOSPLOC | ; [Procedure] Return location as ptr to 44 or ""
|
|
PTLKUP | ; [Procedure] Patient lookup handled separately for security
|
|
PTHDR | ; [Procedure] Patient Info for Header Displays
|
|
IDIEN(GMVIEN) | ;
|
|
ADD(X) | ; [Procedure] Add line to @RESULTS@(...
; Input parameters ; 1. X [Literal/Required] Data to add to @RESULTS@(... |
|
LOGSEC | ; [Procedure] Log Security
|
|
PTREC(DFN) | ;
; Extrinsic to return a Pt Rec in standard list format |
|
RPC(RESULTS,OPTION,DFN,DATA) | ; [Procedure] Main RPC call tag
; RPC: [GMV PTSELECT] ; Input parameters ; 1. RESULTS [Literal/Required] RPC return array ; 2. OPTION [Literal/Required] Call method for RPC ; 3. DFN [Literal/Required] Patient IEN ; 4. DATA [Literal/Optional] Other data as required for call |
|
SELECT | ; [Procedure] Select patient
; Calls required utilities to check security and ; return associated warnings/alerts about a ; patient being selected. ; Variables: ; IENS: [Private] Fileman IENS ; GMVDFN: [Private] Scratch ; GMVFLD: [Private] FIeld number ; GMVID: [Private] Identifier array ; GMVRET: [Private] Scratch ; GMVX: [Private] Scratch ; New private variables |
Name | Field # of Occurrence |
---|---|
NOTICE^DGSEC4 | LOGSEC+1 |
PTSEC^DGSEC4 | SELECT+55 |
FIND^DIC | PTLKUP+3 |
$$GET1^DID | SELECT+20, SELECT+30, SELECT+35 |
FILE^DID | SELECT+17 |
CLEAN^DILF | RPC+11 |
$$GET1^DIQ | PTHDR+5, PTHDR+6, SELECT+21, SELECT+23, SELECT+31, SELECT+36, SELECT+49 |
$$DOB^DPTLK1 | PTREC+5, SELECT+24, SELECT+49 |
$$SSN^DPTLK1 | PTREC+6, SELECT+27, SELECT+49 |
GUIBS5A^DPTLK6 | SELECT+40 |
GUIMTD^DPTLK6 | SELECT+68 |
INP^VADPT | HOSPLOC+2 |
$$SITE^VASITE | CCOW+1 |
$$PROD^XUPROD | CCOW+1 |
RPC Name | Call Tags |
---|---|
GMV PTSELECT | RPC |
FileNo | Call Tags |
---|---|
^DPT - [#2] | FILE^DID, FIND^DIC, GET1^DID, GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(42 - [#42] | HOSPLOC+2, IDIEN+3, IDIEN+5 |
^DISV( | SELECT+14* |
^DPT - [#2] | PTHDR+1, PTREC+3, SELECT+13 |
^TMP("DILIST" | PTLKUP+4, PTLKUP+6, PTLKUP+7 |
^TMP("GMVPTSELECT" | RPC+7 |
Name | Line Occurrences |
---|---|
$$IDIEN | SELECT+33 |
$$PTREC | PTLKUP+7 |
@( | RPC+8 |
ADD | SELECT+41, SELECT+44, SELECT+45, SELECT+49, SELECT+50, SELECT+51, SELECT+52, SELECT+57, SELECT+59, SELECT+61 , SELECT+63, SELECT+65, SELECT+66, SELECT+69, SELECT+70, SELECT+71 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DATA | LOGSEC+1, RPC~, PTLKUP+2, PTLKUP+3, PTLKUP+5, PTLKUP+8 |
DFN | LOGSEC+1, RPC~, PTHDR+1, PTHDR+2, PTHDR+4, PTREC~, PTREC+3, PTREC+4, PTREC+5, PTREC+6 , SELECT+13, SELECT+14, SELECT+16, SELECT+40, SELECT+55, SELECT+68 |
DUZ | SELECT+14 |
GMV | PTLKUP+6*, PTLKUP+7, PTREC+2~, PTREC+3*, PTREC+4*, PTREC+5*, PTREC+6*, PTREC+7 |
GMVCNT | SELECT+12~ |
GMVDFN | SELECT+12~, SELECT+48*, SELECT+49 |
GMVFLD | SELECT+12~, SELECT+19*, SELECT+20, SELECT+21, SELECT+22, SELECT+25 |
GMVHLIEN | SELECT+12~ |
GMVI | SELECT+12~ |
GMVID | SELECT+12~, SELECT+20*, SELECT+21*, SELECT+23*, SELECT+24*, SELECT+26, SELECT+27*, SELECT+28, SELECT+30*, SELECT+31* , SELECT+32, SELECT+34, SELECT+35*, SELECT+36*, SELECT+37 |
GMVIDIEN | SELECT+12~, SELECT+32*, SELECT+33* |
GMVIDS | SELECT+12~ |
GMVIDS("REQUI | RED IDENTIFIERS" , SELECT+18, SELECT+19 |
GMVIDX | PTLKUP+1~, PTLKUP+2*, PTLKUP+3 |
GMVIEN | IDIEN~, IDIEN+1*, IDIEN+2, IDIEN+3*, IDIEN+4, IDIEN+5*, IDIEN+6 |
GMVIENS | PTHDR+3~, PTHDR+4*, PTHDR+5, PTHDR+6 |
GMVRET | LOGSEC+1, LOGSEC+2, SELECT+12~, SELECT+39!, SELECT+40, SELECT+54!, SELECT+55, SELECT+68 |
GMVRET( | SELECT+43, SELECT+44, SELECT+47, SELECT+48, SELECT+65, SELECT+70 |
GMVRET(1 | SELECT+40, SELECT+55, SELECT+56, SELECT+58, SELECT+60, SELECT+62, SELECT+68 |
GMVX | SELECT+12~, SELECT+18*, SELECT+19, SELECT+42*, SELECT+43*, SELECT+44, SELECT+46*, SELECT+47*, SELECT+48, SELECT+64* , SELECT+65*, SELECT+70* |
IENS | SELECT+12~, SELECT+16*, SELECT+21, SELECT+23, SELECT+24, SELECT+27, SELECT+31, SELECT+36 |
OPTION | RPC~, RPC+8 |
RESULTS | ADD+3, LOGSEC+2, RPC~, RPC+7*, RPC+9, RPC+10, HOSPLOC+2, PTHDR+2, PTHDR+4, PTHDR+5 , PTHDR+6, PTLKUP+5, PTLKUP+7, PTLKUP+8, PTLKUP+9, SELECT+13, SELECT+15, SELECT+28, SELECT+34, SELECT+37 , CCOW+1 |
U | PTLKUP+4, PTREC+4, PTREC+5, PTREC+6, SELECT+21, SELECT+24, SELECT+26, SELECT+27, SELECT+31, SELECT+32 , SELECT+36, SELECT+44, SELECT+48 |
VAIN | HOSPLOC+1~ |
VAIN(4 | HOSPLOC+2 |
X | ADD~, ADD+3, SELECT+26*, SELECT+27 |
Name | Field # of Occurrence |
---|---|
$T(@OPTION | RPC+8 |