如何通过调用pl/sql标准包去生成code_combination_id？

纵横四海

今天有一个朋友问道这个问题.我找了一点资料：

函数包应该是：gl_code_combinations_pkg

以下是我在另外一个网站看到的资料：

我曾经开发过这样的东西,主要用来自动产生费用类型的会计科目和CCID.我把他作成了一个PKG.以下部分程序是它产生CCID的代码.
不知对你是否有所帮助或启发.
....

1. SELECT GL_CODE_COMBINATIONS_S.nextval INTO V_CODE_COMBINATION_ID FROM DUAL;
   
2. insert into GL_CODE_COMBINATIONS
   
3.   (CODE_COMBINATION_ID,
   
4.    LAST_UPDATE_DATE,
   
5.    LAST_UPDATED_BY,
   
6.    CHART_OF_ACCOUNTS_ID,
   
7.    DETAIL_POSTING_ALLOWED_FLAG,
   
8.    DETAIL_BUDGETING_ALLOWED_FLAG,
   
9.    ACCOUNT_TYPE,
   
10.    ENABLED_FLAG,
    
11.    SUMMARY_FLAG,
    
12.    SEGMENT1,
    
13.    SEGMENT2,
    
14.    SEGMENT3,
    
15.    SEGMENT4,
    
16.    SEGMENT5,
    
17.    SEGMENT6,
    
18.    SEGMENT7,
    
19.    SEGMENT8,
    
20.    SEGMENT9,
    
21.    SEGMENT10,
    
22.    SEGMENT11,
    
23.    SEGMENT12,
    
24.    SEGMENT13,
    
25.    SEGMENT14,
    
26.    SEGMENT15,
    
27.    ATTRIBUTE10)
    
28. values
    
29.   (V_CODE_COMBINATION_ID,
    
30.    sysdate,
    
31.    1086,
    
32.    101,
    
33.    'Y',
    
34.    'Y',
    
35.    V_ITEM.ACCOUNT_TYPE,
    
36.    'Y',
    
37.    'N',
    
38.    V_ORG_T_CODE,
    
39.    V_ITEM.SEGMENT2,
    
40.    V_ITEM.SEGMENT3,
    
41.    V_ITEM.SEGMENT4,
    
42.    V_ITEM.SEGMENT5,
    
43.    V_ITEM.SEGMENT6,
    
44.    V_ITEM.SEGMENT7,
    
45.    V_ITEM.SEGMENT8,
    
46.    V_ITEM.SEGMENT9,
    
47.    V_ITEM.SEGMENT10,
    
48.    V_ITEM.SEGMENT11,
    
49.    V_ITEM.SEGMENT12,
    
50.    V_ITEM.SEGMENT13,
    
51.    V_ITEM.SEGMENT14,
    
52.    V_ITEM.SEGMENT15,
    
53.    'ORG' || TO_CHAR(SYSDATE, 'YYYY-MM-DD'));
    
54. COMMIT;
    
55. .. ..

复制代码

gaoyiming

原帖由 纵横四海 于 2007-7-6 13:59 发表
今天有一个朋友问道这个问题.我找了一点资料：

函数包应该是：gl_code_combinations_pkg

以下是我在另外一个网站看到的资料：

SELECT GL_CODE_COMBINATIONS_S.nextval INTO V_CODE_COMBINATION_ID FRO ...

调用这个包 gl_code_combinations_pkg.Insert_Row