ERP 2.50:Acceptance Testing/Attribute set script
Script for 2.40/2.3x
DECLARE
v_attributeset_id NUMBER(10);
v_client_id NUMBER(10);
BEGIN
SELECT MAX(AD_CLIENT_ID) INTO v_client_id FROM AD_CLIENT;
SELECT COALESCE(MAX(M_ATTRIBUTESET_ID),999999)+1 INTO v_attributeset_id FROM M_ATTRIBUTESET;
INSERT INTO M_ATTRIBUTESET (M_ATTRIBUTESET_ID, AD_CLIENT_ID, AD_ORG_ID, ISACTIVE, CREATED,CREATEDBY, UPDATED, UPDATEDBY, NAME, ISLOT, ISGUARANTEEDATE, ISSERNO)
VALUES(v_attributeset_id, v_client_id, 0, 'Y', sysdate, 100,sysdate,100,'Lots','Y','Y','N');
AD_UPDATE_SEQUENCE;
COMMIT;
END;
Script for 2.50
DECLARE
v_attributeset_id varchar2(32);
v_client_id varchar2(32);
BEGIN
SELECT AD_CLIENT_ID INTO v_client_id FROM AD_CLIENT WHERE CREATED = (SELECT MAX(CREATED) FROM AD_CLIENT);
AD_SEQUENCE_NEXT('M_Attributeset', v_client_id, v_attributeset_id);
INSERT INTO M_ATTRIBUTESET (M_ATTRIBUTESET_ID, AD_CLIENT_ID, AD_ORG_ID, ISACTIVE, CREATED,CREATEDBY, UPDATED, UPDATEDBY, NAME, ISLOT, ISGUARANTEEDATE, ISSERNO)
VALUES(v_attributeset_id, v_client_id, 0, 'Y', sysdate, 100,sysdate,100,'Lots','Y','Y','N');
COMMIT;
END;