[Home] [Help]
PACKAGE BODY: APPS.AME_API8
Source
1 package body ame_api8 as
2 /* $Header: ameeapi8.pkb 120.0 2006/02/13 22:59:23 vboggava noship $ */
3 procedure getItemProductions(applicationIdIn in number
4 ,transactionTypeIn in varchar2
5 ,transactionIdIn in varchar2
6 ,itemClassIn in varchar2
7 ,itemIdIn in varchar2
8 ,productionsOut out nocopy ame_util2.productionsTable) is
9 tempProductions ame_util2.productionsTable;
10 begin
11 ame_engine.updateTransactionState(isTestTransactionIn => false,
12 isLocalTransactionIn => false,
13 fetchConfigVarsIn => true,
14 fetchOldApproversIn => true,
15 fetchInsertionsIn => true,
16 fetchDeletionsIn => true,
17 fetchAttributeValuesIn => true,
18 fetchInactiveAttValuesIn => true,
19 processProductionActionsIn => true,
20 processProductionRulesIn => true,
21 updateCurrentApproverListIn => true,
22 updateOldApproverListIn => true,
23 processPrioritiesIn => true,
24 prepareItemDataIn => true,
25 prepareRuleIdsIn => true,
26 prepareRuleDescsIn => true,
27 transactionIdIn => transactionIdIn,
28 ameApplicationIdIn => null,
29 fndApplicationIdIn => applicationIdIn,
30 transactionTypeIdIn => transactionTypeIn );
31 ame_engine.getProductions(itemClassIn => itemClassIn
32 ,itemIdIn => itemIdIn
33 ,productionsOut => tempProductions);
34 for i in 1 .. tempProductions.count loop
35 productionsOut(i).variable_name := tempProductions(i).variable_name;
36 productionsOut(i).variable_value := tempProductions(i).variable_value;
37 productionsOut(i).item_class := tempProductions(i).item_class;
38 productionsOut(i).item_id := tempProductions(i).item_id;
39 end loop;
40 end getItemProductions;
41 end ame_api8;