RGRSUTL2 ;ALB/RJS-UTILITIES FOR CIRN ;1/2/97
Source file <RGRSUTL2.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 |
---|---|---|
Clinical Information Resource Network | 3 | RGHLEXC1 RGHLLOG RGHOUT |
Name | Comments | DBIA/ICR reference |
---|---|---|
SSN(SSN,ARRAY) | ;RETURNS DFN'S OF ALL SSN'S OR PSUEDO'S THAT MATCH
; THE SSN PASSED ; CALLING ROUTINE MUST KILL ARRAY BEFORE CALLING THIS ; FUNCTION |
|
SET(DFN) | ;
|
|
SNGPLR(RGNUM,RGSNG,RGPLR) | ;
|
|
TITLE(RGTTL,RGVER,RGFN) | ;
|
|
PAUSE(RGP,RGX,RGY) | ;
|
|
GETCH(RGP,RGV,RGX,RGY,RGT,RGD) | ;
|
|
BASE(X,Y,L) | ;
|
|
UND(X) | ||
XY(DX,DY) | ;
|
|
ALERT(XQAMSG,RGUSR) | ;
|
|
EXIT | ||
ENTRY(RGUSR,RGOUT,RGLST) | ;
|
|
LKP(RGNAME) | ;
|
|
L1 | ||
MAIL(RGMSG,XMY,XMSUB,XMDUZ) | ;
|
|
LIST(RGLIST) | ;
|
|
LERR | ||
MGRP(RGMGRP) | ;
|
|
MGRP2(RGMGRP) | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | TITLE+6 |
^DPT - [#2] | SET+1, SET+2 |
^DPT("SSN" | SSN+6 |
^RGCDSS(993.6 | LIST+2, LIST+4 |
^VA(200 - [#200] | LKP+2 |
^XMB(3.8 - [#3.8] | MGRP2+3, MGRP2+6, MGRP2+7 |
Name | Line Occurrences |
---|---|
$$GETCH | PAUSE+1 |
$$LKP | ENTRY+10 |
$$UND | TITLE+7 |
$$XY | GETCH+2 |
ENTRY | ALERT+3 |
L1 | LKP+2 |
LIST | ENTRY+9 |
MGRP | ENTRY+6, ENTRY+8 |
MGRP2 | MGRP+3, MGRP2+7 |
SET | SSN+6 |
Name | Field # of Occurrence |
---|---|
^( | LKP+3, L1, MGRP2+6, MGRP2+7 |
^(1 | LIST+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRAY | SSN~, SSN+4, SSN+7, SET+2 |
DFN | SET~, SET+1, SET+2 |
DTIME | GETCH+4 |
DUZ | MAIL+5 |
DX | XY~, XY+2*, XY+4 |
DY | XY~, XY+2*, XY+4 |
IO | TITLE+4, TITLE+5, TITLE+7 |
IO(0 | TITLE+5, TITLE+7 |
IOF | TITLE+1~*, TITLE+5 |
IOM | TITLE+1~*, TITLE+7, TITLE+8, UND |
>> IOXY | XY+1, XY+3 |
L | BASE~, BASE+5 |
RGC | GETCH+1~, GETCH+4*, GETCH+8*, GETCH+13*, GETCH+14*, GETCH+15*, GETCH+17 |
RGD | GETCH~, GETCH+4*, GETCH+8 |
RGDFN | SSN+5~*, SSN+6* |
RGFN | TITLE~, TITLE+8 |
RGLIST | LIST~, LIST+1, LIST+2*, LIST+4 |
RGLST | ENTRY~ |
RGLST( | ENTRY+4 |
RGMGRP | MGRP~, MGRP+3, MGRP2~, MGRP2+2, MGRP2+3*, MGRP2+4, MGRP2+5, MGRP2+6, MGRP2+7 |
RGMSG | MAIL~, MAIL+2, MAIL+4 |
RGMSG(1 | MAIL+2* |
RGNAME | LKP~, LKP+2, LKP+3, LKP+4, LKP+5 |
RGNUM | SNGPLR~, SNGPLR+3 |
RGOUT | ENTRY~, ENTRY+2! |
RGOUT( | ENTRY+3*, MGRP2+6* |
RGP | PAUSE~, PAUSE+1, GETCH~, GETCH+3 |
RGPLR | SNGPLR~, SNGPLR+2*, SNGPLR+3 |
RGSNG | SNGPLR~, SNGPLR+2, SNGPLR+3 |
RGT | GETCH~, GETCH+4*, GETCH+7 |
RGTTL | TITLE~, TITLE+7 |
RGUSR | ALERT~, ALERT+2*, ALERT+3, ENTRY~, ENTRY+3 |
RGV | GETCH~, GETCH+5*, GETCH+12, GETCH+13 |
RGVER | TITLE~, TITLE+2*, TITLE+3*, TITLE+7 |
RGX | PAUSE~, PAUSE+1, GETCH~, GETCH+2, MGRP+1~ |
RGX( | MGRP2+4, MGRP2+5* |
RGX(0 | MGRP+2* |
RGY | PAUSE~, PAUSE+1, GETCH~, GETCH+2 |
RGZ | SNGPLR+1~, SNGPLR+2*, SNGPLR+3, GETCH+1~, GETCH+6, GETCH+7*, GETCH+10, GETCH+11*, GETCH+13, GETCH+15 , BASE+2~, BASE+4*, ENTRY+1~, ENTRY+3*, LKP+1~, LKP+2*, LKP+3*, LKP+4, L1*, L1+1 , MGRP2+1~, MGRP2+6*, MGRP2+7* |
RGZ1 | BASE+2~, BASE+3*, BASE+4*, BASE+5, ENTRY+1~, ENTRY+3*, ENTRY+4*, ENTRY+5, ENTRY+6*, ENTRY+7 , ENTRY+8, ENTRY+9, ENTRY+10*, LKP+1~, LKP+3*, LKP+5, L1*, L1+1, L1+2, MGRP2+1~ |
RGZ2 | ENTRY+1~, ENTRY+7*, ENTRY+8, ENTRY+9 |
SSN | SSN~, SSN+4, SSN+6 |
U | PAUSE+1, GETCH+4, GETCH+5, ALERT+2 |
X | BASE~, BASE+3*, BASE+4*, UND~, MAIL+6* |
XMDUZ | MAIL~, MAIL+5* |
XMSUB | MAIL~, MAIL+4* |
XMTEXT | MAIL+1~, MAIL+3* |
XMY | MAIL~, MAIL+3*, MAIL+6*, MAIL+7 |
XMY( | MAIL+6* |
XQA | ALERT+1~, ALERT+3 |
XQADATA | ALERT+1~ |
XQAFLG | ALERT+1~ |
XQAID | ALERT+1~ |
XQAMSG | ALERT~, ALERT+2* |
XQAOPT | ALERT+1~ |
XQAROU | ALERT+1~ |
Y | TITLE+6*, TITLE+7, BASE~, BASE+1, BASE+4 |