The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row (
X_ROWID IN OUT NOCOPY VARCHAR2,
X_PAYMENT_ITEM_ID IN OUT NOCOPY NUMBER,
X_DUE_DATE IN DATE,
X_SET_OF_BOOKS_ID IN NUMBER,
X_CURRENCY_CODE IN VARCHAR2,
X_EXPORT_CURRENCY_CODE IN VARCHAR2,
X_RATE IN NUMBER,
X_PMT_ITEM_TYPE_LOOKUP_CODE IN VARCHAR2,
X_PAYMENT_SCHEDULE_ID IN NUMBER,
X_PAYMENT_TERM_ID IN OUT NOCOPY NUMBER,
X_VENDOR_ID IN NUMBER,
X_CUSTOMER_ID IN NUMBER,
X_VENDOR_SITE_ID IN NUMBER,
X_CUSTOMER_SITE_USE_ID IN NUMBER,
X_ACTUAL_AMOUNT IN NUMBER,
X_ACCOUNTED_AMOUNT IN NUMBER,
X_ACCOUNTED_DATE IN DATE,
X_EXPORT_CURRENCY_AMOUNT IN NUMBER,
X_ESTIMATED_AMOUNT IN NUMBER,
X_CREATION_DATE IN DATE,
X_CREATED_BY IN NUMBER,
X_LAST_UPDATE_DATE IN DATE,
X_LAST_UPDATED_BY IN NUMBER,
X_LAST_UPDATE_LOGIN IN NUMBER,
X_ENTERED_BY_LEASE IN VARCHAR2,
X_EXPORT_TO_AP_FLAG IN VARCHAR2,
X_EXPORT_TO_AR_FLAG IN VARCHAR2,
X_CUST_SHIP_SITE_ID IN NUMBER,
x_org_id IN NUMBER,
x_comments IN VARCHAR2,
x_AP_INVOICE_NUM IN VARCHAR2,
x_GROUPING_RULE_ID IN NUMBER,
x_adj_start_date IN DATE,
x_ADJ_END_DATE IN DATE,
x_LAST_ADJUSTMENT_TYPE_CODE IN VARCHAR2,
x_ATTRIBUTE_CATEGORY IN VARCHAR2,
x_ATTRIBUTE1 IN VARCHAR2,
x_ATTRIBUTE2 IN VARCHAR2,
x_ATTRIBUTE3 IN VARCHAR2,
x_ATTRIBUTE4 IN VARCHAR2,
x_ATTRIBUTE5 IN VARCHAR2,
x_ATTRIBUTE6 IN VARCHAR2,
x_ATTRIBUTE7 IN VARCHAR2,
x_ATTRIBUTE8 IN VARCHAR2,
x_ATTRIBUTE9 IN VARCHAR2,
x_ATTRIBUTE10 IN VARCHAR2,
x_ATTRIBUTE11 IN VARCHAR2,
x_ATTRIBUTE12 IN VARCHAR2,
x_ATTRIBUTE13 IN VARCHAR2,
x_ATTRIBUTE14 IN VARCHAR2,
x_ATTRIBUTE15 IN VARCHAR2
)
IS
CURSOR c IS
SELECT ROWID
FROM PN_PAYMENT_ITEMS_ALL
WHERE PAYMENT_ITEM_ID = X_PAYMENT_ITEM_ID;
SELECT org_id FROM pn_payment_terms_all WHERE payment_term_ID = X_PAYMENT_TERM_ID ;
PNP_DEBUG_PKG.debug ('PN_PAYMENT_ITEMS_PKG.insert_row (+)');
SELECT pn_payment_items_s.NEXTVAL
INTO x_payment_item_id
FROM DUAL;
INSERT INTO pn_payment_items_all (
PAYMENT_ITEM_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
DUE_DATE,
SET_OF_BOOKS_ID,
CURRENCY_CODE,
EXPORT_CURRENCY_CODE,
RATE,
PAYMENT_ITEM_TYPE_LOOKUP_CODE,
PAYMENT_SCHEDULE_ID,
PAYMENT_TERM_ID,
VENDOR_ID,
CUSTOMER_ID,
VENDOR_SITE_ID,
CUSTOMER_SITE_USE_ID,
ACTUAL_AMOUNT,
ACCOUNTED_AMOUNT,
ACCOUNTED_DATE,
EXPORT_CURRENCY_AMOUNT,
ESTIMATED_AMOUNT,
ENTERED_BY_LEASE,
EXPORT_TO_AP_FLAG ,
EXPORT_TO_AR_FLAG,
CUST_SHIP_SITE_ID,
org_id,
COMMENTS,
AP_INVOICE_NUM,
GROUPING_RULE_ID,
ADJ_START_DATE,
ADJ_END_DATE,
LAST_ADJUSTMENT_TYPE_CODE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15
)
VALUES (
X_PAYMENT_ITEM_ID,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_LOGIN,
X_DUE_DATE,
X_SET_OF_BOOKS_ID,
X_CURRENCY_CODE,
X_EXPORT_CURRENCY_CODE,
X_RATE,
X_PMT_ITEM_TYPE_LOOKUP_CODE,
X_PAYMENT_SCHEDULE_ID,
X_PAYMENT_TERM_ID,
X_VENDOR_ID,
X_CUSTOMER_ID,
X_VENDOR_SITE_ID,
X_CUSTOMER_SITE_USE_ID,
ROUND(X_ACTUAL_AMOUNT,l_precision),
ROUND(X_ACCOUNTED_AMOUNT,l_precision),
trunc(X_ACCOUNTED_DATE),
ROUND(X_EXPORT_CURRENCY_AMOUNT,l_precision),
ROUND(X_ESTIMATED_AMOUNT,l_precision),
X_ENTERED_BY_LEASE,
X_EXPORT_TO_AP_FLAG,
X_EXPORT_TO_AR_FLAG,
X_CUST_SHIP_SITE_ID,
l_org_id,
X_COMMENTS,
X_AP_INVOICE_NUM,
X_GROUPING_RULE_ID,
X_ADJ_START_DATE,
X_ADJ_END_DATE,
X_LAST_ADJUSTMENT_TYPE_CODE,
X_ATTRIBUTE_CATEGORY,
X_ATTRIBUTE1,
X_ATTRIBUTE2,
X_ATTRIBUTE3,
X_ATTRIBUTE4,
X_ATTRIBUTE5,
X_ATTRIBUTE6,
X_ATTRIBUTE7,
X_ATTRIBUTE8,
X_ATTRIBUTE9,
X_ATTRIBUTE10,
X_ATTRIBUTE11,
X_ATTRIBUTE12,
X_ATTRIBUTE13,
X_ATTRIBUTE14,
X_ATTRIBUTE15
);
PNP_DEBUG_PKG.debug ('PN_PAYMENT_ITEMS_PKG.insert_row (-)');
END Insert_Row;
SELECT *
FROM pn_payment_items_all
WHERE payment_item_id = x_payment_item_id
FOR UPDATE OF payment_item_id NOWAIT;
PROCEDURE Update_Row (
X_PAYMENT_ITEM_ID IN NUMBER,
X_DUE_DATE IN DATE,
X_VENDOR_ID IN NUMBER,
X_CUSTOMER_ID IN NUMBER,
X_VENDOR_SITE_ID IN NUMBER,
X_CUSTOMER_SITE_USE_ID IN NUMBER,
X_ESTIMATED_AMOUNT IN NUMBER,
X_ACTUAL_AMOUNT IN NUMBER,
X_ACCOUNTED_AMOUNT IN NUMBER,
X_ACCOUNTED_DATE IN DATE,
X_EXPORT_CURRENCY_AMOUNT IN NUMBER,
X_LAST_UPDATE_DATE IN DATE,
X_LAST_UPDATED_BY IN NUMBER,
X_LAST_UPDATE_LOGIN IN NUMBER,
X_PAYMENT_SCHEDULE_ID IN NUMBER,
X_ENTERED_BY_LEASE IN VARCHAR2,
X_EXPORT_TO_AP_FLAG IN VARCHAR2,
X_EXPORT_TO_AR_FLAG IN VARCHAR2,
X_CUST_SHIP_SITE_ID IN NUMBER,
X_RATE IN NUMBER,
x_comments IN VARCHAR2,
x_AP_INVOICE_NUM IN VARCHAR2,
x_GROUPING_RULE_ID IN NUMBER,
x_ADJ_START_DATE IN DATE,
x_ADJ_END_DATE IN DATE,
x_LAST_ADJUSTMENT_TYPE_CODE IN VARCHAR2,
x_ATTRIBUTE_CATEGORY IN VARCHAR2,
x_ATTRIBUTE1 IN VARCHAR2,
x_ATTRIBUTE2 IN VARCHAR2,
x_ATTRIBUTE3 IN VARCHAR2,
x_ATTRIBUTE4 IN VARCHAR2,
x_ATTRIBUTE5 IN VARCHAR2,
x_ATTRIBUTE6 IN VARCHAR2,
x_ATTRIBUTE7 IN VARCHAR2,
x_ATTRIBUTE8 IN VARCHAR2,
x_ATTRIBUTE9 IN VARCHAR2,
x_ATTRIBUTE10 IN VARCHAR2,
x_ATTRIBUTE11 IN VARCHAR2,
x_ATTRIBUTE12 IN VARCHAR2,
x_ATTRIBUTE13 IN VARCHAR2,
x_ATTRIBUTE14 IN VARCHAR2,
x_ATTRIBUTE15 IN VARCHAR2
)
IS
l_precision NUMBER;
SELECT currency_code FROM pn_payment_items_all WHERE payment_item_id = X_PAYMENT_ITEM_ID;
PNP_DEBUG_PKG.debug ('PN_PAYMENT_ITEMS_PKG.update_row (+)');
UPDATE pn_payment_items_all
SET VENDOR_ID = X_VENDOR_ID,
DUE_DATE = X_DUE_DATE,
CUSTOMER_ID = X_CUSTOMER_ID,
VENDOR_SITE_ID = X_VENDOR_SITE_ID,
CUSTOMER_SITE_USE_ID = X_CUSTOMER_SITE_USE_ID,
ESTIMATED_AMOUNT = ROUND(X_ESTIMATED_AMOUNT,l_precision),
ACTUAL_AMOUNT = ROUND(X_ACTUAL_AMOUNT,l_precision),
ACCOUNTED_AMOUNT = ROUND(X_ACCOUNTED_AMOUNT,l_precision),
ACCOUNTED_DATE = trunc(X_ACCOUNTED_DATE),
EXPORT_CURRENCY_AMOUNT = ROUND(X_EXPORT_CURRENCY_AMOUNT,l_precision),
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
PAYMENT_SCHEDULE_ID = X_PAYMENT_SCHEDULE_ID,
ENTERED_BY_LEASE = X_ENTERED_BY_LEASE,
EXPORT_TO_AP_FLAG = X_EXPORT_TO_AP_FLAG,
EXPORT_TO_AR_FLAG = X_EXPORT_TO_AR_FLAG,
CUST_SHIP_SITE_ID = X_CUST_SHIP_SITE_ID,
RATE = X_RATE,
COMMENTS = X_COMMENTS,
AP_INVOICE_NUM = x_AP_INVOICE_NUM,
GROUPING_RULE_ID = x_GROUPING_RULE_ID,
ADJ_START_DATE = x_ADJ_START_DATE,
ADJ_END_DATE = x_ADJ_END_DATE,
LAST_ADJUSTMENT_TYPE_CODE = x_LAST_ADJUSTMENT_TYPE_CODE,
ATTRIBUTE_CATEGORY = x_ATTRIBUTE_CATEGORY,
ATTRIBUTE1 = x_ATTRIBUTE1,
ATTRIBUTE2 = x_ATTRIBUTE2,
ATTRIBUTE3 = x_ATTRIBUTE3,
ATTRIBUTE4 = x_ATTRIBUTE4,
ATTRIBUTE5 = x_ATTRIBUTE5,
ATTRIBUTE6 = x_ATTRIBUTE6,
ATTRIBUTE7 = x_ATTRIBUTE7,
ATTRIBUTE8 = x_ATTRIBUTE8,
ATTRIBUTE9 = x_ATTRIBUTE9,
ATTRIBUTE10 = x_ATTRIBUTE10,
ATTRIBUTE11 = x_ATTRIBUTE11,
ATTRIBUTE12 = x_ATTRIBUTE12,
ATTRIBUTE13 = x_ATTRIBUTE13,
ATTRIBUTE14 = x_ATTRIBUTE14,
ATTRIBUTE15 = x_ATTRIBUTE15
WHERE PAYMENT_ITEM_ID = X_PAYMENT_ITEM_ID;
PNP_DEBUG_PKG.debug ('PN_PAYMENT_ITEMS_PKG.update_row (-)');
END Update_Row;
PROCEDURE Delete_Row (
X_PAYMENT_ITEM_ID IN NUMBER
)
IS
BEGIN
DELETE FROM pn_payment_items_all
WHERE payment_item_id = x_payment_item_id;
END Delete_Row;