Oracle E-Business Suite開発者ガイド リリース12.2 E53035-01

目次

前へ

次へ

コンカレント処理のPL/SQL API

概要

この項では、クライアント側とサーバー側のどちらのPL/SQLプロシージャでも使用できるコンカレント処理APIについて説明します。また、これらのコンカレント処理APIを使用したPL/SQLプロシージャの例も取り上げます。

この項では、次のコンカレント処理パッケージについて説明します。

• FND_CONC_GLOBAL.REQUEST_DATA: サブ要求の発行

• FND_CONCURRENT: 発行済要求の情報

• FND_FILE: PL/SQL: ファイルI/O

• FND_PROGRAM: コンカレント・プログラム・ローダー

• FND_SET: 要求セット・ローダー

• FND_REQUEST: コンカレント・プログラム発行

• FND_REQUEST_INFO: 情報の要求

• FND_SUBMIT: 要求セットの発行

FND_CONC_GLOBALパッケージ

このパッケージを使用して、PL/SQLコンカレント・プログラムからサブ要求を発行します。

FND_CONC_GLOBAL.REQUEST_DATA

function FND_CONC_GLOBAL.REQUEST_DATA return varchar2;

FND_CONC_GLOBAL.SET_REQ_GLOBALS

procedure SET_REQ_GLOBALS	(conc_status		in varchar2 default null,
request_data		in varchar2 default null, 
conc_restart_time		in varchar2 default null,     
release_sub_request	in varchar2 default null);           

例

/*
* This is sample PL/SQL concurrent program submits 10
* sub-requests. The sub-requests are submitted one at a
* time.  Each time a sub-request is submitted, the parent
* exits to the Running/Paused state, so that it does not
* consume any resources while waiting for the child
* request, to complete.  When the child completes the
* parent is restarted. 
*/
create or replace procedure parent  (errbuf out varchar2,
retcode   out number) is
i number;
req_data varchar2(10);
r number;
begin
--
-- Read the value from REQUEST_DATA.  If this is the
-- first run of the program, then this value will be
-- null.
-- Otherwise, this will be the value that we passed to
-- SET_REQ_GLOBALS on the previous run.
--
req_data := fnd_conc_global.request_data;
--
-- If this is the first run, we'll set i = 1.
-- Otherwise, we'll set i = request_data + 1, and we'll
-- exit if we're done.
--
if (req_data is not null) then
i := to_number(req_data);
i := i + 1;
if (i < 11  ) then
errbuf := 'Done!';
retcode := 0 ;
return;
end if;
else
i := 1;
end if;
--
-- Submit the child request.  The sub_request parameter
-- must be set to 'Y'.
--
r := fnd_request.submit_request('FND', 'CHILD',
'Child ' || to_char(i), NULL,
TRUE, fnd_conc_global.printer);
if r = 0 then
--
-- If request submission failed, exit with error.
--
errbuf := fnd_message.get;
retcode := 2;
else 
--
-- Here we set the globals to put the program into the
-- PAUSED status on exit, and to save the state in
-- request_data.
--
fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
request_data => to_char(i));
errbuf := 'Sub-Request submitted!';
retcode := 0 ;
end if;
return;
end;  

FND_CONCURRENTパッケージ

FND_CONCURRENT.AF_COMMIT

function FND_CONCURRENT.AF_COMMIT;

指定されたロールバック・セグメントに対しFND_CONCURRENT.AF_COMMITがCOMMITコマンドを実行します。

FND_CONCURRENT.AF_COMMITには引数はありません。

FND_CONCURRENT.AF_ROLLBACK

function FND_CONCURRENT.AF_ROLLBACK;

FND_CONCURRENT.GET_REQUEST_STATUS (クライアントまたはサーバー)

function FND_CONCURRENT.GET_REQUEST_STATUS

        (request_id	IN OUT number,
         application	IN varchar2 default NULL,
         program		IN varchar2 default NULL,
         phase		OUT varchar2,
         status		OUT varchar2,
         dev_phase		OUT varchar2,
         dev_status	OUT varchar2,
         message		OUT varchar2) 
return boolean;

例

 call_status boolean;
        rphase      varchar2(80);
        rstatus     varchar2(80);
        dphase      varchar2(30);
        dstatus     varchar2(30);
        message     varchar2(240);

        call_status :=
                 FND_CONCURRENT.GET_REQUEST_STATUS(<Request_ID>, '', '',
                 rphase,rstatus,dphase,dstatus, message);
    end;

上の例では、rphaseおよびrstatusは「コンカレント要求」フォームに表示されるものと同じフェーズとステータス値を受け取ります。完了済の要求の完了テキストはメッセージ内に返されます。

要求の結果に基づいてプログラムのフローを制御する場合には、開発者は要求のフェーズとステータスと比較する値として次の値を使用する必要があります。

次の表はdev_phaseおよびdev_statusについての可能な値とその説明をリストしたものです。

FND_CONCURRENT.WAIT_FOR_REQUEST (クライアントまたはサーバー)

function FND_CONCURRENT.WAIT_FOR_REQUEST  

(request_id IN number default NULL,
          interval   IN number default 60,
          max_wait   IN number default 0,
          phase      OUT varchar2,
          status     OUT varchar2,
          dev_phase  OUT varchar2,
          dev_status OUT varchar2,
          message    OUT varchar2) return  boolean;

FND_CONCURRENT.SET_COMPLETION_STATUS (サーバー)

function FND_CONCURRENT.SET_COMPLETION_STATUS  

(status	IN varchar2,
 message	IN varchar2) return boolean;

FND_FILE: PL/SQLファイルI/O

FND_FILEパッケージには、ログ・ファイルおよび出力ファイルへテキストを書き込むためのプロシージャが含まれています。これらのプロシージャはすべてのタイプのコンカレント・プログラムでサポートされています。

テストおよびデバッグには、プロシージャFND_FILE.PUT_NAMESおよびFND_FILE.CLOSEを使用できます。これらの2つのプロシージャをコンカレント・プログラムからコールしないように注意してください。

FND_FILEは、ログ・ファイルおよび出力ファイルどちらについても、最大で32Kまでのバッファ行サイズをサポートしています。

重要: このパッケージは汎用PL/SQLテキストI/O用に設計されたものではなく、要求ログ・ファイルおよび出力ファイルに書き込むためにのみ設計されています。

関連項目: PL/SQLファイルの入出力処理

FND_FILE.PUT

procedure FND_FILE.PUT

 (which	 IN NUMBER,
  buff	 IN VARCHAR2);

FND_FILE.PUT_LINE

procedure FND_FILE.PUT_LINE
 (which    IN NUMBER,
  buff     IN VARCHAR2);

例

メッセージ・ディクショナリを使用してサーバーに設定済のメッセージを取得し、それをログ・ファイルに書き込みます。(これにより、ログ・ファイルに翻訳済のメッセージを含めることができます。)

 FND_FILE.PUT_LINE( FND_FILE.LOG, fnd_message.get );

テキスト行を直接ログ・ファイルに書き込みます(英語でハードコードされているためメッセージは翻訳できません。この方法はお薦めしません)。

 fnd_file.put_line(FND_FILE.LOG,'Warning: Employee '||
                     l_log_employee_name||' ('||
                     l_log_employee_num ||
                          ') does not have a manager.');

FND_FILE.NEW_LINE

procedure FND_FILE.NEW_LINE
  (which   IN NUMBER,
   LINES   IN NATURAL := 1);

例

改行文字を2つ書き込むには次のようにします。

 fnd_file.new_line(FND_FILE.LOG,2);

FND_FILE.PUT_NAMES

procedure FND_FILE.PUT_NAMES
      (p_log IN VARCHAR2,
       p_out IN VARCHAR2,
      (p_dir IN VARCHAR2);

重要: FND_FILE.PUT_NAMESはSQL*Plusからのテストおよびデバッグのためのものです。コンカレント・プログラムからコールされた場合は何も実行しません。

BEGIN
      fnd_file.put_names('test.log', 'test.out',
            '/local/db/8.0.4/db-temp-dir/'); 	
      fnd_file.put_line(fnd_file.output,'Called stored 
procedure'); 
      /* Some logic here... */ 
      fnd_file.put_line(fnd_file.output, 'Reached point A'); 
      /* More logic, etc... */ 
      fnd_file.close;
END; 

例

BEGIN
 fnd_file.put_names('test.log', 'test.out',
  '/local/db/8.0.4/db-temp-dir/'); 
 fnd_file.put_line(fnd_file.output,'Called stored  
procedure'); 
 /* Some logic here... */ 
 fnd_file.put_line(fnd_file.output, 'Reached point A'); 
 /* More logic, etc... */ 
 fnd_file.close;
END; 

FND_FILE.CLOSE

procedure FND_FILE.CLOSE;

例

BEGIN
 fnd_file.put_names('test.log', 'test.out',
  '/local/db/8.0.4/db-temp-dir/');    fnd_file.put_line(fnd_file.output,'Called stored 
procedure'); 
 /* Some logic here... */ 
 fnd_file.put_line(fnd_file.output, 'Reached point A'); 
 /* More logic, etc... */ 
 fnd_file.close;
END; 

エラーの処理

FND_FILEパッケージは1つの例外、FND_FILE.UTL_FILE_ERRORを呼び出すことができます。これは、UTL_FILEエラー状況を示すものです。具体的には、エラーがある場合、プロシージャFND_FILE.PUT、FND_FILE.PUT_LINEおよびFND_FILE.NEW_LINEでFND_FILE.UTL_FILE_ERRORを呼び出すことができます。このパッケージ例外に加えて、FND_FILEではNO_DATA_FOUNDやVALUE_ERRORなどの、事前定義済PL/SQL例外を呼び出すこともできます。

一時ファイルが開けないか、書込みができない場合、FND_FILEではUTL_FILE_ERRORが発生します。FND_FILE.UTL_FILE_ERROR例外が発生した後、エラーで終了するか、正常に完了するかはコンカレント・プログラムによります。FND_FILEでは、UTL_FILE_ERROR例外が発生する前からメッセージ・スタックに翻訳済メッセージを保持しています。開発者はFND_FILEエラーのためのメッセージを取得して、要求完了テキストとして使用できます。例外処理時にFND_MESSAGEルーチンを使用してメッセージ・スタックからメッセージを取得するかどうかは、コール元が決定できます。

コンカレント・マネージャでは、すべての一時ファイル作成エラーを要求ログ・ファイルに記録します。

FND_PROGRAM: コンカレント・プログラム・ローダー

FND_PROGRAMパッケージには、コンカレント・プログラム実行ファイル、パラメータのあるコンカレント・プログラム、非互換性ルール、要求セットおよび要求グループを作成するためのプロシージャが含まれています。さらに、このパッケージには、コンカレント・プログラム、実行ファイル、パラメータ、非互換性ルールの存在をチェックするために使用するファンクションも含まれています。

プロシージャに渡される引数は、少数の例外を除いて、Oracle Application Object Libraryのフォーム内のフィールドに対応しています。通常は、最初にこれらのプロシージャに対するパラメータをフォームに入力して、検証やデバッグを行います。

エラーが検出された場合は、ORA-06501: PL/SQL:内部エラーが発生します。ファンクションfnd_program.message()へのコールによりエラー・メッセージを取得できます。

特に索引における値の重複のようないくつかのエラーは、パッケージでは検出されません。

誤った外部キー情報が提供されると例外が呼び出されることに注意してください。たとえば、プログラムが存在しない場合、delete_program()は失敗しませんが、誤ったアプリケーション名が指定された場合は失敗します。

FND_PROGRAM.MESSAGE

function FND_PROGRAM.MESSAGE return VARCHAR2;

FND_PROGRAM.EXECUTABLE

procedure FND_PROGRAM.EXECUTABLE

(executable                IN   VARCHAR2,
      application          IN   VARCHAR2,
      description          IN   VARCHAR2 DEFAULT NULL,
      execution_method     IN   VARCHAR2,
      execution_file_name  IN   VARCHAR2 DEFAULT NULL,
      subroutine_name      IN   VARCHAR2 DEFAULT NULL,
      icon_name            IN   VARCHAR2 DEFAULT NULL,
      language_code        IN   VARCHAR2 DEFAULT 'US');

FND_PROGRAM.DELETE_EXECUTABLE

procedure FND_PROGRAM.DELETE_EXECUTABLE

(executable        IN   varchar2,
      application  IN   varchar2);

FND_PROGRAM.REGISTER

procedure FND_PROGRAM.REGISTER
             (program                   IN VARCHAR2,
             application                IN VARCHAR2,
             enabled                    IN VARCHAR2,
             short_name                 IN VARCHAR2,
             description                IN VARCHAR2 DEFAULT NULL,
             executable_name            IN VARCHAR2,
             executable_application     IN VARCHAR2,
             execution_options          IN VARCHAR2 DEFAULT NULL,
             priority                   IN NUMBER   DEFAULT NULL,
             save_output                IN VARCHAR2 DEFAULT 'Y',
             print                      IN VARCHAR2 DEFAULT 'Y',
             cols                       IN NUMBER   DEFAULT NULL,
             rows                       IN NUMBER   DEFAULT NULL,
             style                      IN VARCHAR2 DEFAULT NULL,
             style_required             IN VARCHAR2 DEFAULT 'N',
             printer                    IN VARCHAR2 DEFAULT NULL,
             request_type               IN VARCHAR2 DEFAULT NULL,
             request_type_application   IN VARCHAR2 DEFAULT NULL,
             use_in_srs                 IN VARCHAR2 DEFAULT 'N',
             allow_disabled_values      IN VARCHAR2 DEFAULT 'N',
             run_alone                  IN VARCHAR2 DEFAULT 'N',
             output_type                IN VARCHAR2 DEFAULT 'TEXT',
             enable_trace               IN VARCHAR2 DEFAULT 'N',
             restart                    IN VARCHAR2 DEFAULT 'Y',
             nls_compliant              IN VARCHAR2 DEFAULT 'N',
             icon_name                  IN VARCHAR2 DEFAULT NULL,
             language_code              IN VARCHAR2 DEFAULT 'US'
             mls_function_short_name    IN VARCHAR2,
             mls_function_application   IN VARCHAR2,
             incrementor                IN VARCHAR2);

FND_PROGRAM.DELETE_PROGRAM

procedure FND_PROGRAM.DELETE_PROGRAM

(program_short_name   IN varchar2,
    application       IN varchar2);

FND_PROGRAM.PARAMETER

procedure FND_PROGRAM.PARAMETER

(program_short_name                   IN VARCHAR2,
       application                    IN VARCHAR2,
       sequence                       IN NUMBER,
       parameter                      IN VARCHAR2,
       description                    IN VARCHAR2 DEFAULT NULL,
       enabled                        IN VARCHAR2 DEFAULT 'Y',
       value_set                      IN VARCHAR2,
       default_type                   IN VARCHAR2 DEFAULT NULL,
       default_value                  IN VARCHAR2 DEFAULT NULL,
       required                       IN VARCHAR2 DEFAULT 'N',
       enable_security                IN VARCHAR2 DEFAULT 'N',
       range                          IN VARCHAR2 DEFAULT NULL,
       display                        IN VARCHAR2 DEFAULT 'Y',
       display_size                   IN NUMBER,
       description_size               IN NUMBER,
       concatenated_description_size  IN NUMBER,
       prompt                         IN VARCHAR2 DEFAULT NULL,
       token                          IN VARCHAR2 DEFAULT NULL);

重要: 新しく追加されたパラメータは、付加フレックスフィールドがコンパイルされるまで「SRS」フォームには表示されません。付加フレックスフィールドはプログラム$FND_TOP/$APPLBIN/fdfcmpによりコンパイルされます。

FND_PROGRAM.DELETE_PARAMETER

procedure FND_PROGRAM.DELETE_PARAMETER

(program_short_name     IN varchar2,
       application      IN varchar2
       parameter        IN varchar2);

FND_PROGRAM.INCOMPATIBILITY

procedure FND_PROGRAM.INCOMPATIBILITY

(program_short_name             IN VARCHAR2,
       application              IN VARCHAR2
       inc_prog_short_name      IN VARCHAR2,
       inc_prog_application     IN VARCHAR2,
       scope                    IN VARCHAR2 DEFAULT 'Set');

FND_PROGRAM.DELETE_INCOMPATIBILITY

procedure FND_PROGRAM.DELETE_INCOMPATIBILITY

(program_short_name             IN VARCHAR2,
       application              IN VARCHAR2,
       inc_prog_short_name      IN VARCHAR2,
       inc_prog_application     IN VARCHAR2);

FND_PROGRAM.REQUEST_GROUP

procedure FND_PROGRAM.REQUEST_GROUP

(request_group      IN VARCHAR2,
      application   IN VARCHAR2,
      code          IN VARCHAR2 DEFAULT NULL,
      description   IN VARCHAR2 DEFAULT NULL);

FND_PROGRAM.DELETE_GROUP

procedure FND_PROGRAM.DELETE_GROUP

(group         IN VARCHAR2,
 application   IN VARCHAR2);

FND_PROGRAM.ADD_TO_GROUP

procedure FND_PROGRAM.ADD_TO_GROUP

(program_short_name       IN VARCHAR2,
    program_application   IN VARCHAR2,
    request_group         IN VARCHAR2,
    group_application     IN VARCHAR2);

FND_PROGRAM.REMOVE_FROM_GROUP

procedure FND_PROGRAM.REMOVE_FROM_GROUP

(program_short_name       IN VARCHAR2,
    program_application   IN VARCHAR2,
    request_group         IN VARCHAR2,
    group_application     IN VARCHAR2);

FND_PROGRAM.PROGRAM_EXISTS

function FND_PROGRAM.PROGRAM_EXISTS

(program           IN VARCHAR2,
 application       IN VARCHAR2)
return boolean;

FND_PROGRAM.PARAMETER_EXISTS

function FND_PROGRAM.PARAMETER_EXISTS

(program_short_name            IN VARCHAR2,
       application             IN VARCHAR2,
       parameteR               IN VARCHAR2)
return boolean;

FND_PROGRAM.INCOMPATIBILITY_EXISTS

function FND_PROGRAM.INCOMPATIBILITY_EXISTS

(program_short_name             IN VARCHAR2,
       application              IN VARCHAR2,
       inc_prog_short_name      IN VARCHAR2,
       inc_prog_application     IN VARCHAR2)
return boolean;

FND_PROGRAM.EXECUTABLE_EXISTS

function FND_PROGRAM.EXECUTABLE_EXISTS

(executable_short_name    IN VARCHAR2,
 application              IN VARCHAR2)
return boolean;

FND_PROGRAM.REQUEST_GROUP_EXISTS

function FND_PROGRAM.REQUEST_GROUP_EXISTS

(request_group     IN VARCHAR2,
 application       IN VARCHAR2)
return boolean;

FND_PROGRAM.PROGRAM_IN_GROUP

function FND_PROGRAM.INCOMPATIBILITY_EXISTS

(program_short_name       IN VARCHAR2,
       application        IN VARCHAR2,
       request_group      IN VARCHAR2,
       group_application  IN VARCHAR2)
return boolean;

FND_PROGRAM.ENABLE_PROGRAM

procedure FND_PROGRAM_ENABLE_PROGRAM

(short_name   IN VARCHAR2,
 application  IN VARCHAR2,
 ENABLED      IN VARCHAR2);

FND_REQUESTパッケージ

FND_REQUEST.SET_OPTIONS (クライアントまたはサーバー)

function FND_REQUEST.SET_OPTIONS

(implicit  IN varchar2 default 'NO',
          protected IN varchar2 default 'NO',
          language  IN varchar2 default NULL,
          territory IN varchar2 default NULL)
          return boolean;

FND_REQUEST.SET_REPEAT_OPTIONS (クライアントまたはサーバー)

function FND_REQUEST.SET_REPEAT_OPTIONS

(repeat_time        IN varchar2 default NULL,
repeat_interval     IN number default NULL,
repeat_unit         IN varchar2 default 'DAYS',
repeat_type         IN varchar2 default 'START'
repeat_end_time     IN varchar2 default NULL)
return boolean; 

FND_REQUEST.SET_PRINT_OPTIONS (クライアントまたはサーバー)

function FND_REQUEST.SET_PRINT_OPTIONS

(printer                 IN varchar2 default NULL,
style                    IN varchar2 default NULL,
copies                   IN number default NULL,
save_output              IN boolean default TRUE,
print_together           IN varchar2 default 'N')
return boolean; 

重要: 「コンカレント・プログラム」フォームを使用してプログラム・レベルで設定されている印刷オプションについては、このプロシージャで上書きできません。上書き可能な印刷オプションについては、次の引数の説明を参照してください。

FND_REQUEST.SUBMIT_REQUEST (クライアントまたはサーバー)

function FND_REQUEST.SUBMIT_REQUEST

(application        IN varchar2 default NULL,
program             IN varchar2 default NULL,
description         IN varchar2 default NULL,
start_time          IN varchar2 default NULL,
sub_request         IN boolean default FALSE
argument1,
argument2, ..., argument99,
argument100) return number; 

重要: FND_REQUESTは、要求の発行元のユーザーとその職責についての情報を持っている必要があります。したがって、このファンクションはOracle E-Business Suite内のコンカレント・プログラムまたはフォームからのみ動作します。

FND_REQUEST.ADD_NOTIFICATION (クライアントまたはサーバー)

function FND_REQUEST.ADD_NOTIFICATION 
(user IN varchar2) return boolean; 

FND_REQUEST.SET_MODE (サーバー)

function FND_REQUEST.SET_MODE

 (db_trigger IN boolean) return boolean;

FND_REQUEST.SUBMIT_REQUESTをデータベース・トリガーでコールした際にエラーが発生した場合は、変更がロールバックされないことに注意してください。

要求発行の例

/* Example 1 */

/* Submit a request from a form and commit*/
 :parameter.req_id := 
      FND_REQUEST.SUBMIT_REQUEST (
           :blockname.appsname,
           :blockname.program,
           :blockname.description,
           :blockname.start_time,
           :blockname.sub_req = 'Y',
           123, NAME_IN('ORDERS.ORDER_ID'), 'abc', 
           chr(0), '', '', '', '', '', '',
           '', '', '', '', '', '', '', '', '', '',
           '', '', '', '', '', '', '', '', '', '',
           '', '', '', '', '', '', '', '', '', '',
           '', '', '', '', '', '', '', '', '', '',
           '', '', '', '', '', '', '', '', '', '',
           '', '', '', '', '', '', '', '', '', '',
           '', '', '', '', '', '', '', '', '', '',
           '', '', '', '', '', '', '', '', '', '',
           '', '', '', '', '', '', '', '', '', '');

IF :parameter.req_id = 0 THEN
    FND_MESSAGE.RETRIEVE;
    FND_MESSAGE.ERROR;
ELSE
  IF :SYSTEM.FORM_STATUS != 'CHANGED' THEN
    IF app_form.quietcommit  THEN
      /*form commits without asking user to save changes*/
     fnd_message.set_name('SQLGL',
           'GL_REQUEST_SUBMITTED');
     fnd_message.set_TOKEN('REQUEST_ID',
            TO_CHAR(:PARAMETER.REQ_ID), FALSE);
     fnd_message.show;
    ELSE 
       fnd_message.set_name('FND', 
            'CONC-REQUEST SUBMISSION FAILED');
       fnd_message.error;
    END IF;
  ELSE
    DO_KEY('COMMIT_FORM');
    IF :SYSTEM.FORM_STATUS != 'CHANGED' THEN
        /*commit was successful*/
        fnd_message.set_name('SQLGL',
           'GL_REQUEST_SUBMITTED');
        fnd_message.set_TOKEN('REQUEST_ID',
             TO_CHAR(:PARAMETER.REQ_ID), FALSE);
        fnd_message.show;
    END IF;
  END IF;
END IF;

/* Example 2 */

/* Submit a request where no setup is required */
declare
  req_id number;
begin
  req_id := FND_REQUEST.SUBMIT_REQUEST ('FND',
              'FNDMDGEN', 'Message File Generator',
              '01-NOV-02 00:00:00', FALSE, ...arguments...);
  if (req_id = 0) then
    /* Handle submission error */
    FND_MESSAGE.RETRIEVE;
    FND_MESSAGE.ERROR;
  else
    commit;
  end if;
end;

/* Example 3 */ 

/* Submit a request from a database trigger */
result := FND_REQUEST.SET_MODE(TRUE);
req_id := FND_REQUEST.SUBMIT_REQUEST (FND',
            'FNDMDGEN', 'Message File  Generator',
            '01-NOV-02 00:00:00', FALSE, ...arguments...);
             

/* Example 4 */

/* Submit a request inserting NULL arguments.
   This call inserts 6 arguments with arguments 1, 3,
   4, and 6 being NULL */
req_id := FND_REQUEST.SUBMIT_REQUEST ('FND',
                        'FNDPROG',
                        'Description of FNDPROG',
                        '01-FEB-01 00:00:00', FALSE,
                        '', 'arg2', '', NULL, arg5, '');

/* Example 5 */

/* Submit a repeating request */
result := FND_REQUEST.SET_REPEAT_OPTIONS ('', 4, 'HOURS', 'END');
req_id := FND_REQUEST.SUBMIT_REQUEST ('CUS',
                          'CUSPOST', 'Custom Posting',
                          '01-APR-01 00:00:00', FALSE,
                          ...arguments...);

重要: FND_REQUEST.SET_REPEAT_OPTIONSがエラーを戻した場合、要求を発行しないこともできます。そのため、FND_REQUEST.SUBMIT_REQUESTへのコールを発行する前にFND_REQUEST.SET_REPEAT_OPTIONSの結果をテストできます。

/* Example 6 */

/* Submit a request for 5 copies of a menu report */
result := FND_REQUEST.SET_PRINT_OPTIONS ('hqunx138',
                                         'Landscape',
                                          5,
                                         'Yes',
                                         FALSE);
req_id := FND_REQUEST.SUBMIT_REQUEST ('FND',
                                'FNDMNRMT',
                                '',
                                '',
                               'N', 0, 101);

/* Example 7 */

/* Submit a protected request that repeats at noon */
result := FND_REQUEST.SET_OPTIONS ('YES');
result := FND_REQUEST.SET_REPEAT_OPTIONS ('12:00');
req_id := FND_REQUEST.SUBMIT_REQUEST ('CUS',
                            'CUSPOST', 'Custom Posting',
                            '01-APR-01 00:00:00', FALSE,
                             ... args ...);

FND_REQUEST_INFOおよび複数言語のサポート(MLS)

FND_REQUEST_INFOのAPIを複数言語サポート機能(MLS機能)で使用して、要求情報を取得できます。

複数言語サポート機能は、コンカレント・プログラムの複数言語での実行に加えて、地域および数字設定(".,"など)をサポートするための機能です。コンカレント・プログラムに対し単一の要求を発行し、言語、地域および数字設定のパラメータに対してそれぞれ異なる値でそのプログラムを複数回実行できます。

この機能を有効化するには、開発者がデータベース内にMLS機能をストアド・ファンクションとして作成します。コール時に、このファンクションがコンカレント・プログラムのデータ・セットとして使用する言語を決定し、言語コードのリストをカンマで区切られた文字列として戻します。コンカレント・マネージャではこの文字列を使用して、各ターゲット言語でのコンカレント・プログラムのための子要求を発行します。MLS機能は地域および数字設定に対しても同様に機能します。

注意: fnd_concurrent_requestは、文字列書式に渡された言語、地域および数字設定の3つの値を反映します。次の例に示すように、この文字列書式は、コロンで区切られた言語コード、地域(オプション)および数字(オプション)、およびセミコロンのデリミタで構成されます。

“US:US:,.”

“US::.,;JA:JP:;KO:KR:.,”

“US: : ”

必要に応じて、MLS機能はFND_REQUEST_INFOのAPIを使用してコンカレント・プログラム・アプリケーション短縮名、コンカレント・プログラム短縮名、コンカレント要求パラメータを取得します。

開発者は「コンカレント・プログラム実行ファイル」フォームでMLS機能を登録し、さらに「コンカレント・プログラム」フォームで、登録したMLS機能をコンカレント・プログラムに関連付けます。

FND_REQUEST_INFO.GET_PARAM_NUMBER

function GET_PARAM_NUMBER

(name               IN VARCHAR2,
param_num           OUT NUMBER);

FND_REQUEST_INFO.GET_PARAM_INFO

function GET_PARAM_INFO

(param_num         IN NUMBER,
       name        OUT VARCHAR2);

FND_REQUEST_INFO.GET_PROGRAM

procedure GET_PROGRAM
(program_name           OUT VARCHAR2,
program_app_name        OUT VARCHAR2);

FND_REQUEST_INFO.GET_PARAMETER

function GET_PARAMETER

(param_num   IN NUMBER)
      return varchar2;

MLS機能の例

各従業員に対し休暇日数のレポートを送付するコンカレント・プログラムがあるとします。このコンカレント・プログラムでは従業員番号の範囲をパラメータとして受け取ります。従業員はすべて、休暇日数レポートを各自が指定した言語で受け取ることを希望しています。MLS機能がない場合、このコンカレント・プログラムを発行するユーザーは、要求を発行する際に指定の従業員番号範囲から必要な言語すべてを推測し、それらの言語を選択する必要があります。インストール済言語すべてが必要とは限らないので、すべてを選択するのはリソースの無駄になる可能性があります。

次のような列を持つ従業員表(emp)があるとします。

 emp_no number(15), 
     ...
     preferred_lang_code  varchar2(4),
     ...

このコンカレント・プログラムには、従業員番号の範囲を指定する2つのパラメータがあります。パラメータ1はstarting emp_noで、パラメータ2はending emp_noです。

このMLS機能は、同様に従業員番号の開始および終了パラメータを持つ別のコンカレント・プログラムでも使用できます。

例

CREATE OR REPLACE FUNCTION EMPLOYEE_LANG_FUNCTION RETURN VARCHAR2 IS
 
  language_string    varchar2(240); 
  start_value        varchar2(240); 
  end_value          varchar2(240); 

  CURSOR language_cursor (starting number, ending number) IS
     SELECT DISTINCT(preferred_lang_code) language_code 
      FROM  emp 
      WHERE emp_no BETWEEN starting AND ending 
      AND   preferred_lang_code IS NOT NULL; 

  BEGIN 

      -- Initialize the language string 
      language_string := null; 
  

      -- Get parameter values for starting and 
      -- ending EMP_NO 
      start_value := FND_REQUEST_INFO.GET_PARAMETER(1); 
      end_value  := FND_REQUEST_INFO.GET_PARAMETER(2); 

      FOR languages IN language_cursor(
                       to_number(start_value), 
                       to_number(end_value)) LOOP 

        IF( language_string IS NULL ) THEN 
           language_string := languages.language_code;
        ELSE 
           language_string := language_string || ',' ||
                         languages.language_code;
        END IF; 
      END LOOP; 
      RETURN (language_string); 
END EMPLOYEE_LANG_FUNCTION; 

FND_SET: 要求セット・ローダー

FND_SETパッケージにはコンカレント・プログラム要求セットの作成、要求セットへのプログラムの追加、要求セットからのプログラムの削除、および要求セットのパラメータの定義を行うためのプロシージャが含まれています。

プロシージャに渡される引数は、少数の例外を除いて、Oracle Application Object Libraryのフォーム内のフィールドに対応しています。通常は、最初にこれらのプロシージャに対するパラメータをフォームに入力して、検証やデバッグを行います。

エラーが検出された場合は、ORA-06501: PL/SQL:内部エラーが発生します。ファンクションfnd_program.message()へのコールによりエラー・メッセージを取得できます。

特に索引における値の重複のようないくつかのエラーは、パッケージでは検出されません。

誤った外部キー情報が提供されると例外が呼び出されることに注意してください。たとえば、プログラムが存在しない場合、delete_program()は失敗しませんが、誤ったアプリケーション名が指定された場合は失敗します。

関連項目: 要求セットの概要

FND_SET.MESSAGE

FND_SET.CREATE_SET

procedure FND_SET.CREATE_SET

 (name                              IN VARCHAR2,
       short_name                   IN VARCHAR2,
       application                  IN VARCHAR2,
       description                  IN VARCHAR2 DEFAULT NULL,
       owner                        IN VARCHAR2 DEFAULT NULL,
       start_date                   IN DATE     DEFAULT SYSDATE,
       end_date                     IN DATE     DEFAULT NULL,
       print_together               IN VARCHAR2 DEFAULT 'N',
       incompatibilities_allowed    IN VARCHAR2 DEFAULT 'N',
       language_code                IN VARCHAR2 DEFAULT 'US');

FND_SET.DELETE_SET

procedure FND_SET.DELETE_SET

(request_set              IN VARCHAR2,
      application         IN VARCHAR2);

FND_SET.ADD_PROGRAM

procedure FND_SET.ADD_PROGRAM

(program                        IN VARCHAR2,
       program_application      IN VARCHAR2,
       request_set              IN VARCHAR2,
       set_application          IN VARCHAR2, 
       stage                    IN VARCHAR2,
       program_sequence         IN NUMBER,
       critical                 IN VARCHAR2 DEFAULT 'Y',
       number_of_copies         IN NUMBER   DEFAULT 0,
       save_output              IN VARCHAR2 DEFAULT 'Y',
       style                    IN VARCHAR2 DEFAULT NULL,
       printer                  IN VARCHAR2 DEFAULT NULL);

FND_SET.REMOVE_PROGRAM

procedure FND_SET.REMOVE_PROGRAM

(program_short_name             IN VARCHAR2,
       program_application      IN VARCHAR2,
       request_set              IN VARCHAR2,
       set_application          IN VARCHAR2,
       stage                    IN VARCHAR2,
       program_sequence         IN NUMBER);

FND_SET.PROGRAM_PARAMETER

procedure FND_SET.PROGRAM_PARAMETER

(program                        IN VARCHAR2,
       program_application      IN VARCHAR2,
       request_set              IN VARCHAR2,
       set_application          IN VARCHAR2,
       stage                    IN VARCHAR2.
       program_sequence         IN NUMBER,
       parameter                IN VARCHAR2,
       display                  IN VARCHAR2 DEFAULT 'Y',
       modify                   IN VARCHAR2 DEFAULT 'Y',
       shared_parameter         IN VARCHAR2 DEFAULT NULL,
       default_type             IN VARCHAR2 DEFAULT NULL,
       default_value            IN VARCHAR2 DEFAULT NULL);

FND_SET.DELETE_PROGRAM_PARAMETER

procedure FND_SET.DELETE_SET_PARAMETER

program                         IN VARCHAR2,
      program_application       IN VARCHAR2,
      request_set               IN VARCHAR2 DEFAULT NULL,
      stage                     IN VARCHAR2,
      set_application           IN VARCHAR2,
      program_sequence          IN NUMBER,
      parameter                 IN VARCHAR2);

FND_SET.ADD_STAGE

procedure FND_SET.ADD_STAGE

(name                         IN VARCHAR2,
request_set                   IN VARCHAR2,
set_application               IN VARCHAR2,
short_name                    IN VARCHAR2,
description                   IN VARCHAR2 DEFAULT NULL, 
display_sequence              IN NUMBER,
function_short_name           IN VARCHAR2 DEFAULT 'FNDRSSTE'
function_application          IN VARCHAR2 DEFAULT 'FND',
critical                      IN VARCHAR2 DEFAULT 'N',
incompatibilities_allowed     IN VARCHAR2 DEFAULT 'N',
start_stage                   IN VARCHAR2 DEFAULT 'N',
language_code                 IN VARCHAR2 DEFAULT 'US');

FND_SET.REMOVE_STAGE

procedure FND_SET.REMOVE_STAGE

(request_set                    IN VARCHAR2,
      set_application           IN VARCHAR2,
  stage                         IN VARCHAR2);

FND_SET.LINK_STAGES

procedure FND_SET.LINK_STAGES

(request_set                    IN VARCHAR2,
      set_application           IN VARCHAR2,
      from_stage                IN VARCHAR2,
      to_stage                  IN VARCHAR2 DEFAULT NULL,
      success                   IN VARCHAR2 DEFAULT 'N',
      warning                   IN VARCHAR2 DEFAULT 'N',
      error                     IN VARCHAR2 DEFAULT 'N');

重要: このプロシージャは、指定されているリンクを更新します。FND_SET.CREATE_SETによって作成されたセットには、デフォルトでステージ間のNULLリンクが設定されています。

FND_SET.INCOMPATIBILITY

procedure FND_SET.INCOMPATIBILITY

(request_set                    IN VARCHAR2,
      application               IN VARCHAR2,
      stage                     IN VARCHAR2 DEFAULT NULL,
      inc_prog                  IN VARCHAR2 DEFAULT NULL
      inc_prog_application      IN VARCHAR2 DEFAULT NULL,
      inc_request_set           IN VARCHAR2 DEFAULT NULL,
      inc_set_application       IN VARCHAR2 DEFAULT NULL,
      inc_stage                 IN VARCHAR2 DEFAULT NULL);

例

1. セットXがプログラムYと非互換の場合

   fnd_set.incompatibility(request_set=>'X'
                           application=>'APPX'
                           inc_prog_short_name=>'Y',
                           inc_prog_application=>'APPY'); 
   

2. セットXがセットYと非互換の場合

   fnd_set.incompatibility(request_set=>'X',
                           application=>'APPX',
                           inc_request_set=>'Y',
                           inc_set_application=>'APPY');
   

3. セットXがステージYのステージ2と非互換の場合

   fnd_set.incompatibility(request_set=>'X',
                           application=>'APPX',
                           inc_request_set=>'Y',
                           inc_set_application=>'APPY',
                           inc_stage_number=>2);
   

4. セットXのステージ3がプログラムYと非互換の場合

   fnd_set.incompatibility(request_set=>'X',
                           application=>'APPX',
                           stage_number=>3,
                           inc_prog_short_name=>'Y',
                           inc_prog_application=>'APPY');
   

FND_SET.DELETE_INCOMPATIBILITY

procedure FND_SET.DELETE_INCOMPATIBILITY
 (request_set                   IN VARCHAR2,
       application              IN VARCHAR2,
       stage                    IN VARCHAR2 DEFAULT NULL,
       inc_prog                 IN VARCHAR2 DEFAULT NULL
       inc_prog_application     IN VARCHAR2 DEFAULT NULL,
       inc_request_set          IN VARCHAR2 DEFAULT NULL,
       inc_set_application      IN VARCHAR2 DEFAULT NULL,
       inc_stage                IN VARCHAR2 DEFAULT NULL);

FND_SET.ADD_SET_TO_GROUP

procedure FND_SET.ADD_SET_TO_GROUP
   (request_set             IN VARCHAR2,
    set_application         IN VARCHAR2,
    request_group           IN VARCHAR2,
    group_application       IN VARCHAR2);

FND_SET.REMOVE_SET_FROM_GROUP

procedure FND_SET.REMOVE_SET_FROM_GROUP
(request_set                IN VARCHAR2,
 set_application            IN VARCHAR2,
 request_group              IN VARCHAR2,
 group_application          IN VARCHAR2);

FND_SUBMIT: 要求セットの発行

この項では、要求セット発行のためのFND_SUBMITのAPIについて説明します。APIはコールされる順序に従って説明していきます。いくつかのAPIはオプションです。

FND_SUBMIT.SET_MODE

function FND_SUBMIT.SET_MODE (db_trigger IN boolean) return boolean;

FND_SUBMIT.SET_REL_CLASS_OPTIONS

function FND_SUBMIT.SET_REL_CLASS_OPTIONS 

(application       IN varchar2 default NULL,
 class_name        IN varchar2 default NULL, 
 cancel_or_hold    IN varchar2 default 'H',
 stale_date        IN varchar2 default NULL)  return boolean;

FND_SUBMIT.SET_REPEAT_OPTIONS

function FND_SUBMIT.SET_REPEAT_OPTIONS 	

(repeat_time             IN varchar2 default NULL,  
 repeat_interval         IN number default NULL,  
 repeat_unit             IN varchar2 default 'DAYS', 
 repeat_type             IN varchar2 default 'START',  
 repeat_end_time         IN varchar2 default NULL)  return boolean; 

FND_SUBMIT_SET.REQUEST_SET

function FND_SUBMIT.SET_REQUEST_SET 	

(application  IN VARCHAR2,  
 request_set  IN VARCHAR2)  return  boolean; 

FND_SUBMIT.SET_PRINT_OPTIONS

function FND_SUBMIT.SET_PRINT_OPTIONS 	

(printer           IN varchar2 default NULL,  
style              IN varchar2 default NULL,  
copies             IN number default NULL,  
save_output        IN boolean default 
print_together     IN varchar2 default 'N')  return boolean;

FND_SUBMIT.ADD_PRINTER

function FND_SUBMIT.SET.ADD_PRINTER 
	
(printer     IN varchar2 default null, 
 copies      IN number default null)  return boolean; 

FND_SUBMIT.ADD_NOTIFICATION

function FND_SUBMIT.ADD_NOTIFICATION 	

(user IN varchar2) return boolean;

FND_SUBMIT.SET_NLS_OPTIONS

function FND_SUBMIT.SET_NLS_OPTIONS  

(language    IN varchar2 default NULL,  
 territory   IN varchar2 default NULL) return boolean; 

FND_SUBMIT.SUBMIT_PROGRAM

function FND_SUBMIT.SUBMIT_PROGRAM  

(application  IN varchar2,   
 program      IN varchar2,   
 stage        IN varchar2,   
 argument1,...argument100)  return boolean;

FND_SUBMIT.SUBMIT_SET

function FND_SUBMIT.SUBMIT_SET 

(start_time  IN varchar2 default null,  
 sub_request IN boolean default FALSE)  return integer;

要求セット発行の例

/* Example 1 */
/* To submit a Request set which is having STAGE1 and
STAGE2. STAGE1 is having ’FNDSCARU’ and ’FNDPRNEV’
programs. STAGE2 is having ’FNDSCURS’. */
/* set the context for the request set FNDRSTEST */
success := fnd_submit.set_request_set(’FND’, ’FNDRSTEST’);

		if ( success ) then
	
		/* submit program FNDSCARU which is in stage STAGE1 */
		success := fnd_submit.submit_program(’FND’,’FNDSCARU’,
 		’STAGE1’, CHR(0),’’,’’,’’,’’,’’,’’,’’,’’,’’,
							...arguments...);
  	if ( not success ) then
			raise submit_failed;
		end if;

		/* submit program FNDPRNEV which is in stage STAGE1 */
		success := fnd_submit.submit_program(’FND’,’FNDPRNEV’,
				’STAGE1’,’’,’’,’’,’’,’’,’’,’’,’’,’’,’’,
				CHR(0),’’,’’,’’,’’,’’,’’,’’,’’,’’,
				...arguments...);
		if ( not success ) then
			raise submit_failed;
		end if;

		/* submit program FNDSCURS which is in stage STAGE2 */
		success := fnd_submit.submit_program(’FND’,’FNDSCURS’,
					’STAGE2’, CHR(0),’’,’’,’’,’’,’’,’’,’’,’’,’’,
					...arguments...);
		if ( not success ) then
				raise submit_failed;
		end if;

		/* Submit the Request Set */
		req_id := fnd_submit.submit_set(null,FALSE);

end if;

/* Example 2 */
/* To submit a request set FNDRSTEST as a repeating request set.
Request set FNDRSTEST has STAGE1 and STAGE2. 
STAGE1 contains 'FNDSCARU'  and 'FNDPRNEV' programs. 
STAGE2 has 'FNDSCURS'. */ 

   /* set the repeating options for the request set before
     calling the set_request_set  */ 
   success := fnd_submit.set_repeat_options( '', 4, 'HOURS',     'END'); 

   /* set the context for the request set FNDRSTEST */ 
   success := fnd_submit.set_request_set('FND', 
	'FNDRSTEST'); 

   if ( success ) then 

   /* submit program FNDSCARU which is in stage STAGE1 */ 
   success := fnd_submit.submit_program('FND','FNDSCARU', 
      'STAGE1', CHR(0),'','','','','','','','','', 
      ...arguments...); 
   if ( not success ) then 
     raise submit_failed; 
   end if; 

   /* submit program FNDPRNEV which is in stage STAGE1 */ 
     success := fnd_submit.submit_program('FND','FNDPRNEV',
	'STAGE1','','','','','','','','','','',
	CHR(0),'','','','','','','','','', 
	...arguments...); 
      if ( not success ) then 
	raise submit_failed; 
      end if; 

   /* submit program FNDSCURS which is in stage STAGE2  */ 
   success := fnd_submit.submit_program('FND','FNDSCURS', 
	'STAGE2', CHR(0),'','','','','','','','','', 
        ...arguments...); 
   if ( not success ) then 
      raise submit_failed; 
   end if; 

   /*  Submit the Request set  */ 
   req_id := fnd_submit.submit_set(null,FALSE); 

end if; 

/* Example 3 */
/* To submit a Request set  FNDRSTEST with 5 copies of the Print environment variables report.  Request set FNDRSTEST has STAGE1 and STAGE2.  STAGE1 has 'FNDSCARU'  and 'FNDPRNEV' programs.  STAGE2 has 'FNDSCURS'. */ 
  
   /* set the context for the request set FNDRSTEST */ 
   success := fnd_submit.set_request_set('FND', 'FNDRSTEST'); 

   if ( success ) then 

      /* submit program FNDSCARU which is in stage STAGE1 */ 
      success := fnd_submit.submit_program('FND','FNDSCARU',
          'STAGE1', CHR(0),'','','','','','','','','', ...arguments...); 
   if ( not success ) then 
          raise submit_failed; 
   end if; 

   /* set the print options for the program */ 
   success := fnd_submit.set_print_options( 'hqunx138', 'Landscape', 5,
       'Yes', FALSE); 

   /* submit program FNDPRNEV which is in stage STAGE1 */ 
   success:= fnd_submit.submit_program('FND','FNDPRNEV', 
         'STAGE1','','','','','','','','','','',
         CHR(0),'','','','','','','','','', 
          ...arguments...); 
   if ( not success ) then 
       raise submit_failed; 
   end if; 

   /* submit program FNDSCURS which is in stage STAGE2  */ 
   success := fnd_submit.submit_program('FND','FNDSCURS',             'STAGE2', CHR(0),'','','','','','','','','', 
         ...arguments...); 
   if ( not success ) then 
      raise submit_failed; 
   end if; 

   /*  Submit the Request set  */ 
   req_id := fnd_submit.submit_set(null,FALSE); 

end if; 

Copyright © 1995, 2013, Oracle and/or its affiliates. All rights reserved.