DTRHELP.HLB  —  Commands Statements Clauses, MISSING VALUE Clause, Examples
       The following example defines a record that contains MISSING
       VALUE clauses:

       DTR> DEFINE DOMAIN THINGS USING THINGREC ON THINGS;
       DTR> DEFINE RECORD THINGREC USING
       DFN> 01 THINGS.
       DFN>    03 NUM PIC 9(5)
       DFN>       MISSING VALUE IS 11111
       DFN>       EDIT_STRING IS ZZ,Z99?"***MISSING***".
       DFN>    03 STR PIC X(10) MISSING VALUE IS "EMPTY"
       DFN>       EDIT_STRING IS X(10)?"***MISSING***".
       DFN> ;

       DTR>

       The following example defines a new domain based on YACHTS that
       uses a new missing value and a MISSING VALUE edit string:

       DTR> DEFINE DOMAIN YACHTS_PRICE_LIST USING YPL_REC ON YPL.DAT;
       DTR> DEFINE RECORD YPL_REC USING
       DFN> 01 BOAT.
       DFN>    03 TYPE.
       DFN>       05 BUILDER PIC X(10).
       DFN>       05 MODEL PIC X(8).
       DFN>    03 PRICE PIC 9(5) MISSING VALUE IS 0
       DFN>       EDIT_STRING $$$,$$$?"NOT LISTED".
       DFN> ;
       [Record is 23 bytes long.]
       DTR> DEFINE FILE FOR YACHTS_PRICE_LIST KEY = TYPE
       DTR> READY YACHTS_PRICE_LIST AS YPL WRITE
       DTR> READY YACHTS
       DTR> YPL = YACHTS WITH LOA GT 35
       DTR> FIND YPL WITH PRICE MISSING
       [12 records found]
       DTR> PRINT FIRST 3 CURRENT

        BUILDER    MODEL     PRICE

       BLOCK I.   40       NOT LISTED
       CABOT      36       NOT LISTED
       DOWN EAST  38       NOT LISTED

       DTR>
Close Help