[Home] [Help]
PACKAGE BODY: APPS.CSD_TO_FORM_REPAIR_JOB_XREF
Source
1 PACKAGE BODY CSD_TO_FORM_REPAIR_JOB_XREF AS
2 /* $Header: csdgdrjb.pls 115.13 2003/09/15 21:35:07 sragunat ship $*/
3 -- Start of Comments
4 -- Package name : CSD_TO_FORM_REPAIR_JOB_XREF
5 -- Purpose : Takes all parameters from the FORM and construct those parameters into a record for calling
6 -- the prviate API in the CSD_REPAIR_HISTORY_PVT package.
7 -- History : 11/17/1999, Created by Raghavan
8 -- History : 12/26/2001, TRAVI added columns INVENTORY_ITEM_ID and ITEM_REVISION
9 -- History : 01/17/2002, TRAVI added column OBJECT_VERSION_NUMBER
10 -- History : 08/20/2003, Shiv Ragunathan, 11.5.10 Changes: Added
11 -- History : parameters p_source_type_code, p_source_id1,
12 -- History : p_ro_service_code_id, p_job_name to
13 -- History : Validate_And_Write.
14 -- NOTE :
15 -- End of Comments
16 g_debug NUMBER := csd_gen_utility_pvt.g_debug_level;
17 -- travi changes
18 PROCEDURE Validate_And_Write (
19 P_Api_Version_Number IN NUMBER,
20 P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
21 P_Commit IN VARCHAR2 := FND_API.G_FALSE,
22 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
23 p_action_code IN NUMBER, /* 0 = insert, 1 = update, 2 = delete */
24 px_REPAIR_JOB_XREF_ID IN OUT NOCOPY NUMBER,
25 p_CREATED_BY NUMBER,
26 p_CREATION_DATE DATE,
27 p_LAST_UPDATED_BY NUMBER,
28 p_LAST_UPDATE_DATE DATE,
29 p_LAST_UPDATE_LOGIN NUMBER,
30 p_REPAIR_LINE_ID NUMBER,
31 p_WIP_ENTITY_ID NUMBER,
32 p_GROUP_ID NUMBER,
33 p_ORGANIZATION_ID NUMBER,
34 p_QUANTITY NUMBER,
35 p_INVENTORY_ITEM_ID NUMBER,
36 p_ITEM_REVISION VARCHAR2,
37 p_SOURCE_TYPE_CODE VARCHAR2,
38 p_SOURCE_ID1 NUMBER,
39 p_RO_SERVICE_CODE_ID NUMBER,
40 p_JOB_NAME VARCHAR2,
41 p_OBJECT_VERSION_NUMBER NUMBER,
42 p_ATTRIBUTE_CATEGORY VARCHAR2,
43 p_ATTRIBUTE1 VARCHAR2,
44 p_ATTRIBUTE2 VARCHAR2,
45 p_ATTRIBUTE3 VARCHAR2,
46 p_ATTRIBUTE4 VARCHAR2,
47 p_ATTRIBUTE5 VARCHAR2,
48 p_ATTRIBUTE6 VARCHAR2,
49 p_ATTRIBUTE7 VARCHAR2,
50 p_ATTRIBUTE8 VARCHAR2,
51 p_ATTRIBUTE9 VARCHAR2,
52 p_ATTRIBUTE10 VARCHAR2,
53 p_ATTRIBUTE11 VARCHAR2,
54 p_ATTRIBUTE12 VARCHAR2,
55 p_ATTRIBUTE13 VARCHAR2,
56 p_ATTRIBUTE14 VARCHAR2,
57 p_ATTRIBUTE15 VARCHAR2,
58 p_quantity_completed NUMBER,
59 X_Return_Status OUT NOCOPY VARCHAR2,
60 X_Msg_Count OUT NOCOPY NUMBER,
61 X_Msg_Data OUT NOCOPY VARCHAR2
62 )
63 IS
64 l_repair_job_xref_rec CSD_REPAIR_JOB_XREF_PVT.REPJOBXREF_Rec_Type;
65
66 l_Return_Status varchar2(100);
67 l_Msg_Count number;
68 l_Msg_Data varchar2(100);
69 p_temp_job_xref_id number;
70
71 BEGIN
72 -- initiate X_Msg_Count
73 X_Msg_Count := 0;
74 -- travi changes
75 l_repair_job_xref_rec.REPAIR_JOB_XREF_ID := px_REPAIR_JOB_XREF_ID ;
76 l_repair_job_xref_rec.CREATED_BY := p_CREATED_BY ;
77 l_repair_job_xref_rec.CREATION_DATE := p_CREATION_DATE;
78 l_repair_job_xref_rec.LAST_UPDATED_BY := p_LAST_UPDATED_BY ;
79 l_repair_job_xref_rec.LAST_UPDATE_DATE:= p_LAST_UPDATE_DATE ;
80 l_repair_job_xref_rec.LAST_UPDATE_LOGIN:= p_LAST_UPDATE_LOGIN ;
81 l_repair_job_xref_rec.REPAIR_LINE_ID := p_REPAIR_LINE_ID ;
82 l_repair_job_xref_rec.WIP_ENTITY_ID := p_WIP_ENTITY_ID ;
83 l_repair_job_xref_rec.GROUP_ID := p_GROUP_ID ;
84 l_repair_job_xref_rec.ORGANIZATION_ID := p_ORGANIZATION_ID ;
85 l_repair_job_xref_rec.QUANTITY := p_QUANTITY ;
86 l_repair_job_xref_rec.INVENTORY_ITEM_ID := p_INVENTORY_ITEM_ID ;
87 l_repair_job_xref_rec.ITEM_REVISION := p_ITEM_REVISION;
88 l_repair_job_xref_rec.SOURCE_TYPE_CODE := p_SOURCE_TYPE_CODE ;
89 l_repair_job_xref_rec.SOURCE_ID1 := p_SOURCE_ID1;
90 l_repair_job_xref_rec.RO_SERVICE_CODE_ID := p_RO_SERVICE_CODE_ID;
91 l_repair_job_xref_rec.JOB_NAME := p_JOB_NAME;
92
93 -- travi l_repair_job_xref_rec.OBJECT_VERSION_NUMBER := p_OBJECT_VERSION_NUMBER ;
94
95 l_repair_job_xref_rec.ATTRIBUTE_CATEGORY := p_ATTRIBUTE_CATEGORY;
96 l_repair_job_xref_rec.ATTRIBUTE1 := p_ATTRIBUTE1 ;
97 l_repair_job_xref_rec.ATTRIBUTE2 := p_ATTRIBUTE2 ;
98 l_repair_job_xref_rec.ATTRIBUTE3 := p_ATTRIBUTE3 ;
99 l_repair_job_xref_rec.ATTRIBUTE4 := p_ATTRIBUTE4 ;
100 l_repair_job_xref_rec.ATTRIBUTE5 := p_ATTRIBUTE5 ;
101 l_repair_job_xref_rec.ATTRIBUTE6:= p_ATTRIBUTE6 ;
102 l_repair_job_xref_rec.ATTRIBUTE7 := p_ATTRIBUTE7 ;
103 l_repair_job_xref_rec.ATTRIBUTE8 := p_ATTRIBUTE8 ;
104 l_repair_job_xref_rec.ATTRIBUTE9 := p_ATTRIBUTE9 ;
105 l_repair_job_xref_rec.ATTRIBUTE10:= p_ATTRIBUTE10 ;
106 l_repair_job_xref_rec.ATTRIBUTE11 := p_ATTRIBUTE11 ;
107 l_repair_job_xref_rec.ATTRIBUTE12 := p_ATTRIBUTE12 ;
108 l_repair_job_xref_rec.ATTRIBUTE13 := p_ATTRIBUTE13 ;
109 l_repair_job_xref_rec.ATTRIBUTE14 := p_ATTRIBUTE14 ;
110 l_repair_job_xref_rec.ATTRIBUTE15 := p_ATTRIBUTE15 ;
111 l_repair_job_xref_rec.quantity_completed := p_quantity_completed;
112
113 -- check p_action_code
114 if p_action_code not in (0, 1, 2) then
115 X_Return_Status := FND_API.G_RET_STS_ERROR;
116 X_Msg_Count := X_Msg_Count + 1;
117 X_Msg_Data := 'Invalid action codes should indicate an Insert, Delete or Update action.';
118 GOTO end_job;
119 end if;
120
121
122
123 if p_action_code = 0 then
124 -- call the private insert (create) procedure
125
126 -- travi
127 l_repair_job_xref_rec.OBJECT_VERSION_NUMBER := 1;
128 IF (g_debug > 0 ) THEN
129 csd_gen_utility_pvt.add('CSD_TO_FORM_REPAIR_JOB_XREF.Validate_And_Write create OVN '||to_char(l_repair_job_xref_rec.OBJECT_VERSION_NUMBER));
130 END IF;
131
132
133 CSD_REPAIR_JOB_XREF_PVT.Create_repjobxref(
134 P_Api_Version_Number => p_api_version_number,
135 P_Init_Msg_List => p_init_msg_list,
136 P_Commit => p_commit,
137 p_validation_level => p_validation_level,
138 P_repjobxref_rec => l_repair_job_xref_rec,
139 X_REPAIR_JOB_XREF_ID => p_temp_job_xref_id,
140 X_Return_Status => l_return_status,
141 X_Msg_Count => l_msg_count,
142 X_Msg_Data => l_msg_data
143 );
144
145 elsif p_action_code = 1 then
146 -- call the private update procedure
147
148 -- travi
149 l_repair_job_xref_rec.OBJECT_VERSION_NUMBER := p_OBJECT_VERSION_NUMBER;
150 IF (g_debug > 0 ) THEN
151 csd_gen_utility_pvt.add('CSD_TO_FORM_REPAIR_JOB_XREF.Validate_And_Write Update OVN '||to_char(l_repair_job_xref_rec.OBJECT_VERSION_NUMBER));
152 END IF;
153
154
155 CSD_REPAIR_JOB_XREF_PVT.update_repjobxref(
156 P_Api_Version_Number => p_api_version_number,
157 P_Init_Msg_List => p_init_msg_list,
158 P_Commit => p_commit,
159 p_validation_level => p_validation_level,
160 P_repjobxref_rec => l_repair_job_xref_rec,
161 X_Return_Status => l_return_status,
162 X_Msg_Count => l_msg_count,
163 X_Msg_Data => l_msg_data
164 );
165
166 else
167 -- call the private delete procedure
168
169 -- travi
170 l_repair_job_xref_rec.OBJECT_VERSION_NUMBER := p_OBJECT_VERSION_NUMBER;
171 IF (g_debug > 0 ) THEN
172 csd_gen_utility_pvt.add('CSD_TO_FORM_REPAIR_JOB_XREF.Validate_And_Write Delete OVN '||to_char(l_repair_job_xref_rec.OBJECT_VERSION_NUMBER));
173 END IF;
174
175
176 CSD_REPAIR_JOB_XREF_PVT.delete_repjobxref(
177 P_Api_Version_Number => p_api_version_number,
178 P_Init_Msg_List => p_init_msg_list,
179 P_Commit => p_commit,
180 p_validation_level => p_validation_level,
181 P_repjobxref_rec => l_repair_job_xref_rec,
182 X_Return_Status => l_return_status,
183 X_Msg_Count => l_msg_count,
184 X_Msg_Data => l_msg_data
185 );
186 end if;
187
188 px_repair_job_xref_id := p_temp_job_xref_id;
189
190 <<end_job>>
191 null;
192
193 END Validate_And_Write;
194
195 END CSD_TO_FORM_REPAIR_JOB_XREF;