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

Package: Toolkit

Routine: XDRDVAL


Information

XDRDVAL ;CIOFO-SF.SEA/JLI - Check validity of data elements ;10/02/2000 08:00

Source Information

Source file <XDRDVAL.m>

Entry Points

Name Comments DBIA/ICR reference
DOENTRY(FILE,IEN,OUTROOT,HELP) ; ENTRY POINT TO PROCESS A SINGLE ENTRY
DOGETS ;
VALIDATE(DATA,MESG) ; VALIDATE DATA IN 'DATA' RETURN ERRORS IN 'MESG'
CHKVALID(MESG,FILE,IENS,FIELD,EXTVAL,INTVAL,HELP) ;
MAKEGLO(FILENUM,IENS,GLOB,DASTR) ;
CHKNM ; CHECK FOR PROBLEM WITH NM NODE OF SUBFILE NOT BEING CORRECT
ERR ; On an error mark status as error, and save the error message
OPEN ;
CLOSE ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"First entry in ^DD("_FILE_",0,""NM"", does not match field name "_UNAME_" in file "_UFILE_". This will be rejected by UPDATE^DIE."
  • Line Location: CHKNM+7
Function Call: WRITE
  • Prompt: !,"...ONE MOMENT..."
  • Line Location: OPEN+2
Function Call: WRITE
  • Prompt: !,EOF,!
  • Line Location: CLOSE+6
Function Call: WRITE
  • Prompt: $C(7),!!?5,"<< UNABLE TO REWIND FILE>>",!
  • Line Location: CLOSE+8
Function Call: READ
  • Variable: X
  • Timeout: 1
  • Line Location: CLOSE+11
Info |  Source |  Entry Points |  Interaction Calls