[Home] [Help]
PACKAGE BODY: APPS.CHV_ORG_OPTIONS_PKG_S1
Source
1 PACKAGE BODY CHV_ORG_OPTIONS_PKG_S1 as
2 /* $Header: CHVSEO1B.pls 115.1 2002/11/23 04:10:10 sbull ship $ */
3
4 /*===========================================================================
5
6 PROCEDURE NAME: insert_row()
7
8 =============================================================================*/
9
10
11 PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
12 X_Organization_Id NUMBER,
13 X_Enable_Cum_Flag VARCHAR2,
14 X_Rtv_Update_Cum_Flag VARCHAR2,
15 X_Last_Update_Date DATE,
16 X_Last_Updated_By NUMBER,
17 X_Creation_Date DATE,
18 X_Created_By NUMBER,
19 X_Plan_Bucket_Pattern_Id NUMBER,
20 X_Ship_Bucket_Pattern_Id NUMBER,
21 X_Plan_Schedule_Type VARCHAR2,
22 X_Ship_Schedule_Type VARCHAR2,
23 X_Mrp_Compile_Designator VARCHAR2,
24 X_Mps_Schedule_Designator VARCHAR2,
25 X_Drp_Compile_Designator VARCHAR2,
26 X_Attribute_Category VARCHAR2,
27 X_Attribute1 VARCHAR2,
28 X_Attribute2 VARCHAR2,
29 X_Attribute3 VARCHAR2,
30 X_Attribute4 VARCHAR2,
31 X_Attribute5 VARCHAR2,
32 X_Attribute6 VARCHAR2,
33 X_Attribute7 VARCHAR2,
34 X_Attribute8 VARCHAR2,
35 X_Attribute9 VARCHAR2,
36 X_Attribute10 VARCHAR2,
37 X_Attribute11 VARCHAR2,
38 X_Attribute12 VARCHAR2,
39 X_Attribute13 VARCHAR2,
40 X_Attribute14 VARCHAR2,
41 X_Attribute15 VARCHAR2,
42 X_Last_Update_Login NUMBER
43
44 ) IS
45 CURSOR C IS SELECT rowid FROM CHV_ORG_OPTIONS
46 WHERE organization_id = X_Organization_Id ;
47
48
49 BEGIN
50
51 INSERT INTO CHV_ORG_OPTIONS (
52 organization_id,
53 enable_cum_flag,
54 rtv_update_cum_flag,
55 last_update_date,
56 last_updated_by,
57 creation_date,
58 created_by,
59 plan_bucket_pattern_id,
60 ship_bucket_pattern_id,
61 plan_schedule_type,
62 ship_schedule_type,
63 mrp_compile_designator,
64 mps_schedule_designator,
65 drp_compile_designator,
66 attribute_category,
67 attribute1,
68 attribute2,
69 attribute3,
70 attribute4,
71 attribute5,
72 attribute6,
73 attribute7,
74 attribute8,
75 attribute9,
76 attribute10,
77 attribute11,
78 attribute12,
79 attribute13,
80 attribute14,
81 attribute15,
82 last_update_login
83 ) VALUES (
84 X_organization_Id,
85 X_Enable_Cum_Flag,
86 X_Rtv_Update_Cum_Flag,
87 X_Last_Update_Date,
88 X_Last_Updated_By,
89 X_Creation_Date,
90 X_Created_By,
91 X_Plan_Bucket_Pattern_Id,
92 X_Ship_Bucket_Pattern_Id,
93 X_Plan_Schedule_Type,
94 X_Ship_Schedule_Type,
95 X_Mrp_Compile_Designator,
96 X_Mps_Schedule_Designator,
97 X_Drp_Compile_Designator,
98 X_Attribute_Category,
99 X_Attribute1,
100 X_Attribute2,
101 X_Attribute3,
102 X_Attribute4,
103 X_Attribute5,
104 X_Attribute6,
105 X_Attribute7,
106 X_Attribute8,
107 X_Attribute9,
108 X_Attribute10,
109 X_Attribute11,
110 X_Attribute12,
111 X_Attribute13,
112 X_Attribute14,
113 X_Attribute15,
114 X_Last_Update_Login
115 );
116
117 OPEN C;
118 FETCH C INTO X_Rowid;
119 if (C%NOTFOUND) then
120 CLOSE C;
121 Raise NO_DATA_FOUND;
122 end if;
123 CLOSE C;
124 END Insert_Row;
125
126 END CHV_ORG_OPTIONS_PKG_S1;