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

Package: VA Fileman

Routine: DDUCHK


Information

DDUCHK ;SFISC/RWF-CHECK DD ;11:25 AM 30 Dec 2004

Source Information

Source file <DDUCHK.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA Fileman 8 (AC,ID,IX,NM,PT)^DDUCHK1  (,CHKGL,CHKSB)^DDUCHK2  INDEX^DDUCHK4  KEY^DDUCHK5  ^DIAC  DT^DICRW  L^DICRW1  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
VA Fileman 3 DDU  DDUCHK2  DI DDUCHK  

Entry Points

Name Comments DBIA/ICR reference
A
WFI
ZIS
CHKHDR ; Check for Missing or Incorrect File Header Node ;22*130
CHK
DDAC
EN1
EN ;
EXIT ;
PAGE
DQ

External References

Name Field # of Occurrence
^%ZIS ZIS
^%ZISC EXIT+14
^%ZTLOAD ZIS+1
AC^DDUCHK1 CHK+8
ID^DDUCHK1 CHK+2
IX^DDUCHK1 CHK+3
NM^DDUCHK1 CHK+7
PT^DDUCHK1 CHK+4
^DDUCHK2 CHK+10
CHKGL^DDUCHK2 CHK+5
CHKSB^DDUCHK2 CHK+6
INDEX^DDUCHK4 CHK+9
KEY^DDUCHK5 CHK+9
^DIAC DDAC
DT^DICRW A+4
L^DICRW1 A+5
^DIR A+13, PAGE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Check the Data Dictionary."
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !,"Note: Messages that begin with an asterisk(*) can NOT be corrected and"
  • Line Location: A+1
Function Call: WRITE
  • Prompt: !,"will need careful evaluation by software development!"
  • Line Location: A+2
Function Call: WRITE
  • Prompt: !?5,"*The file: "_$P($G(Y),U,2)_"(#"_$P($G(Y),U)_") is missing its ""GL"" (Global Location) node."
  • Line Location: A+8
Function Call: WRITE
  • Prompt: !?6,"No further checking for this file can occur!"
  • Line Location: A+9
Function Call: WRITE
  • Prompt: !!,"Checking file ",DDUCFILE
  • Line Location: DQ+3
Function Call: WRITE
  • Prompt: !!,"List of ;;<file#>^<field #>^<cross reference#> that contain $Next"
  • Line Location: EXIT+3
Function Call: WRITE
  • Prompt: !,I_$E(DDSP,1,(8-$L(I)))_";;"_DDFIL_U_DDFLD_U_DDXRN
  • Line Location: EXIT+10
Function Call: WRITE
  • Prompt: !,I_$E(DDSP,1,(8-$L(I)))_";;LAST LINE"
  • Line Location: EXIT+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PAGE+0
Function Call: WRITE
  • Prompt: !,"You don't have DD access to this file. No fixing will be done on this file."
  • Line Location: DDAC+0
Function Call: WRITE
  • Prompt: !?5,"*File: "_DDUCRFI_", is missing its file header node."
  • Line Location: CHK+1
Function Call: WRITE
  • Prompt: "has duplicate 'NM' nodes."
  • Line Location: CHK+7
Function Call: WRITE
  • Prompt: !?8,"File: ",DDUCRFI," "
  • Line Location: WFI+0
Function Call: WRITE
  • Prompt: !?5,"*File: "_DDUCFI_", is missing file's ""GL"" (Global Location) node.",!?6,"No further checking can occur!"
  • Line Location: CHKHDR+4
Function Call: WRITE
  • Prompt: !?5,"*File: "_DDUCFI_", is missing the File header node."
  • Line Location: CHKHDR+7
Function Call: WRITE
  • Prompt: !?5,"*File: "_DDUCFI_", header name is incorrect."
  • Line Location: CHKHDR+8
Function Call: WRITE
  • Prompt: !?5,"*File: "_DDUCFI_" File header number is incorrect."
  • Line Location: CHKHDR+9
Routine Call
  • DIR
  • Line Location:
    • A+13
    • PAGE
Routine Call
  • %ZIS
  • Line Location:
    • ZIS

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( CHK+1, CHK+2, CHK+3, CHK+4, CHK+7
^DD("ACOMP" CHK+8
^DIC - [#1] DQ+1, CHK, EN+2, CHKHDR+3, CHKHDR+6
^TMP("DDUCHK" DQ!, EXIT+1, EXIT+5, EXIT+7, EXIT+9, EXIT+13!

Label References

Name Line Occurrences
CHK DQ+8
CHKHDR DQ+6
DDAC DQ+5
EN1 EN+2
EXIT A+6, A+13, ZIS, ZIS+1
PAGE DQ+1
WFI CHK+7
ZIS EN1+1

Naked Globals

Name Field # of Occurrence
^( CHK+7
^(0 CHK*, EN+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS ZIS*
DDFIL EXIT+4~*, EXIT+5*, EXIT+7, EXIT+9, EXIT+10
DDFLD EXIT+6~*, EXIT+7*, EXIT+9, EXIT+10
DDSP EXIT+4~*, EXIT+10, EXIT+12
DDUC A+3*, EXIT+17!
DDUC5 EXIT+17!
DDUCDNAM EXIT+16!, CHK+7*
DDUCF EXIT+17!
DDUCFE EXIT+15!
DDUCFI DQ+4*, EXIT+15!, CHK, CHK+1, CHK+2, CHK+3, CHK+4, CHK+7, CHK+8, CHK+9
, EN+1, EN+2, EN+3*, EN1, CHKHDR+3, CHKHDR+4, CHKHDR+6, CHKHDR+7, CHKHDR+8, CHKHDR+9
DDUCFIE A+10*, DQ+1, EXIT+15!, EN1*
DDUCFILE DQ+1*, DQ+3, DQ+4, EXIT+15!
DDUCFIS A+10*, DQ+1, EXIT+15!, EN1*
DDUCFIX A+13*, DQ, EXIT+15!, DDAC*, CHK, CHK+7, CHK+9, EN+1
DDUCFX DQ*, EXIT+17!, DDAC
DDUCGL CHKHDR+2~, CHKHDR+3*, CHKHDR+4, CHKHDR+5
DDUCHDR CHKHDR+2~, CHKHDR+5*, CHKHDR+7, CHKHDR+8, CHKHDR+9
DDUCNA CHKHDR+2~, CHKHDR+6*, CHKHDR+8
DDUCNAME EXIT+16!, CHK+7*
DDUCOK EXIT+17!
DDUCRFE EXIT+16!
DDUCRFI EXIT+15!, CHK+1*, CHK+7*, WFI
DDUCSTK DQ!*, EXIT+16!
DDUCUP EXIT+16!
DDUCX EXIT+15!
DDUCX1 EXIT+15!
DDUCX2 EXIT+15!
DDUCX4 EXIT+15!
DDUCXN EXIT+16!
DDUCXREF EXIT+17!
DDUCXX EXIT+16!
DDUCY EXIT+16!
DDUCYY EXIT+17!
DDUCYY1 EXIT+17!
DDUCYYX EXIT+17!
DDUCZ EXIT+17!
DDUERR DQ+2~*, DQ+7, CHKHDR+4*
DDXRN EXIT+8~*, EXIT+9*, EXIT+10
DIAC EXIT+17!, DDAC*
DIB EXIT+17!
DIB(1 A+10
DIFILE DQ+4*, EXIT+17!
DIR A+13!
DIR("?" A+11*, A+12*
DIR("A" A+11*
DIR("B" A+11*
DIR(0 A+11*, PAGE*
>> DIRUT A+13, DQ+1
DUZ(0 EXIT+1, DDAC
I EXIT+4~*, EXIT+10, EXIT+11*, EXIT+12*
IO DQ
IO("Q" ZIS+1
IOF EXIT+2, PAGE
IOSL PAGE
IOST PAGE
>> POP ZIS
U A+8, EXIT+10, CHK, EN+1*, EN+3, CHKHDR+6, CHKHDR+8, CHKHDR+9
>> X A+6, A+7, A+10
>> Y A+8, A+13
>> ZTRTN ZIS+1*
>> ZTSAVE("DDUCFIE" ZIS+1*
>> ZTSAVE("DDUCFIS" ZIS+1*
>> ZTSAVE("DDUCFIX" ZIS+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All