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

Package: Problem List

Routine: GMPLCOPY


Information

GMPLCOPY ;ISP/TC - Copy Problem Selection Lists/Categories ;09/21/16 09:03

Source Information

Source file <GMPLCOPY.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 5 ^DIC  $$GET1^DID  FILE^DIE  (,IX)^DIK  ^DIR  
Kernel 2 $$DT^XLFDT  MES^XPDUTL  
Problem List 1 $$VNAME^GMPLINTR  

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

Package Total Caller Graph
Problem List 1 GMPLBLDC  

Entry Points

Name Comments DBIA/ICR reference
COPYCAT(GMPVAL) ;Copy a selection list category.
GETFOIEN(GMPROOT) ;Return the first open IEN in GMPROOT. This should be called
GETORIG
DELETE(DIK,DA) ;Delete the entry just added.
COPYLIST ;Copy a selection list.
GETORIGC(GMPIENO,GMPIENN,GMPROOT,GMPWHAT,GMPVAL) ;
MERGE(GMPIENN,GMPIENO,GMPROOT) ;Use MERGE to copy GMPROOT(GMPIENO into GMPROOT(GMPIENN.
COPY(GMPPRMPT,GMPROOT,GMPWHAT,GMPVAL) ;Copy an entry of GMPROOT into a new entry.
SETSTART(GMPROOT) ;Set the starting value to add new entries. Start
AWRITE(GMPREF) ;Write all the descendants of the array reference, including the
SETCLDLM(GMPFLNM,GMPIEN,GMPCLASS) ;Set the class field to GMPCLASS and update Date Last Modified
GETNAM

External References

Name Field # of Occurrence
^DIC GETORIG+4
$$GET1^DID GETORIGC+12
FILE^DIE SETCLDLM+6, GETNAM+11
^DIK DELETE+1
IX^DIK GETNAM+20
^DIR GETNAM
$$VNAME^GMPLINTR GETNAM+5
$$DT^XLFDT SETCLDLM+5
MES^XPDUTL AWRITE+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"New entry not created due to invalid name!",!
  • Line Location: DELETE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: GETORIG+3
Function Call: WRITE
  • Prompt: !,GMPNAME," is not a unique name!"
  • Line Location: GETNAM+14
Function Call: WRITE
  • Prompt: !!,"The original "_GMPWHAT_" "_GMPORGNM_" has been copied into "_GMPNAME_"."
  • Line Location: GETNAM+24
Routine Call
  • DIC
  • Line Location:
    • GETORIG+4
Routine Call
  • DIE
  • Line Location:
    • SETCLDLM+6
    • GETNAM+11
Routine Call
  • DIR
  • Line Location:
    • GETNAM

Label References

Name Line Occurrences
$$GETFOIEN GETORIGC+6
AWRITE SETCLDLM+7
COPY COPYCAT+5, COPYLIST+5
DELETE GETNAM+1
GETNAM GETNAM+5, GETNAM+13
GETORIG COPY+2
GETORIGC GETORIG+8
MERGE GETORIGC+7
SETCLDLM GETNAM+16
SETSTART GETORIGC+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA DELETE~, GETORIGC+1~, GETNAM+19*
DIC GETORIG+1~, GETORIG+2*, GETORIGC+1~, GETORIGC+3*, GETORIGC+5
DIC("A" GETORIG+2*
DIC(0 GETORIG+2*
DIE GETORIGC+1~
DIK DELETE~, GETORIGC+1~, GETNAM+19*
>> DILOCKTM MERGE+4
DIR GETORIGC+1~
DIR("A" GETORIGC+14*
DIR(0 GETORIGC+13*
DIROUT COPY+1~, COPY+2, GETORIG+5*, GETORIG+7*
DIRUT GETORIGC+1~, GETNAM+1
DTOUT COPY+1~, COPY+2, GETORIG+5
DUOUT COPY+1~, GETORIG+5
GMPCLASS SETCLDLM~, SETCLDLM+4
GMPCUR SETSTART+2~
GMPDEST MERGE+1~, MERGE+2*, MERGE+4, MERGE+6, MERGE+8
GMPDONE AWRITE+3~, AWRITE+12*, AWRITE+13, AWRITE+19*
GMPENTRY GETFOIEN+2~, GETFOIEN+3*, GETFOIEN+4, GETFOIEN+5*, GETFOIEN+6*, SETSTART+2~, SETSTART+3*, SETSTART+4*
GMPFDA SETCLDLM+1~, GETORIGC+1~
GMPFDA( SETCLDLM+4*, SETCLDLM+5*, GETNAM+9*
GMPFILE GETORIGC+1~, GETORIGC+11*, GETORIGC+12, GETNAM+9, GETNAM+16
GMPFLD SETCLDLM+1~, SETCLDLM+3*, SETCLDLM+4
GMPFLDLN GETORIGC+1~, GETORIGC+12*, GETORIGC+13
GMPFLNM SETCLDLM~, SETCLDLM+3, SETCLDLM+4, SETCLDLM+5
GMPIEN SETCLDLM~, SETCLDLM+2
GMPIENN GETORIG+1~, GETORIG+8, GETORIGC~, GETORIGC+6*, GETORIGC+7, GETNAM+1, GETNAM+8, GETNAM+16, GETNAM+19, GETNAM+22
, GETNAM+23, MERGE~, MERGE+2
GMPIENO GETORIG+1~, GETORIG+6*, GETORIG+7, GETORIG+8, GETORIGC~, GETORIGC+7, GETORIGC+10, MERGE~, MERGE+5
GMPIENS SETCLDLM+1~, SETCLDLM+2*, SETCLDLM+4, SETCLDLM+5, GETORIGC+2~, GETNAM+8*, GETNAM+9
GMPIND AWRITE+3~, AWRITE+16*, AWRITE+17
GMPL0 GETORIGC+2~, GETNAM+22*, GETNAM+23
GMPLEN AWRITE+3~, AWRITE+15*, AWRITE+16
GMPLN AWRITE+3~, AWRITE+5*, AWRITE+17*
GMPMSG SETCLDLM+1~, SETCLDLM+7, GETORIGC+2~, GETNAM+10!
GMPMSG("DIERR" GETNAM+13
GMPNAME GETORIGC+2~, GETNAM+2*, GETNAM+5, GETNAM+9, GETNAM+14, GETNAM+24
GMPNIEN GETFOIEN+2~, GETFOIEN+6*
GMPOIEN GETFOIEN+2~, GETFOIEN+4*, GETFOIEN+5, GETFOIEN+6*, GETFOIEN+7
GMPORGNM GETORIGC+2~, GETORIGC+10*, GETNAM+24
GMPPRMPT COPY~, COPYCAT+1~, COPYCAT+4*, COPYCAT+5, COPYLIST+1~, COPYLIST+4*, COPYLIST+5, GETORIG+2
GMPPRT AWRITE+3~, AWRITE+6*, AWRITE+17
GMPREF AWRITE~, AWRITE+4, AWRITE+6, AWRITE+8, AWRITE+10*, AWRITE+11, AWRITE+13, AWRITE+14, AWRITE+15, AWRITE+16
, AWRITE+17, AWRITE+18*, AWRITE+19
GMPROOT COPY~, COPYCAT+1~, COPYCAT+3*, COPYCAT+5, COPYLIST+1~, COPYLIST+3*, COPYLIST+5, GETFOIEN~, GETFOIEN+3, GETFOIEN+5
, GETFOIEN+6, GETORIG+2, GETORIG+8, GETORIGC~, GETORIGC+3, GETORIGC+6, GETORIGC+7, GETORIGC+10, GETORIGC+11, GETNAM+1
, GETNAM+19, GETNAM+22, MERGE~, MERGE+2, MERGE+5, SETSTART~, SETSTART+3, AWRITE+3~, AWRITE+9*, AWRITE+11
, AWRITE+14, AWRITE+19
GMPSRCE MERGE+1~, MERGE+5*, MERGE+6
GMPSTRT AWRITE+3~, AWRITE+14*, AWRITE+16
GMPTMP AWRITE+3~, AWRITE+8*, AWRITE+9
GMPTXT AWRITE+3~, AWRITE+20
GMPTXT( AWRITE+17*
GMPVAL COPY~, COPYCAT~, COPYCAT+5, GETORIG+8, GETORIGC~, GETNAM+23*
GMPWHAT COPY~, COPYCAT+1~, COPYCAT+2*, COPYCAT+5, COPYLIST+1~, COPYLIST+2*, COPYLIST+5, GETORIG+8, GETORIGC~, GETNAM+24
U GETFOIEN+4, GETORIG+6, GETORIGC+10, GETORIGC+11, GETORIGC+13, GETNAM+23, SETSTART+4
X GETORIGC+2~
Y GETORIG+1~, GETORIG+6, GETORIGC+2~, GETNAM+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All