DBA Data[Home] [Help]

APPS.HZ_INDUSTRIAL_REFERENCE_PKG dependencies on HZ_INDUSTRIAL_REFERENCE

Line 1: PACKAGE BODY HZ_INDUSTRIAL_REFERENCE_PKG as

1: PACKAGE BODY HZ_INDUSTRIAL_REFERENCE_PKG as
2: /* $Header: ARHORITB.pls 120.3 2005/10/30 04:21:08 appldev ship $ */
3:
4:
5: PROCEDURE Insert_Row(

Line 25: CURSOR C IS SELECT rowid FROM HZ_INDUSTRIAL_REFERENCE

21: x_WH_UPDATE_DATE DATE,
22: x_PARTY_ID NUMBER,
23: x_STATUS VARCHAR2
24: ) IS
25: CURSOR C IS SELECT rowid FROM HZ_INDUSTRIAL_REFERENCE
26: WHERE INDUSTRY_REFERENCE_ID = x_INDUSTRY_REFERENCE_ID;
27: BEGIN
28: INSERT INTO HZ_INDUSTRIAL_REFERENCE(
29: INDUSTRY_REFERENCE_ID,

Line 28: INSERT INTO HZ_INDUSTRIAL_REFERENCE(

24: ) IS
25: CURSOR C IS SELECT rowid FROM HZ_INDUSTRIAL_REFERENCE
26: WHERE INDUSTRY_REFERENCE_ID = x_INDUSTRY_REFERENCE_ID;
27: BEGIN
28: INSERT INTO HZ_INDUSTRIAL_REFERENCE(
29: INDUSTRY_REFERENCE_ID,
30: INDUSTRY_REFERENCE,
31: ISSUED_BY_AUTHORITY,
32: NAME_OF_REFERENCE,

Line 77: DELETE FROM HZ_INDUSTRIAL_REFERENCE

73:
74: PROCEDURE Delete_Row( x_INDUSTRY_REFERENCE_ID NUMBER
75: ) IS
76: BEGIN
77: DELETE FROM HZ_INDUSTRIAL_REFERENCE
78: WHERE INDUSTRY_REFERENCE_ID = x_INDUSTRY_REFERENCE_ID;
79: If (SQL%NOTFOUND) then
80: RAISE NO_DATA_FOUND;
81: End If;

Line 107: Update HZ_INDUSTRIAL_REFERENCE

103: x_PARTY_ID NUMBER,
104: x_STATUS VARCHAR2
105: ) IS
106: BEGIN
107: Update HZ_INDUSTRIAL_REFERENCE
108: SET
109: INDUSTRY_REFERENCE_ID = decode( x_INDUSTRY_REFERENCE_ID, FND_API.G_MISS_NUM,INDUSTRY_REFERENCE_ID,x_INDUSTRY_REFERENCE_ID),
110: INDUSTRY_REFERENCE = decode( x_INDUSTRY_REFERENCE, FND_API.G_MISS_CHAR,INDUSTRY_REFERENCE,x_INDUSTRY_REFERENCE),
111: ISSUED_BY_AUTHORITY = decode( x_ISSUED_BY_AUTHORITY, FND_API.G_MISS_CHAR,ISSUED_BY_AUTHORITY,x_ISSUED_BY_AUTHORITY),

Line 160: FROM HZ_INDUSTRIAL_REFERENCE

156: x_STATUS VARCHAR2
157: ) IS
158: CURSOR C IS
159: SELECT *
160: FROM HZ_INDUSTRIAL_REFERENCE
161: WHERE rowid = x_Rowid
162: FOR UPDATE of INDUSTRY_REFERENCE_ID NOWAIT;
163: Recinfo C%ROWTYPE;
164: BEGIN

Line 234: END HZ_INDUSTRIAL_REFERENCE_PKG;

230: APP_EXCEPTION.RAISE_EXCEPTION;
231: End If;
232: END Lock_Row;
233:
234: END HZ_INDUSTRIAL_REFERENCE_PKG;