Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: RGRSUTL2

Package: Clinical Information Resource Network

Routine: RGRSUTL2


Information

RGRSUTL2 ;ALB/RJS-UTILITIES FOR CIRN ;1/2/97

Source Information

Source file <RGRSUTL2.m>

Entry Points

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) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,$S(IO=IO(0):$C(27,91,55,109),1:""),$C(13)
  • Line Location: TITLE+5
Function Call: WRITE
  • Prompt: Y,?(IOM-$L(RGTTL)\2),RGTTL,?(IOM-$L(RGVER)),RGVER,!,$S(IO=IO(0):$C(27,91,109),1:$$UND),!
  • Line Location: TITLE+7
Function Call: WRITE
  • Prompt: $G(RGP)
  • Line Location: GETCH+3
Function Call: WRITE
  • Prompt: $C(7,32,8)
  • Line Location: GETCH+14
Function Call: WRITE
  • Prompt: !
  • Line Location: GETCH+16
Info |  Source |  Entry Points |  Interaction Calls