LongFieldNamesUDBDB2iSeriesIBMi.sql

/* Altering table MYLIB.CUSTMASPF */
ALTER TABLE MYLIB.CUSTMASPF 
ADD COLUMN CUSTOMERNAME FOR CUSTNAME VARCHAR (100) NOT HIDDEN 
ADD COLUMN CUSTOMERADDRESS FOR CUSTADDR VARCHAR (100) NOT HIDDEN;

/* Setting column labels for MYLIB.CUSTMASPF */
LABEL ON COLUMN MYLIB.CUSTMASPF ( 
	CUSTOMERNAME TEXT IS 'Customer Name' , 
	CUSTOMERADDRESS TEXT IS 'Customer Address' );

/* Setting column headings for MYLIB.CUSTMASPF */
LABEL ON COLUMN MYLIB.CUSTMASPF ( 
	CUSTOMERNAME IS 'Customer              Name                             ' , 
	CUSTOMERADDRESS IS 'Customer  			Address                            ' );

/* Create a long identifier for MYLIB.CUSTMASPF */
RENAME TABLE MYLIB.CUSTMASPF TO CUSTOMER_FILE FOR SYSTEM NAME CUSTMASPF;

/* Verify we can access the long name*/
SELECT * FROM MYLIB.CUSTOMER_FILE;