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

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

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

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
  • VALM
  • Line Location:
    • START+5
    • HLP+3
Routine Call
  • DIE
  • Line Location:
    • EDIT+29
Routine Call
  • DIC
  • Line Location:
    • ADD+11

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