RE: Active record code referential constraint.

Given the tables at the bottom the goal would be to able to flag OCTIIM
rows with an 'IZ' so that no new orders can be placed for a particular
item number. But existing orders can finish through the system.

CREATE TABLE ROB/OCTIIM
(IID CHAR (2 ) NOT NULL WITH DEFAULT 'IM',
IPROD CHAR (15 ) NOT NULL,
CONSTRAINT IIM_IPROD PRIMARY KEY (IPROD),
CONSTRAINT IIM_IID CHECK (IID IN('IM', 'IZ') ))

CREATE TABLE ROB/OCTECH
(HID CHAR (2 ) NOT NULL WITH DEFAULT 'CH',
HORD INT AS IDENTITY,
CONSTRAINT ECL_HORD PRIMARY KEY (HORD),
CONSTRAINT ECL_HID CHECK (HID IN('CH', 'CZ') ))

CREATE TABLE ROB/OCTECL
(LID CHAR ( 2) NOT NULL WITH DEFAULT 'CL',
LORD INT NOT NULL,
LLINE INT NOT NULL,
LPROD CHAR (15),
CONSTRAINT ECL_PRIKEY PRIMARY KEY (LORD, LLINE),
CONSTRAINT ECL_LID CHECK (LID IN('CL','ZL') ),
CONSTRAINT ECL_ECH FOREIGN KEY (LORD) REFERENCES ROB/OCTECH (HORD)
ON DELETE NO ACTION ON UPDATE NO ACTION,
CONSTRAINT ECL_IIM FOREIGN KEY (LPROD) REFERENCES ROB/OCTIIM (IPROD)
)



Rob Berendt