API - Creating Values in Independant and dependant Value Sets

declare

x varchar2(200);

v_msg varchar2(2000);

begin

fnd_global.apps_initialize (1090, 51007, 401);

  FND_FLEX_VAL_API.create_independent_vset_value

 ('XX_IND_VSET','10','Inserted from API','Y',sysdate,NULL,'N',NULL,NULL,X);

    DBMS_OUTPUT.PUT_LINE(X);

exception

when others then

v_msg:=fnd_flex_val_api.message;

  DBMS_OUTPUT.PUT_LINE(v_msg);

end;

/

COMMIT

------    Inserting child dependent Value Set Values -------------------------------

declare

x varchar2(200);

v_msg varchar2(2000);

begin

fnd_global.apps_initialize (1090, 51007, 401);

 FND_FLEX_VAL_API.create_dependent_vset_value

  ('XX_DEP_VSET','10','10.1','Dependent Value inserted through API','Y',sysdate,NULL,NULL,x);

    DBMS_OUTPUT.PUT_LINE(X);

exception

when others then

v_msg:=fnd_flex_val_api.message;

  DBMS_OUTPUT.PUT_LINE(v_msg);

end;

/

COMMIT;