Acceptance Testing/Create payment terms script

R2.3x version

DECLARE 

v_paymentterm_id NUMBER(10);
v_client_id NUMBER(10);

BEGIN

SELECT MAX(AD_CLIENT_ID) INTO v_client_id FROM AD_CLIENT;

SELECT COALESCE(MAX(C_PAYMENTTERM_ID),999999) +1 INTO v_paymentterm_id FROM C_PAYMENTTERM;
  
INSERT INTO C_PAYMENTTERM
(C_PAYMENTTERM_ID, AD_CLIENT_ID, AD_ORG_ID, ISACTIVE, CREATED, CREATEDBY, UPDATED, UPDATEDBY, 
  NAME, AFTERDELIVERY, ISDUEFIXED, NETDAYS, FIXMONTHOFFSET, ISNEXTBUSINESSDAY, ISDEFAULT, VALUE, ISVALID)
VALUES
  (v_paymentterm_id, v_client_id, 0, 'Y', SYSDATE, 100, SYSDATE, 100, '90 DAYS', 'N', 'N', 0, 3, 'N', 'N', '90d', 'N');

ad_update_sequence();

commit;

END;

R2.4x version (AfterDelivery column removed)

DECLARE 

v_paymentterm_id NUMBER(10);
v_client_id NUMBER(10);

BEGIN

SELECT MAX(AD_CLIENT_ID) INTO v_client_id FROM AD_CLIENT;

SELECT COALESCE(MAX(C_PAYMENTTERM_ID),999999) +1 INTO v_paymentterm_id FROM C_PAYMENTTERM;
  
INSERT INTO C_PAYMENTTERM
(C_PAYMENTTERM_ID, AD_CLIENT_ID, AD_ORG_ID, ISACTIVE, CREATED, CREATEDBY, UPDATED, UPDATEDBY, 
  NAME, ISDUEFIXED, NETDAYS, FIXMONTHOFFSET, ISNEXTBUSINESSDAY, ISDEFAULT, VALUE, ISVALID)
VALUES
  (v_paymentterm_id, v_client_id, 0, 'Y', SYSDATE, 100, SYSDATE, 100, '90 DAYS', 'N', 0, 3, 'N', 'N', '90d', 'N');

ad_update_sequence();

commit;

END;