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

Package: VA Fileman

Routine: DIKKUTL4


Information

DIKKUTL4 ;SFISC/MKO-KEY DEFINITION, READER PROMPTS ;10:01 AM 15 Jul 1998

Source Information

Source file <DIKKUTL4.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA Fileman 2 WRAP^DIKCU2  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
VA Fileman 1 DIKKUTL  

Entry Points

Name Comments DBIA/ICR reference
EDORI() ;Choose to edit key, delete key, or create a Uniqueness Index
EDORC() ;Choose to edit key, delete key, or create a Uniqueness Index
RORM(DIKKUFLD,DIKKFLD) ;
EORD(DIKKID,DIKKFL) ;Choose to edit or delete the key.

External References

Name Field # of Occurrence
WRAP^DIKCU2 EORD+6
^DIR RORM+6, EORD+11, EDORC+6, EDORI+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"The Key fields and the fields in the Uniqueness Index don't match."
  • Line Location: RORM+2
Function Call: WRITE
  • Prompt: !,@$S(I:"?6",1:"?0"),DIKKMSG(I)
  • Line Location: EORD+7
Function Call: WRITE
  • Prompt: !,$C(7)_"NOTE: All Keys must have a Uniqueness Index defined."
  • Line Location: EDORC+3
Function Call: WRITE
  • Prompt: !!,$C(7)_"ERROR: The key is not unique and/or some records have key field values missing."
  • Line Location: EDORI+3
Routine Call
  • DIR
  • Line Location:
    • RORM+6
    • EORD+11
    • EDORC+6
    • EDORI+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIKKFL EORD~, EORD+4
DIKKFLD RORM~, RORM+5
DIKKID EORD~, EORD+4, EORD+5
DIKKMSG EORD+1~, EORD+6
DIKKMSG( EORD+7
DIKKMSG(0 EORD+4*, EORD+5*
DIKKOPT RORM+1~, RORM+3*, RORM+4*, RORM+5*
DIKKUFLD RORM~, RORM+4, RORM+7
DIR RORM+1~, EORD+1~, EDORC+1~, EDORI+1~
DIR("?" EDORC+5*, EDORI+5*
DIR(0 RORM+3*, RORM+4*, RORM+5*, EORD+10*, EDORC+4*, EDORI+4*
DIROUT RORM+1~, EORD+1~, EDORC+1~, EDORI+1~
DIRUT RORM+1~, RORM+7, RORM+8, EORD+1~, EORD+12, EDORC+1~, EDORC+7, EDORI+1~, EDORI+7
DTOUT RORM+1~, EORD+1~, EDORC+1~, EDORI+1~
DUOUT RORM+1~, EORD+1~, EDORC+1~, EDORI+1~
I EORD+1~, EORD+7*
X RORM+1~, EORD+1~, EDORC+1~, EDORI+1~
Y RORM+1~, RORM+7, RORM+8, EORD+1~, EORD+12, EDORC+1~, EDORC+7, EDORI+1~, EDORI+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Local Variables |  All