Thursday, May 5, 2011
FND_PROGRAM : Register Concurrent Program parameters via API
Test Instance: R12.1.1
Script:
/* Formatted on 2011/05/05 11:48 (Formatter Plus v4.8.5) */
DECLARE
v_program_short_name VARCHAR2 (200);
v_application VARCHAR2 (200);
v_sequence NUMBER;
v_parameter VARCHAR2 (200);
v_description VARCHAR2 (200);
v_enabled VARCHAR2 (200);
v_value_set VARCHAR2 (200);
v_default_type VARCHAR2 (200);
v_default_value VARCHAR2 (200);
v_required VARCHAR2 (200);
v_enable_security VARCHAR2 (200);
v_range VARCHAR2 (200);
v_display VARCHAR2 (200);
v_display_size NUMBER;
v_description_size NUMBER;
v_concatenated_descr_size NUMBER;
v_prompt VARCHAR2 (200);
v_token VARCHAR2 (200);
v_cd_parameter VARCHAR2 (200);
v_check VARCHAR2 (2);
BEGIN
v_program_short_name := 'XX_SHAREORACLEAPPS';
v_application := 'Payables';
v_sequence := 10;
v_parameter := 'User ID';
v_description := 'User ID';
v_enabled := 'Y';
v_value_set := '10 Characters';
v_default_type := NULL;
v_default_value := NULL;
v_required := 'N';
v_enable_security := 'N';
v_range := NULL;
v_display := 'Y';
v_display_size := 50;
v_description_size := 50;
v_concatenated_descr_size := 50;
v_prompt := 'User ID';
v_token := NULL;
v_cd_parameter := NULL;
apps.fnd_program.parameter
(program_short_name => v_program_short_name,
application => v_application,
SEQUENCE => v_sequence,
parameter => v_parameter,
description => v_description,
enabled => v_enabled,
value_set => v_value_set,
default_type => v_default_type,
DEFAULT_VALUE => v_default_value,
required => v_required,
enable_security => v_enable_security,
RANGE => v_range,
display => v_display,
display_size => v_display_size,
description_size => v_description_size,
concatenated_description_size => v_concatenated_descr_size,
prompt => v_prompt,
token => v_token,
cd_parameter => v_cd_parameter
);
COMMIT;
BEGIN
SELECT 'Y'
INTO v_check
FROM fnd_descr_flex_column_usages
WHERE descriptive_flexfield_name = '$SRS$.' || 'XX_SHAREORACLEAPPS'
AND end_user_column_name = 'User ID';
EXCEPTION
WHEN NO_DATA_FOUND
THEN
DBMS_OUTPUT.put_line ('Concurrent Program Parameter Registration Failed');
END;
END;
Do you think this Article is useful?
Subscribe to:
Post Comments (Atom)
0 Responses to “FND_PROGRAM : Register Concurrent Program parameters via API”
Post a Comment