Thursday, May 5, 2011
FND_PROGRAM : Create Concurrent Executable via API
Test Instance: R12.1.1
Script:
/* Formatted on 2011/05/05 11:21 (Formatter Plus v4.8.5) */
DECLARE
v_executable VARCHAR2 (200);
v_application VARCHAR2 (200);
v_short_name VARCHAR2 (200);
v_description VARCHAR2 (200);
v_execution_method VARCHAR2 (200);
v_execution_file_name VARCHAR2 (200);
v_subroutine_name VARCHAR2 (200);
v_icon_name VARCHAR2 (200);
v_language_code VARCHAR2 (200);
v_execution_file_path VARCHAR2 (200);
v_check VARCHAR2 (2);
BEGIN
v_executable := 'XX_SHAREORACLEAPPS';
v_application := 'Payables';
v_short_name := 'XX_SHAREORACLEAPPS';
v_description := 'Test Script for Registering Program from Backend';
v_execution_method := 'PL/SQL Stored Procedure';
v_execution_file_name := 'XX_SHAREORACLEAPPS_PKG';
v_subroutine_name := NULL;
v_icon_name := NULL;
v_language_code := 'US';
v_execution_file_path := NULL;
apps.fnd_program.executable (executable => v_executable,
application => v_application,
short_name => v_short_name,
description => v_description,
execution_method => v_execution_method,
execution_file_name => v_execution_file_name,
subroutine_name => v_subroutine_name,
icon_name => v_icon_name,
language_code => v_language_code,
execution_file_path => v_execution_file_path
);
COMMIT;
BEGIN
SELECT 'Y'
INTO v_check
FROM fnd_executables
WHERE executable_name = 'XX_SHAREORACLEAPPS';
EXCEPTION
WHEN NO_DATA_FOUND
THEN
DBMS_OUTPUT.put_line ('Executable Registration Failed');
END;
END;
Do you think this Article is useful?
Subscribe to:
Post Comments (Atom)
0 Responses to “FND_PROGRAM : Create Concurrent Executable via API”
Post a Comment