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

Package: VA Fileman

Routine: DDUCHK2


Information

DDUCHK2 ;SFISC/RWF/SO-CHECK DD (FIELDS) ;11:46 AM 5 Mar 2004

Source Information

Source file <DDUCHK2.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA Fileman 2 (CHK,PAGE)^DDUCHK  (COMP,DXREF,XREF)^DDUCHK3  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
VA Fileman 1 DDUCHK  

Entry Points

Name Comments DBIA/ICR reference
CHKSBA ;Check if Feidl exists
Q
CHKSB ;Check for duplicate "SB" x-refs ;22*130
PT
CHK6 ;W !?5,"Checking FIELDs"
WHO
POP
VP
FIELD ;W "."
FIVE
MULT ;Work subfile
PUSH
CHKGL ;Check for duplicate "GL" nodes ;22*130
PT1

External References

Name Field # of Occurrence
CHK^DDUCHK MULT+4
PAGE^DDUCHK MULT+1
COMP^DDUCHK3 CHK6+1
DXREF^DDUCHK3 CHK6+1
XREF^DDUCHK3 CHK6+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"*Field: ",DDUCFE," is missing its zero node."
  • Line Location: FIELD+1
Function Call: WRITE
  • Prompt: !?5,"*Field: ",DDUCFE,"'s Input Transform contains $Next."
  • Line Location: FIELD+3
Function Call: WRITE
  • Prompt: "doesn't have the correct protection for a field with executable code."
  • Line Location: FIELD+4
Function Call: WRITE
  • Prompt: !?10,"^DD(",DDUCFI,",",DDUCFE,",9) = ""@"" was set."
  • Line Location: FIELD+4
Function Call: WRITE
  • Prompt: !?5,"*Field: ",DDUCFE," (",DDUCXN,") points to missing file: ",DDUCRFI
  • Line Location: PT+1
Function Call: WRITE
  • Prompt: !?5,"*Field: ",DDUCFE," (",DDUCXN,") points to File: "_DDUCRFI_", is missing file's ""GL"" (Global Location) node."
  • Line Location: PT+4
Function Call: WRITE
  • Prompt: !?5,"*Field: ",DDUCFE," (",DDUCXN,") points to File: "_DDUCRFI_", missing File header node."
  • Line Location: PT+6
Function Call: WRITE
  • Prompt: "is missing its 'PT' node in the pointed-to-file."
  • Line Location: PT1+0
Function Call: WRITE
  • Prompt: !?10,"^DD(",+DDUCRFI,",0,""PT"",",DDUCFI,",",DDUCFE,") = """" was set."
  • Line Location: PT1+0
Function Call: WRITE
  • Prompt: !?5,"*Field: ",DDUCFE," (",DDUCXN,") missing subfile: ",+DDUCX2
  • Line Location: MULT+2
Function Call: WRITE
  • Prompt: "Bad 'UP' pointer in subfile #",+DDUCX2
  • Line Location: MULT+3
Function Call: WRITE
  • Prompt: !?10,"^DD(",+DDUCX2,",0,""UP"") = ",DDUCFI," was set."
  • Line Location: MULT+3
Function Call: WRITE
  • Prompt: !?3,"Checking subfile ",DDUCFI
  • Line Location: MULT+4
Function Call: WRITE
  • Prompt: !?3,"Returning to ",$S('DDUCSTK:"main ",1:"sub"),"file",$S('DDUCSTK:" "_DDUCFILE_".",1:" "_DDUCFI)
  • Line Location: MULT+4
Function Call: WRITE
  • Prompt: !?8,"Field: ",DDUCFE," (",DDUCXN,") "
  • Line Location: WHO+0
Function Call: WRITE
  • Prompt: !?5,"*Duplicate Fields represent Sub-file: "_DDUCSB,!?7
  • Line Location: CHKSB+16
Function Call: WRITE
  • Prompt: "field: "_X1_"; "
  • Line Location: CHKSB+17
Function Call: WRITE
  • Prompt: !?7,"*Field: "_DDUCFE_", File: "_DDUCFI_", ""SB"" subscript for subfile: "_DDUCSB_" is missing."
  • Line Location: CHKSBA+1
Function Call: WRITE
  • Prompt: !?5,"*Duplication at global location subscript: "_$P(X1,";")_", piece: "_$P(X1,";",2),!?9
  • Line Location: CHKGL+17
Function Call: WRITE
  • Prompt: "field: "_X3_"; "
  • Line Location: CHKGL+20

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( CHK6+1, FIELD+1, FIELD+2, FIVE, FIVE+2!, FIVE+3*, VP, PT+1, PT1*, MULT+2
, MULT+3*, CHKSB+3, CHKSB+6, CHKSB+9, CHKSB+12, CHKSBA+1, CHKGL+3, CHKGL+6, CHKGL+9, CHKGL+13
^DIC - [#1] PT+3

Label References

Name Line Occurrences
@( FIELD+5
CHKSBA CHKSB+6
FIELD CHK6+1
FIVE CHK6+1
POP MULT+4
PT1 VP
PUSH MULT+4
WHO PT1, MULT+3

Naked Globals

Name Field # of Occurrence
^( FIVE
^("UP" MULT+3
^(0 VP

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DDUCFE CHK6+1*, FIELD+1, FIELD+2, FIELD+3, FIVE, FIVE+2, FIVE+3, VP, PT+1, PT+4
, PT+6, PT1, MULT+2, PUSH, POP*, WHO, CHKSB+4~, CHKSB+5*, CHKSB+6*, CHKSB+9
, CHKSB+10, CHKSB+11, CHKSBA+1
DDUCFE1 CHKSB+7~, CHKSB+11*, CHKSB+12*
DDUCFE2 CHKGL+7~, CHKGL+8*, CHKGL+9*, CHKGL+10, CHKGL+13
>> DDUCFI CHK6+1, FIELD+1, FIELD+2, FIVE, FIVE+2, FIVE+3, VP, PT1, MULT+3, MULT+4*
, PUSH, POP*, CHKSB+3, CHKSB+6, CHKSB+9, CHKSB+12, CHKSBA+1, CHKGL+3, CHKGL+6, CHKGL+9
, CHKGL+13
>> DDUCFILE MULT+4
>> DDUCFIX FIVE+1, PT1, MULT+3
DDUCGL PT+2~, PT+3*, PT+4, PT+5
DDUCHDR PT+2~, PT+5*, PT+6
DDUCN CHKGL+1~, CHKGL+2*, CHKGL+3*, CHKGL+6, CHKGL+9, CHKGL+10, CHKGL+13
DDUCNA PT+2~
DDUCP CHKGL+4~, CHKGL+5*, CHKGL+6*, CHKGL+9, CHKGL+10, CHKGL+13
>> DDUCRFI VP*, PT*, PT+1, PT+3, PT+4, PT+6, PT1
DDUCSAV CHKSB+4~, CHKGL+7~
DDUCSAV( CHKSB+10*, CHKSB+12*, CHKSB+15, CHKGL+10*, CHKGL+13*, CHKGL+16, CHKGL+20
DDUCSB CHKSB+1~, CHKSB+2*, CHKSB+3*, CHKSB+6, CHKSB+9, CHKSB+12, CHKSB+16, CHKSBA+1
>> DDUCSTK MULT+4, PUSH*, POP*
>> DDUCSTK( PUSH*, POP
>> DDUCUP MULT+3*
DDUCX FIELD+2*, FIELD+3, FIVE*, FIVE+3*, CHKSB+7~, CHKSB+9*
>> DDUCX2 FIELD+2*, FIELD+5, PT, MULT+2, MULT+3, MULT+4
>> DDUCX4 FIELD+2*
>> DDUCXN FIELD+2*, PT+1, PT+4, PT+6, MULT+2, WHO
DDUCXX FIVE!
DDUCXX( FIVE*, FIVE+3
>> DDUCY FIVE*, FIVE+3*, VP*
DDUERR PT~*, PT+1*, PT+4*, PT+6*
DDUNFE CHKSB+4~, CHKSB+6, CHKSBA+1*
>> DIRUT CHK6+1, MULT+1
U FIELD+2, FIELD+3, FIVE, CHKSB+9
X CHKGL+11~, CHKGL+12*, CHKGL+13*
X1 CHKSB+13~, CHKSB+14*, CHKSB+15*, CHKSB+17, CHKGL+14~, CHKGL+15*, CHKGL+16*, CHKGL+17, CHKGL+20
X2 CHKSB+13~, CHKSB+16*, CHKGL+14~, CHKGL+17*
X3 CHKGL+18~, CHKGL+19*, CHKGL+20*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All