PACKAGE BODY: APPS.AHL_MR_ROUTE_SEQUENCES_PKG

Source

1 package body AHL_MR_ROUTE_SEQUENCES_PKG as
2 /* $Header: AHLLMRSB.pls 115.2 2003/10/30 02:59:05 rtadikon noship $ */
3 procedure INSERT_ROW (
4   X_MR_ROUTE_SEQUENCE_ID in out NOCOPY NUMBER,
5   X_ATTRIBUTE15 in VARCHAR2,
6   X_RELATED_MR_ROUTE_ID in NUMBER,
7   X_SEQUENCE_CODE in VARCHAR2,
8   X_MR_ROUTE_ID in NUMBER,
9   X_ATTRIBUTE11 in VARCHAR2,
10   X_ATTRIBUTE12 in VARCHAR2,
11   X_ATTRIBUTE13 in VARCHAR2,
12   X_ATTRIBUTE14 in VARCHAR2,
13   X_OBJECT_VERSION_NUMBER in NUMBER,
14   X_ATTRIBUTE5 in VARCHAR2,
15   X_ATTRIBUTE6 in VARCHAR2,
16   X_ATTRIBUTE7 in VARCHAR2,
17   X_ATTRIBUTE8 in VARCHAR2,
18   X_ATTRIBUTE9 in VARCHAR2,
19   X_ATTRIBUTE10 in VARCHAR2,
20   X_ATTRIBUTE_CATEGORY in VARCHAR2,
21   X_ATTRIBUTE1 in VARCHAR2,
22   X_ATTRIBUTE2 in VARCHAR2,
23   X_ATTRIBUTE3 in VARCHAR2,
24   X_ATTRIBUTE4 in VARCHAR2,
25   X_CREATION_DATE in DATE,
26   X_CREATED_BY in NUMBER,
27   X_LAST_UPDATE_DATE in DATE,
28   X_LAST_UPDATED_BY in NUMBER,
29   X_LAST_UPDATE_LOGIN in NUMBER
30 ) is
31 begin
32   insert into AHL_MR_ROUTE_SEQUENCES (
33     ATTRIBUTE15,
34     RELATED_MR_ROUTE_ID,
35     SEQUENCE_CODE,
36     CREATED_BY,
37     LAST_UPDATE_LOGIN,
38     MR_ROUTE_ID,
39     ATTRIBUTE11,
40     ATTRIBUTE12,
41     ATTRIBUTE13,
42     ATTRIBUTE14,
43     MR_ROUTE_SEQUENCE_ID,
44     OBJECT_VERSION_NUMBER,
45     LAST_UPDATE_DATE,
46     LAST_UPDATED_BY,
47     CREATION_DATE,
48     ATTRIBUTE5,
49     ATTRIBUTE6,
50     ATTRIBUTE7,
51     ATTRIBUTE8,
52     ATTRIBUTE9,
53     ATTRIBUTE10,
54     ATTRIBUTE_CATEGORY,
55     ATTRIBUTE1,
56     ATTRIBUTE2,
57     ATTRIBUTE3,
58     ATTRIBUTE4
59   )
60 values(
61     X_ATTRIBUTE15,
62     X_RELATED_MR_ROUTE_ID,
63     X_SEQUENCE_CODE,
64     X_CREATED_BY,
65     X_LAST_UPDATE_LOGIN,
66     X_MR_ROUTE_ID,
67     X_ATTRIBUTE11,
68     X_ATTRIBUTE12,
69     X_ATTRIBUTE13,
70     X_ATTRIBUTE14,
71     AHL_MR_ROUTE_SEQUENCES_S.NEXTVAL,
72     X_OBJECT_VERSION_NUMBER,
73     X_LAST_UPDATE_DATE,
74     X_LAST_UPDATED_BY,
75     X_CREATION_DATE,
76     X_ATTRIBUTE5,
77     X_ATTRIBUTE6,
78     X_ATTRIBUTE7,
79     X_ATTRIBUTE8,
80     X_ATTRIBUTE9,
81     X_ATTRIBUTE10,
82     X_ATTRIBUTE_CATEGORY,
83     X_ATTRIBUTE1,
84     X_ATTRIBUTE2,
85     X_ATTRIBUTE3,
86     X_ATTRIBUTE4)
87     RETURNING MR_ROUTE_SEQUENCE_ID INTO X_MR_ROUTE_SEQUENCE_ID;
88 
89 end INSERT_ROW;
90 
91 
92 procedure UPDATE_ROW (
93   X_MR_ROUTE_SEQUENCE_ID in NUMBER,
94   X_ATTRIBUTE15 in VARCHAR2,
95   X_RELATED_MR_ROUTE_ID in NUMBER,
96   X_SEQUENCE_CODE in VARCHAR2,
97   X_MR_ROUTE_ID in NUMBER,
98   X_ATTRIBUTE11 in VARCHAR2,
99   X_ATTRIBUTE12 in VARCHAR2,
100   X_ATTRIBUTE13 in VARCHAR2,
101   X_ATTRIBUTE14 in VARCHAR2,
102   X_OBJECT_VERSION_NUMBER in NUMBER,
103   X_ATTRIBUTE5 in VARCHAR2,
104   X_ATTRIBUTE6 in VARCHAR2,
105   X_ATTRIBUTE7 in VARCHAR2,
106   X_ATTRIBUTE8 in VARCHAR2,
107   X_ATTRIBUTE9 in VARCHAR2,
108   X_ATTRIBUTE10 in VARCHAR2,
109   X_ATTRIBUTE_CATEGORY in VARCHAR2,
110   X_ATTRIBUTE1 in VARCHAR2,
111   X_ATTRIBUTE2 in VARCHAR2,
112   X_ATTRIBUTE3 in VARCHAR2,
113   X_ATTRIBUTE4 in VARCHAR2,
114   X_LAST_UPDATE_DATE in DATE,
115   X_LAST_UPDATED_BY in NUMBER,
116   X_LAST_UPDATE_LOGIN in NUMBER
117 ) is
118 begin
119   update AHL_MR_ROUTE_SEQUENCES set
120     ATTRIBUTE15 = X_ATTRIBUTE15,
121     RELATED_MR_ROUTE_ID = X_RELATED_MR_ROUTE_ID,
122     SEQUENCE_CODE = X_SEQUENCE_CODE,
123     MR_ROUTE_ID = X_MR_ROUTE_ID,
124     ATTRIBUTE11 = X_ATTRIBUTE11,
125     ATTRIBUTE12 = X_ATTRIBUTE12,
126     ATTRIBUTE13 = X_ATTRIBUTE13,
127     ATTRIBUTE14 = X_ATTRIBUTE14,
128     OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
129     ATTRIBUTE5 = X_ATTRIBUTE5,
130     ATTRIBUTE6 = X_ATTRIBUTE6,
131     ATTRIBUTE7 = X_ATTRIBUTE7,
132     ATTRIBUTE8 = X_ATTRIBUTE8,
133     ATTRIBUTE9 = X_ATTRIBUTE9,
134     ATTRIBUTE10 = X_ATTRIBUTE10,
135     ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
136     ATTRIBUTE1 = X_ATTRIBUTE1,
137     ATTRIBUTE2 = X_ATTRIBUTE2,
138     ATTRIBUTE3 = X_ATTRIBUTE3,
139     ATTRIBUTE4 = X_ATTRIBUTE4,
140     MR_ROUTE_SEQUENCE_ID = X_MR_ROUTE_SEQUENCE_ID,
141     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
142     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
143     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
144   where MR_ROUTE_SEQUENCE_ID = X_MR_ROUTE_SEQUENCE_ID;
145 
146   if (sql%notfound) then
147     raise no_data_found;
148   end if;
149 end UPDATE_ROW;
150 
151 procedure DELETE_ROW (
152   X_MR_ROUTE_SEQUENCE_ID in NUMBER
153 ) is
154 begin
155   delete from AHL_MR_ROUTE_SEQUENCES
156   where MR_ROUTE_SEQUENCE_ID = X_MR_ROUTE_SEQUENCE_ID;
157 
158   if (sql%notfound) then
159     raise no_data_found;
160   end if;
161 
162 end DELETE_ROW;
163 
164 end AHL_MR_ROUTE_SEQUENCES_PKG;