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

Package: PCE Patient Care Encounter

Routine: PXCOPY


Information

PXCOPY ;SLC/PKR - Copy various PCE files. ;05/21/2018

Source Information

Source file <PXCOPY.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
VA FileMan 7 $$FIND1^DIC  ($$GET1,FIELD)^DID  (FILE,UPDATE)^DIE  IX^DIK  $$ROOT^DILFD  $$GET1^DIQ  ^DIR  
PCE Patient Care Encounter 5 SMANEDIT^PXEDUSM  SMANEDIT^PXEXSM  SMANEDIT^PXHFSM  $$VNAME^PXINPTR  AWRITE^PXUTIL  
Kernel 2 ($$FMTE,$$NOW)^XLFDT  $$LOW^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: 3

Package Total Caller Graph
PCE Patient Care Encounter 3 PXEDUMGR  PXEXMGR  PXHFMGR  

Entry Points

Name Comments DBIA/ICR reference
COPY(FILENUM,IEN) ;Copy an entry of ROOT into a new entry.
GETNAM
EDIT(FILENUM,IEN) ;Call the appropriate editor.
GETFOIEN(ROOT) ;Return the first open IEN in ROOT. This should be called
INIEH(FILENUM,ROOT,IENN,IEN) ;Initialize the change log after a copy.
MERGE(IENN,IEN,ROOT) ;Use MERGE to copy ROOT(IEN 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
$$FIND1^DIC GETNAM+6
$$GET1^DID COPY+4, COPY+8
FIELD^DID INIEH+3
FILE^DIE GETNAM+19, INIEH+11, SCAS+6
UPDATE^DIE INIEH+21
IX^DIK GETNAM+30
$$ROOT^DILFD COPY+3
$$GET1^DIQ COPY+6, INIEH+18, INIEH+20
^DIR GETNAM, GETNAM+37
SMANEDIT^PXEDUSM EDIT+2
SMANEDIT^PXEXSM EDIT+3
SMANEDIT^PXHFSM EDIT+4
$$VNAME^PXINPTR GETNAM+5
AWRITE^PXUTIL INIEH+12, INIEH+22, SCAS+7
$$FMTE^XLFDT INIEH+17
$$NOW^XLFDT INIEH+17
$$LOW^XLFSTR COPY+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There is already an entry with that name!"
  • Line Location: GETNAM+7
Function Call: WRITE
  • Prompt: !,"Could not get a lock!"
  • Line Location: GETNAM+13
Function Call: WRITE
  • Prompt: !,NAME," is not a unique name!"
  • Line Location: GETNAM+22
Function Call: WRITE
  • Prompt: !
  • Line Location: GETNAM+33
Routine Call
  • DIC
  • Line Location:
    • GETNAM+6
Routine Call
  • DIE
  • Line Location:
    • GETNAM+19
    • INIEH+11
    • SCAS+6
Routine Call
  • DIE
  • Line Location:
    • INIEH+21
Routine Call
  • DIR
  • Line Location:
    • GETNAM
    • GETNAM+37

FileMan Files Accessed Via FileMan Db Call

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

Label References

Name Line Occurrences
$$GETFOIEN GETNAM+11
$$MERGE GETNAM+12
EDIT GETNAM+38
GETNAM GETNAM+5, GETNAM+6, GETNAM+13, GETNAM+21
INIEH GETNAM+26
SCAS GETNAM+24
SETSTART GETNAM+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CLASS SCAS~, SCAS+4
CUR SETSTART+2~
DA COPY+1~, GETNAM+29*
DEST MERGE+1~, MERGE+2*, MERGE+4, MERGE+7, MERGE+9
DIK COPY+1~, GETNAM+29*
>> DILOCKTM MERGE+4
DIR COPY+1~
DIR("A" COPY+10*, GETNAM+35*, GETNAM+36*
DIR(0 COPY+9*, GETNAM+34*
DIROUT COPY+1~
DIRUT COPY+1~, GETNAM+1, GETNAM+37
DTOUT COPY+1~
DUOUT COPY+1~
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 COPY+1~, INIEH+2~, INIEH+14!, SCAS+2~
FDA( GETNAM+17*, INIEH+10*, INIEH+11, INIEH+17*, INIEH+18*, INIEH+19*, SCAS+4*, SCAS+5*
FDAIEN INIEH+2~
FDAIEN( INIEH+16*
FIELDLEN COPY+1~, COPY+8*, COPY+9
FILENAME COPY+1~, COPY+4*, COPY+5*, GETNAM+36
FILENUM COPY~, COPY+3, COPY+4, COPY+6, COPY+8, GETNAM+6, GETNAM+17, GETNAM+24, GETNAM+26, GETNAM+38
, EDIT~, EDIT+2, EDIT+3, EDIT+4, INIEH~, INIEH+3, INIEH+20, SCAS~, SCAS+4, SCAS+5
IEN COPY~, COPY+6, GETNAM+12, GETNAM+26, EDIT~, EDIT+2, EDIT+3, EDIT+4, INIEH~, INIEH+20
, MERGE~, MERGE+6, SCAS~, SCAS+3
IENN COPY+2~, GETNAM+11*, GETNAM+12, GETNAM+16, GETNAM+24, GETNAM+26, GETNAM+29, GETNAM+38, INIEH~, INIEH+6
, INIEH+9, INIEH+15, INIEH+16, MERGE~, MERGE+2
IENS COPY+2~, GETNAM+16*, GETNAM+17, 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 COPY+2~, GETNAM+18!, INIEH+2~, INIEH+12, INIEH+14!, INIEH+22, SCAS+2~, SCAS+7
MSG("DIERR" GETNAM+21
NAME COPY+2~, GETNAM+2*, GETNAM+5, GETNAM+6, GETNAM+17, GETNAM+22, GETNAM+36
NIEN GETFOIEN+2~, GETFOIEN+6*
OIEN GETFOIEN+2~, GETFOIEN+4*, GETFOIEN+5, GETFOIEN+6*, GETFOIEN+7
ORIGNAME COPY+2~, COPY+6*, GETNAM+36
RESULT COPY+2~, GETNAM+12*, GETNAM+13
ROOT COPY+2~, COPY+3*, GETNAM+10, GETNAM+11, GETNAM+12, GETNAM+26, GETNAM+29, GETFOIEN~, GETFOIEN+3, GETFOIEN+5
, GETFOIEN+6, INIEH~, INIEH+6, MERGE~, MERGE+2, MERGE+6, SETSTART~, SETSTART+3
SFN INIEH+2~, INIEH+4*, INIEH+5, INIEH+10, INIEH+11, INIEH+17, INIEH+18, INIEH+19
SOURCE MERGE+1~, MERGE+6*, MERGE+7
SPONSOR SCAS~, SCAS+5
TARGET INIEH+2~
TARGET("SPECIFIER" INIEH+4
U COPY+9, GETFOIEN+4, SETSTART+4
WP INIEH+2~
WP(1 INIEH+20*
X COPY+2~
Y COPY+2~, GETNAM+2, GETNAM+38
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables  | All