Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

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

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
Info |  Source |  Entry Points |  Interaction Calls