APPS.AMS_STATUS_ORDER_RULES_PKG dependencies on AMS_STATUS_ORDER_RULES

Line 1: package body AMS_STATUS_ORDER_RULES_PKG as

1: package body AMS_STATUS_ORDER_RULES_PKG as
2: /* $Header: amslstsb.pls 115.4 2002/11/16 01:44:37 dbiswas ship $ */
3: procedure INSERT_ROW (
4: X_ROWID in OUT NOCOPY VARCHAR2,
5: X_STATUS_ORDER_RULE_ID in NUMBER,

Line 20: cursor C is select ROWID from AMS_STATUS_ORDER_RULES

16: X_LAST_UPDATED_BY in NUMBER,
17: X_LAST_UPDATE_LOGIN in NUMBER,
18: X_APPLICATION_ID in NUMBER DEFAULT '530'
19: ) is
20: cursor C is select ROWID from AMS_STATUS_ORDER_RULES
21: where STATUS_ORDER_RULE_ID = X_STATUS_ORDER_RULE_ID ;
22: begin
23: insert into AMS_STATUS_ORDER_RULES (
24: STATUS_ORDER_RULE_ID,

Line 23: insert into AMS_STATUS_ORDER_RULES (

19: ) is
20: cursor C is select ROWID from AMS_STATUS_ORDER_RULES
21: where STATUS_ORDER_RULE_ID = X_STATUS_ORDER_RULE_ID ;
22: begin
23: insert into AMS_STATUS_ORDER_RULES (
24: STATUS_ORDER_RULE_ID,
25: LAST_UPDATE_DATE,
26: LAST_UPDATED_BY,
27: CREATION_DATE,

Line 80: update AMS_STATUS_ORDER_RULES set

76: X_LAST_UPDATE_LOGIN in NUMBER,
77: X_APPLICATION_ID in NUMBER DEFAULT '530'
78: ) is
79: begin
80: update AMS_STATUS_ORDER_RULES set
81: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
82: SYSTEM_STATUS_TYPE = X_SYSTEM_STATUS_TYPE,
83: CURRENT_STATUS_CODE = X_CURRENT_STATUS_CODE,
84: NEXT_STATUS_CODE = X_NEXT_STATUS_CODE,

Line 104: delete from AMS_STATUS_ORDER_RULES

100: procedure DELETE_ROW (
101: X_STATUS_ORDER_RULE_ID in NUMBER
102: ) is
103: begin
104: delete from AMS_STATUS_ORDER_RULES
105: where STATUS_ORDER_RULE_ID = X_STATUS_ORDER_RULE_ID;
106:
107: if (sql%notfound) then
108: raise no_data_found;

Line 132: from AMS_STATUS_ORDER_RULES

128: l_sts_id number;
129:
130: cursor c_obj_verno is
131: select object_version_number
132: from AMS_STATUS_ORDER_RULES
133: where status_order_rule_id = X_STATUS_ORDER_RULE_ID;
134:
135: cursor c_chk_sts_exists is
136: select 'x'

Line 137: from AMS_STATUS_ORDER_RULES

133: where status_order_rule_id = X_STATUS_ORDER_RULE_ID;
134:
135: cursor c_chk_sts_exists is
136: select 'x'
137: from AMS_STATUS_ORDER_RULES
138: where status_order_rule_id = X_STATUS_ORDER_RULE_ID;
139:
140: cursor c_get_stsid is
141: select ams_status_order_rules_s.nextval

Line 141: select ams_status_order_rules_s.nextval

137: from AMS_STATUS_ORDER_RULES
138: where status_order_rule_id = X_STATUS_ORDER_RULE_ID;
139:
140: cursor c_get_stsid is
141: select ams_status_order_rules_s.nextval
142: from dual;
143:
144: BEGIN
145:

Line 166: AMS_STATUS_ORDER_RULES_PKG.INSERT_ROW (

162: end if ;
163:
164: l_obj_verno := 1;
165:
166: AMS_STATUS_ORDER_RULES_PKG.INSERT_ROW (
167: X_ROWID => l_row_id ,
168: X_STATUS_ORDER_RULE_ID => l_sts_id,
169: X_OBJECT_VERSION_NUMBER => l_obj_verno,
170: X_SYSTEM_STATUS_TYPE => X_SYSTEM_STATUS_TYPE,

Line 190: AMS_STATUS_ORDER_RULES_PKG.UPDATE_ROW(

186: open c_obj_verno;
187: fetch c_obj_verno into l_obj_verno;
188: close c_obj_verno;
189:
190: AMS_STATUS_ORDER_RULES_PKG.UPDATE_ROW(
191: X_STATUS_ORDER_RULE_ID => X_STATUS_ORDER_RULE_ID,
192: X_OBJECT_VERSION_NUMBER => l_obj_verno + 1,
193: X_SYSTEM_STATUS_TYPE => X_SYSTEM_STATUS_TYPE,
194: X_CURRENT_STATUS_CODE => X_CURRENT_STATUS_CODE,

Line 208: end AMS_STATUS_ORDER_RULES_PKG;

204: end if;
205:
206: END LOAD_ROW ;
207:
208: end AMS_STATUS_ORDER_RULES_PKG;