Acceptance Testing/Attribute set script

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;