Library /sys$common/syshlp/CDDLHELP.HLB  —  CONDITION_NAME, Example
  The following example defines three valid conditions according to the
  value of the field RECORD_IDENTIFIER.

  RECORD_IDENTIFIER       DATATYPE IS TEXT
                          SIZE IS 1 CHARACTER
                          CONDITION FOR COBOL IS ON_HAND
                              COBOL NAME "ON-HAND"
                              VALUE IS "S"
                          CONDITION FOR COBOL BACKORDER
                              COBOL NAME "BACKORDER"
                              VALUE IS "B"
                          CONDITION FOR COBOL OUT_OF_STOCK
                              COBOL NAME "OUT-OF-STOCK"
                              VALUE IS "O"
                          CONDITION FOR COBOL IS INVALID
                              VALUES ARE "A", "C" THRU "N",
                              "P" THRU "R", "T" THRU "Z".
Close Help