Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PXRMLRED

Package: Clinical Reminders

Routine: PXRMLRED


Information

PXRMLRED ; SLC/PJH - List Rule Editor ;05/30/2006

Source Information

Source file <PXRMLRED.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Clinical Reminders 5 SETSTART^PXRMCOPY  $$FILE^PXRMEXCS  ($$TXT,EDIT,LROUT)^PXRMLRED  (COMP,DELETE)^PXRMLREX  ($$VEDIT,DIP,SEHIST)^PXRMUTIL  
List Manager 3 EN^VALM  FULL^VALM1  CLEAN^VALM10  
VA FileMan 3 ^DIC  ^DIE  $$EXTERNAL^DILFD  
Kernel 2 ENDR^%ZISS  $$RJ^XLFSTR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 20

Package Total Caller Graph
Clinical Reminders 19 PXRM FINDING RULE  PXRM FINDING TYPE PARAMETERS  PXRM LIST RULE DISPLAY MENU  PXRM LIST RULE DISPLAY/EDIT  PXRM LIST RULE EDIT  PXRM PATIENT LIST RULE  PXRM REMINDER CATEGORIES  PXRM REMINDER RULE  
PXRM RESOLUTIONS (GENERAL)  PXRM RULE SET  PXRM SPONSOR INQUIRY  PXRM SPONSOR LIST  PXRM SUMMARY LIST  PXRM TERM INQUIRY  PXRMEPM  PXRMEUT  
PXRMLRED  PXRMLRM  SEQUENCE  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
START(IEN,PXRMTYP) ;
ADD ;Add Rule
BLDLIST(IEN,TYP) ;Build workfile
EDIT(DA,TYP) ;Edit Rule
ENTRY ;Entry code
EXIT ;Exit code
HDR ; Header code
HLP ;Help code
INIT ;Init
LIT(VIEW) ;Header text depnds on view
LOCK(DA) ;Lock the record
LRDESC ;Display list rule fields - called by [PXRM RULE SET]
LREDIT ;Edit Rule
LREND(END,RJC) ;Display end date
LROUT(IEN,RJC) ;Output list rule display
LRSTRT(BEG,RJC) ;Display start date
PEXIT ;PXRM EXCH MENU protocol exit code
SCREEN ;validate rule type
SEQPRT ;Display list rule sequence fields - called by [PXRM RULE SET]
TXT() ;Return Rule Type text
UNLOCK(DA) ;Unlock the record
USE(DA,EDIT) ;Display usage of list rule
USET ;Usage display called from PXRM LIST RULE print template

External References

Name Field # of Occurrence
ENDR^%ZISS START+3
^DIC ADD+11
^DIE EDIT+29
$$EXTERNAL^DILFD SEQPRT+9
SETSTART^PXRMCOPY ADD+7
$$FILE^PXRMEXCS EDIT+9, EDIT+38
$$TXT^PXRMLRED USE+14
EDIT^PXRMLRED LREDIT+1
LROUT^PXRMLRED SEQPRT+19
COMP^PXRMLREX EDIT+26
DELETE^PXRMLREX EDIT+33
$$VEDIT^PXRMUTIL EDIT+1
DIP^PXRMUTIL BLDLIST+10
SEHIST^PXRMUTIL EDIT+39
EN^VALM START+5, HLP+3
FULL^VALM1 EXIT+4
CLEAN^VALM10 EXIT+3
$$RJ^XLFSTR LREND+1, LROUT+7, LROUT+9, LROUT+11, LROUT+15, LROUT+21, LROUT+32, LROUT+34, LRSTRT+1, SEQPRT+14
, SEQPRT+15, SEQPRT+16, SEQPRT+17

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IORESET,!
  • Line Location: ADD+3
Function Call: WRITE
  • Prompt: !,"This rule name already exists"
  • Line Location: ADD+15
Function Call: WRITE
  • Prompt: IORESET
  • Line Location: EDIT+6
Function Call: WRITE
  • Prompt: !!,?5,"Another user is editing this file, try later"
  • Line Location: LOCK+2
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR("LR Ending Date: ",RJC)_END
  • Line Location: LREND+1
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR("List Rule: ",RJC),LRN
  • Line Location: LROUT+7
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR("Description: ",RJC),$P(DATA,U,2)
  • Line Location: LROUT+9
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR("Rule Type: ",RJC)
  • Line Location: LROUT+11
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR("Use Existing PT List: ",RJC+2),EXISTPL
  • Line Location: LROUT+32
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR("Use Extract PT List Named: ",RJC+5)
  • Line Location: LROUT+34
Function Call: WRITE
  • Prompt: !," "
  • Line Location: LROUT+35
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR("LR Beginning Date: ",RJC)_BEG
  • Line Location: LRSTRT+1
Function Call: WRITE
  • Prompt: !!,$$RJ^XLFSTR("Sequence: ",RJC),SEQ
  • Line Location: SEQPRT+14
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR("Seq Beginning Date: ",RJC),SEQBDT
  • Line Location: SEQPRT+15
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR("Seq Ending Date: ",RJC),SEQEDT
  • Line Location: SEQPRT+16
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR("Operation: ",RJC),OPER
  • Line Location: SEQPRT+17
Function Call: WRITE
  • Prompt: !!,?TAB,"Used by:"
  • Line Location: USE+3
Function Call: WRITE
  • Prompt: " Not used by any rule set",!
  • Line Location: USE+5
Routine Call
  • DIC
  • Line Location:
    • ADD+11
Routine Call
  • DIE
  • Line Location:
    • EDIT+29
Routine Call
  • VALM
  • Line Location:
    • START+5
    • HLP+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PXRM(810.4 - [#810.4] Classic Fileman Calls
810.41 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PXD(811.9 - [#811.9] LROUT+24
^PXRM(810.4 - [#810.4] LOCK+1, LROUT+3, LROUT+33, SCREEN+3, SEQPRT+5, SEQPRT+6, SEQPRT+7, SEQPRT+10, SEQPRT+12, UNLOCK+1
, USE+5, USE+11, USE+12
^PXRMD(811.5 - [#811.5] LROUT+18
^PXRMXP(810.5 - [#810.5] LROUT+31
^TMP("PXRMLRED" BLDLIST+9!, BLDLIST+11, EXIT+1!
^TMP("PXRMLREDH" EXIT+2!

Label References

Name Line Occurrences
$$LIT HDR+1
$$LOCK EDIT+5
$$TXT ADD+2, ADD+9
BLDLIST ENTRY+1, LREDIT+3
EDIT ADD+18
LREND LROUT+38
LROUT LRDESC+3
LRSTRT LROUT+38
UNLOCK EDIT+29
USE EDIT+23, USET+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BEG LROUT+2~, LROUT+6*, LROUT+38, LRSTRT~, LRSTRT+1
COMP EDIT+26~, EDIT+33
CS1 EDIT+7~, EDIT+9*, EDIT+38
CS2 EDIT+7~, EDIT+38*
>> D0 SEQPRT+5, SEQPRT+6, SEQPRT+7, SEQPRT+10, SEQPRT+12
DA ADD+1~, ADD+16*, ADD+18, ADD+19, EDIT~, EDIT+1, EDIT+5, EDIT+9, EDIT+11, EDIT+23
, EDIT+26, EDIT+31, EDIT+38, EDIT+39, LOCK~, LOCK+1, UNLOCK~, UNLOCK+1, USE~, USE+5
, USE+11
DA(1 SCREEN+1, SCREEN+3
DATA LROUT+2~, LROUT+3*, LROUT+4, LROUT+6, LROUT+9, LROUT+16, LROUT+22, LROUT+29, USE+12*, USE+13
, USE+14
DIC ADD+1~, ADD+5*, ADD+7, ADD+14!, EDIT+7~, EDIT+39
DIC("A" ADD+9*
DIC("DR" ADD+10*
DIC("S" SCREEN+3*
DIC(0 ADD+8*
DIDEL EDIT+7~, EDIT+11*
DIE EDIT+7~, EDIT+11*
DLAYGO ADD+1~, ADD+8*
DONE ADD+1~, ADD+2*, ADD+4, ADD+19*
DR EDIT+7~, EDIT+13*, EDIT+15*, EDIT+17*, EDIT+19*, EDIT+21*
DTOUT ADD+1~, ADD+4, ADD+12*, ADD+13, ADD+14*, EDIT+7~
DUOUT ADD+1~, ADD+12, ADD+13, EDIT+7~
EDIT USE~, USE+2
END LREND~, LREND+1, LROUT+2~, LROUT+6*, LROUT+38
EXISTPL LROUT+28~, LROUT+29*, LROUT+30, LROUT+31*, LROUT+32
EXTRPL LROUT+28~, LROUT+33*, LROUT+34, LROUT+35, LROUT+36, SEQPRT+1~, SEQPRT+12*
FLDS BLDLIST+1~, BLDLIST+2*, BLDLIST+3*, BLDLIST+4*, BLDLIST+5*, BLDLIST+10
GBL BLDLIST+1~, BLDLIST+6*, BLDLIST+7*, BLDLIST+10
HED ADD+1~, ADD+2*
IEN START~, BLDLIST~, BLDLIST+10, ENTRY+1, LRDESC+1~, LRDESC+2*, LRDESC+3, LREDIT+1, LREDIT+3, LROUT~
, LROUT+3, LROUT+33, USET+1
IND SEQPRT+1~, SEQPRT+6*, SEQPRT+7, SEQPRT+10
>> IORESET ADD+3, EDIT+6
LR SEQPRT+1~, SEQPRT+8*, SEQPRT+19
LRN LROUT+2~, LROUT+4*, LROUT+7, SEQPRT+1~
LRNAM USE+7~, USE+13*, USE+15
LRTYP USE+7~, USE+14*, USE+15
ODA EDIT+7~, EDIT+11*, EDIT+29
OPER SEQPRT+1~, SEQPRT+8*, SEQPRT+9*, SEQPRT+17
ORU HLP+1~
ORUPRMT HLP+1~
PLIEN LROUT+2~
PLIST LROUT+2~
PXRMDONE START+1~
PXRMROOT BLDLIST+1~, BLDLIST+8*, BLDLIST+10
PXRMTYP START~, ADD+2, ENTRY+1, HDR+1, LIT+1, LREDIT+1, LREDIT+3, TXT+3, TXT+4, TXT+5
, TXT+6, USE+7~, USE+14*
>> RIEN LROUT+22*, LROUT+24
RJC LREND~, LREND+1, LROUT~, LROUT+7, LROUT+9, LROUT+11, LROUT+15, LROUT+21, LROUT+32, LROUT+34
, LROUT+35, LROUT+38, LRSTRT~, LRSTRT+1, SEQPRT+1~, SEQPRT+3*, SEQPRT+14, SEQPRT+15, SEQPRT+16, SEQPRT+17
, SEQPRT+19
RR SEQPRT+1~
SEQ SEQPRT+2~, SEQPRT+4*, SEQPRT+5*, SEQPRT+6, SEQPRT+14
SEQBDT SEQPRT+2~, SEQPRT+11*, SEQPRT+15
SEQEDT SEQPRT+2~, SEQPRT+11*, SEQPRT+16
SUB HLP+1~, HLP+2*, USE+10*, USE+11*, USE+12
>> TAB USE+2*, USE+3, USE+8*, USE+15
TEMP SEQPRT+2~, SEQPRT+7*, SEQPRT+8, SEQPRT+10*, SEQPRT+11
TERM LROUT+2~
TEXT SEQPRT+2~, TXT+1~, TXT+2*, TXT+3*, TXT+4*, TXT+5*, TXT+6*, TXT+7
TIEN LROUT+2~, LROUT+16*, LROUT+18
TTAB USE+1~
TYP ADD+1~, ADD+2*, ADD+10, ADD+18, BLDLIST~, BLDLIST+2, BLDLIST+3, BLDLIST+4, BLDLIST+5, EDIT~
, EDIT+13, EDIT+15, EDIT+17, EDIT+19, EDIT+21, EDIT+23, EDIT+26, EDIT+33
TYPE LROUT+2~, LROUT+6*, LROUT+13, LROUT+19, LROUT+26
U ADD+15, ADD+16, LRDESC+2, LROUT+4, LROUT+6, LROUT+9, LROUT+16, LROUT+18, LROUT+22, LROUT+24
, LROUT+29, LROUT+31, SCREEN+3, SEQPRT+8, SEQPRT+11, USE+13, USE+14
VALMBCK START+1~, EDIT+3*, EDIT+34*, EDIT+40*, EXIT+5*
VALMCNT START+1~, START+4*, BLDLIST+11*, INIT+1*
>> VALMHDR(1 HDR+1*
VALMSG START+1~, HDR+2*, PEXIT+1*
VIEW LIT~
X START+1~, START+2*, LRDESC+2
XMZ START+1~
XQORM START+1~, HLP+1~
XQORNOD START+1~
Y ADD+1~, ADD+14, ADD+15, ADD+16, EDIT+7~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All