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 |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PXRMCOPY

Package: Clinical Reminders

Routine: PXRMCOPY


Information

PXRMCOPY ; SLC/PKR,PJH - Copy various reminder files. ;01/28/2013

Source Information

Source file <PXRMCOPY.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 6 ^DIC  ($$GET1,FIELD)^DID  (FILE,UPDATE)^DIE  (,IX)^DIK  $$GET1^DIQ  ^DIR  
Clinical Reminders 4 SETSTART^PXRMCOPY  EDIT^PXRMEDIT  $$VNAME^PXRMINTR  ($$FNFR,AWRITE)^PXRMUTIL  
Kernel 1 ($$FMTE,$$NOW)^XLFDT  

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: 19

Package Total Caller Graph
Clinical Reminders 19 PXRM DEFINITION COPY  PXRM LOCATION LIST COPY  PXRM TERM COPY  PXRMCFED  PXRMCOPY  PXRMCPLS  PXRMDBL3  PXRMDCPY  
PXRMDEDT  PXRMEFED  PXRMEGED  PXRMEPED  PXRMLLED  PXRMLRED  PXRMREDT  PXRMSPED  
PXRMSTS  PXRMTMED  PXRMV1I  

Entry Points

Name Comments DBIA/ICR reference
COPY(PROMPT,ROOT,WHAT) ;Copy an entry of ROOT into a new entry.
GETORGR ;Look-up logic to get and copy source entry to destination.
GETNAM
COPYLL ;Copy a location list.
COPYREM ;Copy a reminder definition.
COPYTAX ;Copy a taxonomy.
COPYTERM ;Copy a reminder term.
DELETE(DIK,DA) ;Delete the entry just added.
GETFOIEN(ROOT) ;Return the first open IEN in ROOT. This should be called
INIEH(FILENUM,ROOT,IENN,IENO) ;Initialize the edit history after a copy.
MERGE(IENN,IENO,ROOT) ;Use MERGE to copy ROOT(IENO into ROOT(IENN.
SCAS(FILENUM,IEN,CLASS,SPONSOR) ;Set the class field to CLASS and the sponsor
SETSTART(ROOT) ;Set the starting value to add new entries. Start

External References

Name Field # of Occurrence
^DIC GETORGR+5
$$GET1^DID GETORGR+18
FIELD^DID INIEH+3
FILE^DIE GETNAM+11, INIEH+11, SCAS+6
UPDATE^DIE INIEH+21
^DIK DELETE+1
IX^DIK GETNAM+22
$$GET1^DIQ INIEH+18, INIEH+20
^DIR GETNAM, GETNAM+29
SETSTART^PXRMCOPY GETORGR+11
EDIT^PXRMEDIT GETNAM+30
$$VNAME^PXRMINTR GETNAM+5
$$FNFR^PXRMUTIL GETORGR+17
AWRITE^PXRMUTIL INIEH+12, INIEH+22, SCAS+7
$$FMTE^XLFDT INIEH+17
$$NOW^XLFDT INIEH+17

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: GETORGR+4
Function Call: WRITE
  • Prompt: !,NAME," is not a unique name!"
  • Line Location: GETNAM+14
Function Call: WRITE
  • Prompt: !
  • Line Location: GETNAM+23
Function Call: WRITE
  • Prompt: !!,"New entry not created due to invalid name!",!
  • Line Location: DELETE+2
Routine Call
  • DIC
  • Line Location:
    • GETORGR+5
Routine Call
  • DIE
  • Line Location:
    • GETNAM+11
    • INIEH+11
    • SCAS+6
Routine Call
  • DIE
  • Line Location:
    • INIEH+21
Routine Call
  • DIR
  • Line Location:
    • GETNAM
    • GETNAM+29

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ

Label References

Name Line Occurrences
$$GETFOIEN GETORGR+12
COPY COPYLL+5, COPYREM+5, COPYTAX+5, COPYTERM+5
DELETE GETNAM+1
GETNAM GETNAM+5, GETNAM+13
GETORGR COPY+2
INIEH GETNAM+18
MERGE GETORGR+13
SCAS GETNAM+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CLASS SCAS~, SCAS+4
CUR SETSTART+2~
DA GETORGR+1~, GETNAM+21*, DELETE~
DEST MERGE+1~, MERGE+2*, MERGE+4, MERGE+6, MERGE+8
DIC GETORGR+1~, GETORGR+3*, GETORGR+11
DIC("A" GETORGR+3*
DIC(0 GETORGR+3*
DIE GETORGR+1~
DIK GETORGR+1~, GETNAM+21*, DELETE~
>> DILOCKTM MERGE+4
DIR GETORGR+1~
DIR("A" GETORGR+20*, GETNAM+27*, GETNAM+28*
DIR(0 GETORGR+19*, GETNAM+26*
DIROUT COPY+1~, COPY+2, GETORGR+6*, GETORGR+8*
DIRUT GETORGR+1~, GETNAM+1, GETNAM+29
DTOUT COPY+1~, COPY+2, GETORGR+6
DUOUT COPY+1~, GETORGR+6
DUZ INIEH+18
ENTRY GETFOIEN+2~, GETFOIEN+3*, GETFOIEN+4, GETFOIEN+5*, GETFOIEN+6*, INIEH+2~, INIEH+6*, INIEH+8, SETSTART+2~, SETSTART+3*
, SETSTART+4*
FDA GETORGR+1~, INIEH+2~, INIEH+14!, SCAS+2~
FDA( GETNAM+9*, INIEH+10*, INIEH+11, INIEH+17*, INIEH+18*, INIEH+19*, SCAS+4*, SCAS+5*
FDAIEN INIEH+2~
FDAIEN( INIEH+16*
FIELDLEN GETORGR+1~, GETORGR+18*, GETORGR+19
FILE GETORGR+1~, GETORGR+17*, GETORGR+18, GETNAM+9, GETNAM+16, GETNAM+18
FILENUM INIEH~, INIEH+3, INIEH+20, SCAS~, SCAS+4, SCAS+5
IEN SCAS~, SCAS+3
IENN GETORGR+2~, GETORGR+12*, GETORGR+13, GETNAM+1, GETNAM+8, GETNAM+16, GETNAM+18, GETNAM+21, GETNAM+30, INIEH~
, INIEH+6, INIEH+9, INIEH+15, INIEH+16, MERGE~, MERGE+2
IENO GETORGR+2~, GETORGR+7*, GETORGR+8, GETORGR+13, GETORGR+16, GETNAM+18, INIEH~, INIEH+20, MERGE~, MERGE+5
IENS GETORGR+2~, GETNAM+8*, GETNAM+9, INIEH+2~, INIEH+9*, INIEH+10, INIEH+15*, INIEH+17, INIEH+18, INIEH+19
, SCAS+2~, SCAS+3*, SCAS+4, SCAS+5
IND INIEH+2~, INIEH+7*, INIEH+8*, INIEH+9
MSG GETORGR+2~, GETNAM+10!, INIEH+2~, INIEH+12, INIEH+14!, INIEH+22, SCAS+2~, SCAS+7
MSG("DIERR" GETNAM+13
NAME GETORGR+2~, GETNAM+2*, GETNAM+5, GETNAM+9, GETNAM+14, GETNAM+28
NIEN GETFOIEN+2~, GETFOIEN+6*
OIEN GETFOIEN+2~, GETFOIEN+4*, GETFOIEN+5, GETFOIEN+6*, GETFOIEN+7
ORGNAME GETORGR+2~, GETORGR+16*, GETNAM+28
PROMPT COPY~, GETORGR+3, COPYLL+1~, COPYLL+4*, COPYLL+5, COPYREM+1~, COPYREM+4*, COPYREM+5, COPYTAX+1~, COPYTAX+4*
, COPYTAX+5, COPYTERM+1~, COPYTERM+4*, COPYTERM+5
ROOT COPY~, GETORGR+3, GETORGR+12, GETORGR+13, GETORGR+16, GETORGR+17, GETNAM+1, GETNAM+18, GETNAM+21, GETNAM+30
, COPYLL+1~, COPYLL+3*, COPYLL+5, COPYREM+1~, COPYREM+3*, COPYREM+5, COPYTAX+1~, COPYTAX+3*, COPYTAX+5, COPYTERM+1~
, COPYTERM+3*, COPYTERM+5, GETFOIEN~, GETFOIEN+3, GETFOIEN+5, GETFOIEN+6, INIEH~, INIEH+6, MERGE~, MERGE+2
, MERGE+5, SETSTART~, SETSTART+3
SFN INIEH+2~, INIEH+4*, INIEH+5, INIEH+10, INIEH+11, INIEH+17, INIEH+18, INIEH+19
SOURCE MERGE+1~, MERGE+5*, MERGE+6
SPONSOR SCAS~, SCAS+5
TARGET INIEH+2~
TARGET("SPECIFIER" INIEH+4
U GETORGR+7, GETORGR+16, GETORGR+19, GETFOIEN+4, SETSTART+4
WHAT COPY~, GETNAM+28, COPYLL+1~, COPYLL+2*, COPYLL+5, COPYREM+1~, COPYREM+2*, COPYREM+5, COPYTAX+1~, COPYTAX+2*
, COPYTAX+5, COPYTERM+1~, COPYTERM+2*, COPYTERM+5
WP INIEH+2~
WP(1 INIEH+20*
X GETORGR+2~
Y GETORGR+2~, GETORGR+7, GETNAM+2, GETNAM+30
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables  | All