Re: Censoring SQL access -- ideas?

CREATE UNIQUE INDEX ROB/rcoi01
ON ROB/RCO (CMPNY)
where crsts='A'
RCDFMT RCOI01R
ADD CMPNAM,CAGD1

Doesn't that cover a vast bulk of the LF's that you've seen?

DSPFFD ROB/RCOI01
Record Format Information
Record format . . . . . . . . . . . . . . . : RCOI01R
Number of fields . . . . . . . . . . . . . : 3
Field Level Information
Data Field Buffer Buffer Field Column
Field Type Length Length Position Usage Heading
CMPNY PACKED 2 0 2 1 Both Cmp
Nbr
Field text . . . . . . . . . . . . . . . : Company Number
Editing Information
Edit code . . . . . . . . . . . . . . . : X
CMPNAM Open 30 30 3 Both Company
Name
Field text . . . . . . . . . . . . . . . : Company Name
Coded Character Set Identifier . . . . . : 937
CAGD1 PACKED 8 0 5 33 Both A/P/Aging

Dates
Array 01
Field text . . . . . . . . . . . . . . . : A/P Aging Dates Array - 01

Editing Information
Edit word . . . . . . . . . . . . . . . :
' 0 / / '

It did NOT allow me to use UDF's, a simple CAST, or rename of the columns
in the RCDFMT clause. IOW I could not use any of the following
...
CMPNAM as COMPNYNAME
CAST ('91' CONCAT TRIM(CMPHNE) AS CHAR(27)) AS PHONE
'91' CONCAT TRIM(CMPHNE)
NUMTODATE(CAGD1)
You still have to use a view for those.

Rob Berendt