------------------------------------------------------------------------------------------ CREATE TABLE CUSMSTF ( CUSTNO INTEGER NOT NULL DEFAULT, RECSTS CHAR(2) CCSID 37 NOT NULL DEFAULT, CUSNME CHAR(30) CCSID 37 NOT NULL DEFAULT, "COMMENCMENT_DATE" FOR STRDTE DATE NOT NULL DEFAULT CURRENT_DATE, "Telephone_Number" FOR PHONENO CHAR(15) CCSID 37 NOT NULL DEFAULT, REPCDE SMALLINT NOT NULL DEFAULT, "User_Id" FOR USERID CHAR(10) CCSID 37 NOT NULL DEFAULT, CONSTRAINT CUSMSTF_P PRIMARY KEY(CUSTNO)) RCDFMT CUSMSTFR; ------------------------------------------------------------------------------------------ LABEL ON TABLE CUSMSTF IS 'Customer Master File'; ------------------------------------------------------------------------------------------ LABEL ON COLUMN CUSMSTF (CUSTNO IS 'Cust. No.' , RECSTS IS 'R/S ' , CUSNME IS 'Customer Name ' , STRDTE IS 'Commencment Date' , PHONENO IS 'Telephone Number' , REPCDE IS 'Rep. Code' , USERID IS 'User Id' ); ------------------------------------------------------------------------------------------ LABEL ON COLUMN CUSMSTF (CUSTNO TEXT IS 'Customer Number' , RECSTS TEXT IS 'Record Status' , CUSNME TEXT IS 'Customer Name' , STRDTE TEXT IS 'Commencment Date' , PHONENO TEXT IS 'Telephone Number' , REPCDE TEXT IS 'Sales Rep. Code' , USERID TEXT IS 'User Id' ); ------------------------------------------------------------------------------------------