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

Package: Clinical Reminders

Routine: PXRMCOPY


Information

PXRMCOPY ;SLC/PKR,PJH - Copy various reminder files. ;12/09/2019

Source Information

Source file <PXRMCOPY.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Clinical Reminders 6 SETSTART^PXRMCOPY  ASK^PXRMDCPY  DITEMAR^PXRMDUTL  EDIT^PXRMEDIT  $$VNAME^PXRMINTR  ($$FNFR,AWRITE)^PXRMUTIL  
VA FileMan 6 ^DIC  ($$GET1,FIELD)^DID  (,FILE,UPDATE)^DIE  (,IX)^DIK  $$GET1^DIQ  ^DIR  
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: 22

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  
PCE Patient Care Encounter 3 PXRM DEFINITION COPY  PXRM LOCATION LIST COPY  PXRM TERM COPY  

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.
GETORGRC(IENO,IENN,ROOT,WHAT,SKIP) ;
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
HASGF(IEN) ;
ITEMHSGF(IEN) ;
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+4
$$GET1^DID GETORGRC+29
FIELD^DID INIEH+3
^DIE GETNAM+33
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 GETNAMGETNAM+42
SETSTART^PXRMCOPY GETORGRC+22
ASK^PXRMDCPY GETNAM+30
DITEMAR^PXRMDUTL HASGF+6
EDIT^PXRMEDIT GETNAM+43
$$VNAME^PXRMINTR GETNAM+5
$$FNFR^PXRMUTIL GETORGRC+28
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+3
Function Call: WRITE
  • Prompt: !,NAME," is not a unique name!"
  • Line Location: GETNAM+14
Function Call: WRITE
  • Prompt: !
  • Line Location: GETNAM+35
Function Call: WRITE
  • Prompt: !,"The original "_WHAT_" "_ORGNAME_" has been copied into "_NAME_"."
  • Line Location: GETNAM+37
Function Call: WRITE
  • Prompt: !!,"New entry not created due to invalid name!",!
  • Line Location: DELETE+2
Routine Call
  • DIC
  • Line Location:
    • GETORGR+4
Routine Call
  • DIE
  • Line Location:
    • GETNAM+33
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+42

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PXRMD(801.41 - [#801.41] GETORGRC+8, GETORGRC+9, GETORGRC+10, GETORGRC+13, HASGF+5, ITEMHSGF+3, ITEMHSGF+4

Label References

Name Line Occurrences
$$GETFOIEN GETORGRC+23
$$HASGF GETORGRC+11
$$ITEMHSGF HASGF+4, HASGF+8
COPY COPYLL+5, COPYREM+5, COPYTAX+5, COPYTERM+5
DELETE GETNAM+1
GETNAM GETNAM+5, GETNAM+13
GETORGR COPY+2
GETORGRC GETORGR+8
INIEH GETNAM+18
MERGE GETORGRC+24
SCAS GETNAM+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS GETNAM+28~, GETNAM+30
ARRAY HASGF+1~, HASGF+6
CLASS SCAS~, SCAS+4
CNT HASGF+1~, HASGF+2*, HASGF+6
CUR SETSTART+2~
DA GETORGRC+1~, GETNAM+21*, GETNAM+32*, DELETE~
DARRAY HASGF+1~, HASGF+6
DARRAY( HASGF+7
DEST MERGE+1~, MERGE+2*, MERGE+4, MERGE+6, MERGE+8
DIC GETORGR+1~, GETORGR+2*, GETORGRC+1~, GETORGRC+4*, GETORGRC+22
DIC("A" GETORGR+2*
DIC(0 GETORGR+2*
DIE GETORGRC+1~, GETNAM+32*
DIEN HASGF+1~, HASGF+7*, HASGF+8
DIK GETORGRC+1~, GETNAM+21*, DELETE~
>> DILOCKTM MERGE+4
DIR GETORGRC+1~
DIR("A" GETORGRC+31*, GETNAM+40*, GETNAM+41*
DIR(0 GETORGRC+30*, GETNAM+39*
DIROUT COPY+1~, COPY+2, GETORGR+5*, GETORGR+7*
DIRUT GETORGRC+1~, GETNAM+1, GETNAM+42
>> DR GETNAM+32*
DTOUT COPY+1~, COPY+2, GETORGR+5, GETNAM+30, GETNAM+34*
DTYP GETORGRC+5~, GETORGRC+10*, GETORGRC+15, GETORGRC+17
DUOUT COPY+1~, GETORGR+5, GETNAM+30
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*
FAIL GETORGRC+1~, GETORGRC+4*, GETORGRC+14*, GETORGRC+16*, GETORGRC+18*, GETORGRC+20
FDA GETORGRC+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 GETORGRC+1~, GETORGRC+29*, GETORGRC+30
FILE GETORGRC+1~, GETORGRC+28*, GETORGRC+29, GETNAM+9, GETNAM+16, GETNAM+18
FILENUM INIEH~, INIEH+3, INIEH+20, SCAS~, SCAS+4, SCAS+5
FIND ITEMHSGF+1~, ITEMHSGF+4*, ITEMHSGF+5
FOUND ITEMHSGF+1~, ITEMHSGF+4*, ITEMHSGF+5*
HASGF GETORGRC+2~, GETORGRC+11*, GETORGRC+12
IEN HASGF~, HASGF+4, HASGF+5, HASGF+6, ITEMHSGF~, ITEMHSGF+3, ITEMHSGF+4, SCAS~, SCAS+3
IENN GETORGR+1~, GETORGR+8, GETORGRC~, GETORGRC+23*, GETORGRC+24, GETNAM+1, GETNAM+8, GETNAM+16, GETNAM+18, GETNAM+21
GETNAM+26, GETNAM+32, GETNAM+43, INIEH~, INIEH+6, INIEH+9, INIEH+15, INIEH+16, MERGE~, MERGE+2
IENO GETORGR+1~, GETORGR+6*, GETORGR+7, GETORGR+8, GETORGRC~, GETORGRC+8, GETORGRC+9, GETORGRC+10, GETORGRC+11, GETORGRC+13
, GETORGRC+24, GETORGRC+27, GETNAM+18, INIEH~, INIEH+20, MERGE~, MERGE+5
IENS GETORGRC+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
LFIND GETORGRC+5~, GETORGRC+9*, GETORGRC+17
LOCK GETORGRC+5~, GETORGRC+8*, GETORGRC+15, GETORGRC+17
MSG GETORGRC+2~, GETNAM+10!, INIEH+2~, INIEH+12, INIEH+14!, INIEH+22, SCAS+2~, SCAS+7
MSG("DIERR" GETNAM+13
NAME GETORGRC+2~, GETNAM+2*, GETNAM+5, GETNAM+9, GETNAM+14, GETNAM+25, GETNAM+37, GETNAM+41
NIEN GETFOIEN+2~, GETFOIEN+6*
OIEN GETFOIEN+2~, GETFOIEN+4*, GETFOIEN+5, GETFOIEN+6*, GETFOIEN+7
ORGNAME GETORGRC+2~, GETORGRC+27*, GETNAM+24, GETNAM+37, GETNAM+41
PROMPT COPY~, GETORGR+2, COPYLL+1~, COPYLL+4*, COPYLL+5, COPYREM+1~, COPYREM+4*, COPYREM+5, COPYTAX+1~, COPYTAX+4*
COPYTAX+5, COPYTERM+1~, COPYTERM+4*, COPYTERM+5
>> PXRMDANY GETNAM+23, GETNAM+34*
>> PXRMINST GETORGRC+15, GETORGRC+17, HASGF+3, ITEMHSGF+2
RESULT HASGF+1~, HASGF+2*, HASGF+3, HASGF+4*, HASGF+5, HASGF+7, HASGF+8*, HASGF+9
ROOT COPY~, GETORGR+2, GETORGR+8, GETORGRC~, GETORGRC+4, GETORGRC+6, GETORGRC+23, GETORGRC+24, GETORGRC+27, GETORGRC+28
GETNAM+1, GETNAM+18, GETNAM+21, GETNAM+26, GETNAM+32, GETNAM+43, 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
SKIP GETORGRC~, GETNAM+37
SOURCE MERGE+1~, MERGE+5*, MERGE+6
SPONSOR SCAS~, SCAS+5
TARGET INIEH+2~
TARGET("SPECIFIER" INIEH+4
TEXT GETNAM+28~, GETNAM+29*, GETNAM+30
U GETORGR+6, GETORGRC+8, GETORGRC+9, GETORGRC+10, GETORGRC+13, GETORGRC+27, GETORGRC+30, GETNAM+26, GETFOIEN+4, ITEMHSGF+3
, SETSTART+4
WHAT COPY~, GETORGR+8, GETORGRC~, GETNAM+37, GETNAM+41, 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 GETORGRC+2~
Y GETORGR+1~, GETORGR+6, GETORGRC+2~, GETNAM+2, GETNAM+43
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