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

Package: VA FileMan

Routine: DDSCLONF


Information

DDSCLONF ;SFISC/MKO-CLONE A FORM ;15OCT2003

Source Information

Source file <DDSCLONF.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 6 $$REF^DDS0  EN^DDSZ  FILE^DICN  ^DIE  (,IX1)^DIK  ^DIR  

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

Package Total Caller Graph
VA FileMan 1 DDSCLONE  

Entry Points

Name Comments DBIA/ICR reference
CREATBK ;Create blocks
CREATFM ;Create form
EDITFM ;Edit blocks used on new form
INDEXFM ;Index new form
ASKCONT ;Final chance to abort

External References

Name Field # of Occurrence
$$REF^DDS0 CREATFM+20
EN^DDSZ INDEXFM+6
FILE^DICN CREATBK+9, CREATFM+6
^DIE EDITFM+10
^DIK EDITFM+21
IX1^DIK INDEXFM+4
^DIR ASKCONT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Creating new blocks ...",!
  • Line Location: CREATBK+2
Function Call: WRITE
  • Prompt: !?2,$P(DDSBK,U,2)
  • Line Location: CREATBK+6
Function Call: WRITE
  • Prompt: !,$C(7)_"Attempt to create block "_$P(DDSBK,U,2)_" failed."
  • Line Location: CREATBK+11
Function Call: WRITE
  • Prompt: ?35,"#"_+Y
  • Line Location: CREATBK+15
Function Call: WRITE
  • Prompt: !!,"Creating new form ..."
  • Line Location: CREATFM+2
Function Call: WRITE
  • Prompt: !?2,$P(DDSFORM,U,3)
  • Line Location: CREATFM+3
Function Call: WRITE
  • Prompt: !,$C(7)_"Attempt to create form "_$P(DDSFORM,U,3)_" failed."
  • Line Location: CREATFM+8
Function Call: WRITE
  • Prompt: ?35,"#"_+Y
  • Line Location: CREATFM+23
Function Call: WRITE
  • Prompt: !!,"Repointing to new blocks ..."
  • Line Location: EDITFM+1
Function Call: WRITE
  • Prompt: !,"Reindexing new form ..."
  • Line Location: INDEXFM+1
Routine Call
  • DIE
  • Line Location:
    • EDITFM+10
Routine Call
  • DIR
  • Line Location:
    • ASKCONT+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIST( CREATBK+13*, CREATBK+14*, CREATFM+10*, CREATFM+11*, CREATFM+14, CREATFM+15!, CREATFM+16, CREATFM+18, CREATFM+19!, CREATFM+22*
, EDITFM+3, EDITFM+4, EDITFM+16, EDITFM+18*, EDITFM+19*
^TMP("DDSCLONE" CREATBK+4, CREATBK+5, CREATBK+16*, EDITFM+9, EDITFM+17

Label References

Name Line Occurrences
ASKCONT DDSCLONF+7
CREATBK DDSCLONF+8
CREATFM DDSCLONF+9
EDITFM DDSCLONF+10
INDEXFM DDSCLONF+11

Naked Globals

Name Field # of Occurrence
^( EDITFM+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA CREATBK+1~, CREATFM+1~, EDITFM+6~, EDITFM+8*, EDITFM+12~, EDITFM+20*, INDEXFM+2~, INDEXFM+3*
DA(1 EDITFM+8*, EDITFM+14*
DA(2 EDITFM+14*
DD CREATBK+7!
DDSBK CREATBK+5*, CREATBK+6, CREATBK+8, CREATBK+11, CREATBK+14, EDITFM+2~, EDITFM+4*, EDITFM+5, EDITFM+9, EDITFM+15*
, EDITFM+16*, EDITFM+17, EDITFM+18, EDITFM+20
>> DDSBKDA CREATBK+3*, CREATBK+4*, CREATBK+5, CREATBK+13, CREATBK+16
>> DDSFORM CREATFM+3, CREATFM+5, CREATFM+8, CREATFM+10, CREATFM+22
DDSI CREATFM+1~, CREATFM+16*, CREATFM+18, CREATFM+19
DDSJ CREATFM+1~, CREATFM+14*, CREATFM+15, CREATFM+17*, CREATFM+18*, CREATFM+19
DDSNBK EDITFM+2~, EDITFM+17*, EDITFM+18, EDITFM+19
DDSNFRM DDSCLONF+12!, CREATFM+24*, EDITFM+3, EDITFM+4, EDITFM+7, EDITFM+8, EDITFM+13, EDITFM+14, EDITFM+16, EDITFM+18
, EDITFM+19, INDEXFM+3, INDEXFM+6
DDSPG EDITFM+2~, EDITFM+3*, EDITFM+4, EDITFM+8, EDITFM+13, EDITFM+14, EDITFM+16, EDITFM+18, EDITFM+19
>> DDSQUIT DDSCLONF+7, DDSCLONF+8, DDSCLONF+9, CREATBK+4, CREATBK+12*, CREATFM+9*, ASKCONT+6*
DIC CREATBK+1~, CREATBK+7!, CREATBK+8*, CREATBK+9!, CREATFM+1~, CREATFM+4!, CREATFM+5*, CREATFM+6!
DIC(0 CREATBK+8*, CREATFM+5*
DIE EDITFM+6~, EDITFM+7*
DIK EDITFM+12~, EDITFM+13*, INDEXFM+2~, INDEXFM+3*
DIR ASKCONT+1!, ASKCONT+5!
DIR("?" ASKCONT+4*
DIR("A" ASKCONT+2*, ASKCONT+3*
DIR(0 ASKCONT+1*
>> DIRUT ASKCONT+6
DO CREATBK+7!
DR EDITFM+6~, EDITFM+9*
DT CREATFM+11
U CREATBK+6, CREATBK+8, CREATBK+11, CREATBK+14, CREATBK+16, CREATFM+3, CREATFM+5, CREATFM+8, CREATFM+11, CREATFM+22
, EDITFM+4, EDITFM+9, EDITFM+17, EDITFM+19
>> X CREATBK+8*, CREATFM+5*
>> Y CREATBK+10, CREATBK+13, CREATBK+14, CREATBK+15, CREATBK+16, CREATFM+7, CREATFM+10, CREATFM+11, CREATFM+14, CREATFM+15
, CREATFM+16, CREATFM+18, CREATFM+19, CREATFM+20, CREATFM+22, CREATFM+23, CREATFM+24, ASKCONT+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All