APPS.PA_AGREEMENT_TYPES_PKG dependencies on PA_AGREEMENT_TYPES

Line 1: PACKAGE BODY PA_AGREEMENT_TYPES_PKG as

1: PACKAGE BODY PA_AGREEMENT_TYPES_PKG as
2: /* $Header: PAXTATSB.pls 120.2 2005/08/05 03:17:37 rgandhi noship $ */
3:
4:
5: PROCEDURE Insert_Row(X_Agreement_Type VARCHAR2,

Line 38: INSERT INTO Pa_agreement_types

34: X_msg_data OUT NOCOPY VARCHAR2/*File.sql.39*/
35: )
36: IS
37: BEGIN
38: INSERT INTO Pa_agreement_types
39: ( Agreement_type
40: , last_update_date
41: , last_updated_by
42: , creation_date

Line 106: ( p_pkg_name => 'PA_AGREEMENT_TYPES_PKG' ,

102: X_msg_count := 1;
103: X_msg_data := SQLERRM;
104:
105: FND_MSG_PUB.add_exc_msg
106: ( p_pkg_name => 'PA_AGREEMENT_TYPES_PKG' ,
107: p_procedure_name => 'Insert_Row');
108: END;
109:
110: PROCEDURE Lock_Row(X_Agreement_Type VARCHAR2,

Line 145: FROM Pa_Agreement_Types

141: IS
142:
143: CURSOR C IS
144: SELECT *
145: FROM Pa_Agreement_Types
146: WHERE Agreement_Type = X_Agreement_Type
147: FOR UPDATE of Agreement_Type NOWAIT;
148:
149: Recinfo C%ROWTYPE;

Line 241: ( p_pkg_name => 'PA_AGREEMENT_TYPES_PKG' ,

237: WHEN FND_API.G_EXC_ERROR THEN
238: X_return_status := FND_API.G_RET_STS_ERROR;
239: X_msg_count := FND_MSG_PUB.count_msg;
240: FND_MSG_PUB.add_exc_msg
241: ( p_pkg_name => 'PA_AGREEMENT_TYPES_PKG' ,
242: p_procedure_name => 'Lock_Row');
243:
244: WHEN OTHERS THEN
245: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 250: ( p_pkg_name => 'PA_AGREEMENT_TYPES_PKG' ,

246: X_msg_count := 1;
247: X_msg_data := SQLERRM;
248:
249: FND_MSG_PUB.add_exc_msg
250: ( p_pkg_name => 'PA_AGREEMENT_TYPES_PKG' ,
251: p_procedure_name => 'Lock_Row');
252: END;
253:
254: PROCEDURE Update_Row(X_Agreement_Type VARCHAR2,

Line 287: UPDATE Pa_Agreement_Types SET

283: X_msg_data OUT NOCOPY VARCHAR2 /*File.sql.39*/
284: )
285: IS
286: BEGIN
287: UPDATE Pa_Agreement_Types SET
288: Last_Update_Date = X_Last_Update_Date ,
289: Last_Updated_By = X_Last_Updated_By ,
290: Creation_Date = X_Creation_Date ,
291: Created_By = X_Created_By ,

Line 327: ( p_pkg_name => 'PA_AGREEMENT_TYPES_PKG' ,

323: X_msg_count := 1;
324: X_msg_data := SQLERRM;
325:
326: FND_MSG_PUB.add_exc_msg
327: ( p_pkg_name => 'PA_AGREEMENT_TYPES_PKG' ,
328: p_procedure_name => 'Update_Row');
329: END;
330:
331: END PA_AGREEMENT_TYPES_PKG;

Line 331: END PA_AGREEMENT_TYPES_PKG;

327: ( p_pkg_name => 'PA_AGREEMENT_TYPES_PKG' ,
328: p_procedure_name => 'Update_Row');
329: END;
330:
331: END PA_AGREEMENT_TYPES_PKG;