Interface_GL通过gl_interface导入日记账(案例)

2014-06-17 BaoXinjian

一、基本参考


1. 接口表和错误信息

    (1).gl_interface: 数据会影响gl_je_batches, gl_je_header, gl_je_lines, gl_import_references

    (2).gl_interface_contorl: 控制那些Resource资料需要导入

    (3).gl_interface_status: 错误信息

2. 并发程式<Journal Import>

   

    ==>Program - Import Journals

3. Interface Form

   

4. 关键参数

 

二、案例实现


1. 代码简单例子

 1 DECLARE
 2     rec_gl_journal gl_interface%ROWTYPE;
 3     l_group_id gl_interface.GROUP_ID%TYPE;
 4     l_interface_run_id gl_interface_control.interface_run_id%TYPE;
 5 BEGIN
 6     SELECT gl_interface_control_s.NEXTVAL INTO l_group_id FROM DUAL;
 7     rec_gl_journal.status := 'NEW';
 8     rec_gl_journal.ledger_id := 1;
 9     rec_gl_journal.set_of_books_id := 1;
10     rec_gl_journal.accounting_date := SYSDATE;
11     rec_gl_journal.date_created := SYSDATE;
12     rec_gl_journal.created_by := fnd_global.user_id;
13     rec_gl_journal.actual_flag := 'A';
14     rec_gl_journal.user_je_source_name := 'Purchasing';
15     rec_gl_journal.user_je_category_name := 'Receiving';
16     rec_gl_journal.reference1 := 'reference1';
17     rec_gl_journal.reference2 := 'reference2';
18     rec_gl_journal.reference10 := 'reference10';
19     rec_gl_journal.currency_code := 'USD';
20     --dr
21     rec_gl_journal.code_combination_id := 17021;
22     rec_gl_journal.entered_dr := 10;
23     rec_gl_journal.accounted_dr := 10;
24     rec_gl_journal.entered_cr := NULL;
25     rec_gl_journal.accounted_cr := NULL;
26     INSERT INTO gl_interface VALUES rec_gl_journal;
27     --cr
28     rec_gl_journal.code_combination_id := 16902;
29     rec_gl_journal.entered_dr := NULL;
30     rec_gl_journal.accounted_dr := NULL;
31     rec_gl_journal.entered_cr := 10;
32     rec_gl_journal.accounted_cr := 10;
33     INSERT INTO gl_interface VALUES rec_gl_journal;
34     SELECT gl_interface_control_s.NEXTVAL INTO l_interface_run_id FROM DUAL;
35     INSERT INTO gl_interface_control
36               (je_source_name, GROUP_ID, interface_run_id, set_of_books_id,status)
37            VALUES ('Purchasing', l_group_id, l_interface_run_id, 1,'S');
38     COMMIT;
39 END;

2.导入画面

    

3.Import Jounarl后运行的Output

    

4.产生的日记账明细及Batch

 

Thanks and Regards

posted on 2014-06-05 13:07  东方瀚海  阅读(1450)  评论(0编辑  收藏  举报