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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DIKKUTL

Package: VA Fileman

Routine: DIKKUTL


Information

DIKKUTL ;SFISC/MKO-UTILITY OPTION TO DEFINE A KEY ;8:13 AM 7 Jun 2001 [ 04/02/2003 8:25 AM ]

Source Information

Source file <DIKKUTL.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
VA Fileman 15 ^DDS  MSG^DIALOG  UPDATE^DIE  ^DIK  LOADXREF^DIKC1  $$SUB^DIKCU  ($$GCMP,WRAP)^DIKCU2  (DELETE,GETFLIST)^DIKCUTL  
KSC^DIKCUTL3  $$INTEG^DIKK  (CREATE,UICREATE,UIMOD)^DIKKUTL1  ($$CHOOSE,GET,GETFLD,LIST)^DIKKUTL2  VERIFY^DIKKUTL3  ($$EDORC,$$EDORI,$$EORD,$$RORM)^DIKKUTL4  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
VA Fileman 2 DIKKUTL1  DIU  

Entry Points

Name Comments DBIA/ICR reference
EOP ;Issue Press Return to continue prompt
EDITEND ;
KEYID(KEY,TOP,FILE) ;Return string of text that identifies the key
EDIT(DIKKEY,DIKKTOP,DIKKFILE) ;Edit a Key
DELUI(DIKKUI,DIKKTOP,DIKKFILE,DIKKID,DIKKEY) ;Delete the Uniqueness Index
DELKEY(DA,DIKKID) ;Call DIK to delete the key
UIID(UI,TOP,FILE) ;Return text that identifies uniqueness index
DELETE(DIKKEY,DIKKTOP,DIKKFILE) ;Delete a Key
CHECK() ;Prompt whether to check key integrity
RD() ;Prompt for action
REMOD ;Get and list keys on file DIKKFILE
REEDIT ;Come back here, if user chooses to re-edit the key
MOD ;Create/Modify/Edit a Key

External References

Name Field # of Occurrence
^DDS REEDIT+10
MSG^DIALOG REEDIT+83
UPDATE^DIE REEDIT+81
^DIK REEDIT+71, DELKEY+2
LOADXREF^DIKC1 REEDIT+8, REEDIT+18
$$SUB^DIKCU MOD+8
$$GCMP^DIKCU2 REEDIT+56
WRAP^DIKCU2 DELUI+10
DELETE^DIKCUTL DELUI+15
GETFLIST^DIKCUTL REEDIT+19
KSC^DIKCUTL3 REEDIT+20
$$INTEG^DIKK EDITEND+4
CREATE^DIKKUTL1 REMOD+24
UICREATE^DIKKUTL1 REEDIT+42
UIMOD^DIKKUTL1 REEDIT+86
$$CHOOSE^DIKKUTL2 REMOD+11, REMOD+16, REMOD+28
GET^DIKKUTL2 REMOD+2
GETFLD^DIKKUTL2 REEDIT+31
LIST^DIKKUTL2 REMOD+3
VERIFY^DIKKUTL3 REMOD+29
$$EDORC^DIKKUTL4 REEDIT+47
$$EDORI^DIKKUTL4 EDITEND+6
$$EORD^DIKKUTL4 REEDIT+35, REEDIT+52
$$RORM^DIKKUTL4 REEDIT+60
^DIR REMOD+23, DELETE+7, DELUI+14, RD+8, EOP+4, CHECK+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: REMOD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: REMOD+3
Function Call: WRITE
  • Prompt: !,$C(7)_"The definition of the Uniqueness Index was modified."
  • Line Location: REEDIT+17
Function Call: WRITE
  • Prompt: !!," Modifying fields in Key ..."
  • Line Location: REEDIT+68
Function Call: WRITE
  • Prompt: " DONE!"
  • Line Location: REEDIT+82
Function Call: WRITE
  • Prompt: !!,"Checking key integrity ..."
  • Line Location: EDITEND+3
Function Call: WRITE
  • Prompt: " NO PROBLEMS"
  • Line Location: EDITEND+4
Function Call: WRITE
  • Prompt: !!?2,$G(DIKKID)_" deleted."
  • Line Location: DELKEY+3
Function Call: WRITE
  • Prompt: !
  • Line Location: RD+8
Function Call: WRITE
  • Prompt: !
  • Line Location: EOP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: CHECK+5
Routine Call
  • DIE
  • Line Location:
    • REEDIT+81
Routine Call
  • DDS
  • Line Location:
    • REEDIT+10
Routine Call
  • DIALOG
  • Line Location:
    • REEDIT+83
Routine Call
  • DIR
  • Line Location:
    • REMOD+23
    • DELETE+7
    • DELUI+14
    • RD+8
    • EOP+4
    • CHECK+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("IX" - [#.11] REEDIT+16, UIID+1, UIID+2
^DD("KEY" - [#.31] DELETE+10, DELETE+15, REEDIT+6, REEDIT+11, REEDIT+28, REEDIT+71, DELUI+7, KEYID+1

Label References

Name Line Occurrences
$$CHECK EDITEND+1
$$KEYID DELETE+11, REEDIT+1
$$RD REMOD+7
$$UIID DELUI+9
DELETE REMOD+12, EDITEND+8
DELKEY DELETE+12, REEDIT+36, REEDIT+48, REEDIT+53
DELUI DELETE+16, REEDIT+25
EDIT REMOD+17
EDITEND REEDIT+39, REEDIT+56
EOP REEDIT+83, EDITEND+4
REEDIT REEDIT+34, REEDIT+39, REEDIT+51, REEDIT+63, EDITEND+7
REMOD REMOD+10, REMOD+15, REMOD+20, REMOD+27

Naked Globals

Name Field # of Occurrence
^(0 UIID+2, KEYID+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EDIT+2~, REEDIT+9*, REEDIT+10!, REEDIT+69~, REEDIT+71*, REEDIT+72!, DELKEY~
DA(1 REEDIT+70*
DDSFILE EDIT+2~, REEDIT+9*, REEDIT+10!
>> DI MOD+8
>> DIERR REEDIT+82
DIK REEDIT+69~, REEDIT+70*, REEDIT+72!, DELKEY+1~, DELKEY+2*
DIKKCH EDIT+1~, REEDIT+34, REEDIT+35*, REEDIT+39, REEDIT+40, REEDIT+41*, REEDIT+47*, REEDIT+51, REEDIT+52*, REEDIT+60*
, REEDIT+63, REEDIT+66, REEDIT+86, EDITEND+1*, EDITEND+6*, EDITEND+7, EDITEND+8
DIKKCNT MOD+4~, REMOD+2, REMOD+3, REMOD+6, REMOD+11, REMOD+16, REMOD+23, REMOD+28
DIKKEY MOD+4~, REMOD+11*, REMOD+12, REMOD+16*, REMOD+17, REMOD+28*, REMOD+29, DELETE~, DELETE+10, DELETE+11
, DELETE+12, EDIT~, REEDIT+1, REEDIT+6, REEDIT+9, REEDIT+11, REEDIT+25, REEDIT+28, REEDIT+31, REEDIT+36
, REEDIT+42, REEDIT+48, REEDIT+53, REEDIT+70, REEDIT+71, REEDIT+77, REEDIT+86, EDITEND+4, EDITEND+8, DELUI~
, DELUI+6, DELUI+7
DIKKFDA REEDIT+75~
DIKKFDA( REEDIT+78*, REEDIT+79*, REEDIT+80*
DIKKFILE MOD+4~, MOD+8*, MOD+9*, REMOD+2, REMOD+12, REMOD+17, REMOD+24, REMOD+29, DELETE~, DELETE+11
, DELETE+16, EDIT~, REEDIT+1, REEDIT+8, REEDIT+16, REEDIT+18, REEDIT+25, REEDIT+42, REEDIT+86, EDITEND+8
, DELUI~, DELUI+9, DELUI+15
DIKKFLD EDIT+1~, REEDIT+31, REEDIT+34, REEDIT+39, REEDIT+51, REEDIT+60
DIKKFLIS REEDIT+15~, REEDIT+19, REEDIT+20
DIKKID DELETE+1~, DELETE+11*, DELETE+12, DELETE+16, EDIT+1~, REEDIT+1*, REEDIT+25, REEDIT+35, REEDIT+36, REEDIT+48
, REEDIT+52, REEDIT+53, DELUI~, DELUI+9, DELKEY~, DELKEY+3
DIKKIENS REEDIT+75~, REEDIT+77*, REEDIT+78, REEDIT+79, REEDIT+80
DIKKNEW REEDIT+15~, REEDIT+20
DIKKNO EDIT+1~, REEDIT+42, REEDIT+43
DIKKOLD EDIT+1~, REEDIT+7!, REEDIT+20, REEDIT+21!
DIKKOLD( REEDIT+16
DIKKQUIT MOD+4~, REMOD+1, REMOD+23*
DIKKROOT MOD+4~, MOD+8*
DIKKSEQ REEDIT+75~, REEDIT+76*, REEDIT+77, REEDIT+78, REEDIT+79, REEDIT+80
DIKKTOP MOD+4~, MOD+8*, MOD+9, REMOD+12, REMOD+17, REMOD+24, REMOD+29, DELETE~, DELETE+11, DELETE+16
, EDIT~, REEDIT+1, REEDIT+20, REEDIT+25, REEDIT+42, REEDIT+86, EDITEND+4, EDITEND+8, DELUI~, DELUI+9
, DELUI+15
DIKKUFLD EDIT+1~, REEDIT+31, REEDIT+51, REEDIT+60
DIKKUFLD( REEDIT+76, REEDIT+78, REEDIT+79
DIKKUI DELETE+1~, DELETE+10*, DELETE+15, DELETE+16, DELUI~, DELUI+7, DELUI+9, DELUI+15
DIKKUI0 EDIT+1~, REEDIT+6*, REEDIT+8, REEDIT+14, REEDIT+16, REEDIT+18, REEDIT+19, REEDIT+24, REEDIT+25
DIKKUI1 EDIT+1~, REEDIT+11*, REEDIT+14, REEDIT+16, REEDIT+24, REEDIT+31, REEDIT+34, REEDIT+39, REEDIT+86
DIR MOD+5~, REMOD+23!, DELETE+1~, DELETE+7!, DELUI+2~, DELUI+14!, RD+1~, EOP+1~, CHECK+1~
DIR("?" RD+4*, RD+5*, RD+6*, RD+7*, EOP+3*, CHECK+3*
DIR("A" REMOD+22*, DELETE+5*, DELUI+12*, DELUI+13*, RD+3*, EOP+2*, CHECK+2*
DIR("B" REMOD+21*, DELETE+6*
DIR(0 REMOD+21*, DELETE+4*, DELUI+11*, RD+2*, EOP+2*, CHECK+4*
DIROUT MOD+5~, DELETE+1~, DELUI+2~, RD+1~, EOP+1~, CHECK+1~
DIRUT MOD+5~, REMOD+23, DELETE+1~, DELETE+7, DELUI+2~, RD+1~, RD+8, EOP+1~, CHECK+1~, CHECK+6
>> DIU MOD+8
DR EDIT+2~, REEDIT+9*, REEDIT+10!
DTOUT MOD+5~, DELETE+1~, DELUI+2~, DELUI+14, RD+1~, EOP+1~, CHECK+1~
DUOUT MOD+5~, DELETE+1~, DELUI+2~, DELUI+14, RD+1~, EOP+1~, CHECK+1~
FILE UIID~, UIID+2, KEYID~, KEYID+1
I DELUI+1~, DELUI+6, DELUI+7*, DELUI+12*, DELUI+13
KEY KEYID~, KEYID+1
MSG DELUI+1~, DELUI+10
MSG( DELUI+12, DELUI+13
MSG(0 DELUI+9*
TOP UIID~, UIID+2, KEYID~, KEYID+1
U DELETE+10, REEDIT+6, REEDIT+11, REEDIT+78, REEDIT+79, UIID+2, KEYID+1
UI UIID~, UIID+1, UIID+2
X MOD+5~, DELETE+1~, DELUI+2~, RD+1~, EOP+1~, CHECK+1~
Y MOD+5~, REMOD+6*, REMOD+7*, REMOD+10, REMOD+15, REMOD+20, REMOD+23, REMOD+27, DELETE+1~, DELETE+7
, DELUI+2~, DELUI+14*, RD+1~, RD+8*, RD+9, EOP+1~, CHECK+1~, CHECK+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All