DBA Data[Home] [Help]

APPS.JL_BR_AP_INT_COLLECT_EXT_PKG dependencies on JL_BR_AP_INT_COLLECT_EXT

Line 1: PACKAGE BODY JL_BR_AP_INT_COLLECT_EXT_PKG as

1: PACKAGE BODY JL_BR_AP_INT_COLLECT_EXT_PKG as
2: /* $Header: jlbrpccb.pls 120.3 2004/01/09 10:42:34 rbasker ship $ */
3:
4: PROCEDURE Insert_Row (X_Rowid IN OUT NOCOPY VARCHAR2,
5: X_FILE_CONTROL VARCHAR2,

Line 78: CURSOR C IS SELECT rowid FROM JL_BR_AP_INT_COLLECT_EXT

74: X_ATTRIBUTE14 VARCHAR2 DEFAULT NULL,
75: X_ATTRIBUTE15 VARCHAR2 DEFAULT NULL,
76: X_calling_sequence VARCHAR2,
77: X_ORG_ID VARCHAR2 DEFAULT NULL) IS
78: CURSOR C IS SELECT rowid FROM JL_BR_AP_INT_COLLECT_EXT
79: WHERE file_control = X_file_control
80: AND entry_sequential_number = X_entry_sequential_number;
81: current_calling_sequence VARCHAR2(2000);
82: debug_info VARCHAR2(100);

Line 87: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.INSERT_ROW<-' ||

83:
84: BEGIN
85: -- Update the calling sequence
86: --
87: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.INSERT_ROW<-' ||
88: X_calling_sequence;
89:
90: debug_info := 'Insert into JL_BR_AP_INT_COLLECT_EXT';
91: INSERT INTO JL_BR_AP_INT_COLLECT_EXT(

Line 90: debug_info := 'Insert into JL_BR_AP_INT_COLLECT_EXT';

86: --
87: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.INSERT_ROW<-' ||
88: X_calling_sequence;
89:
90: debug_info := 'Insert into JL_BR_AP_INT_COLLECT_EXT';
91: INSERT INTO JL_BR_AP_INT_COLLECT_EXT(
92: FILE_CONTROL,
93: ENTRY_SEQUENTIAL_NUMBER,
94: REGISTRY_CODE,

Line 91: INSERT INTO JL_BR_AP_INT_COLLECT_EXT(

87: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.INSERT_ROW<-' ||
88: X_calling_sequence;
89:
90: debug_info := 'Insert into JL_BR_AP_INT_COLLECT_EXT';
91: INSERT INTO JL_BR_AP_INT_COLLECT_EXT(
92: FILE_CONTROL,
93: ENTRY_SEQUENTIAL_NUMBER,
94: REGISTRY_CODE,
95: RETURN_CODE,

Line 343: FROM JL_BR_AP_INT_COLLECT_EXT

339: X_ATTRIBUTE15 VARCHAR2 DEFAULT NULL,
340: X_calling_sequence VARCHAR2) IS
341: CURSOR C IS
342: SELECT *
343: FROM JL_BR_AP_INT_COLLECT_EXT
344: WHERE rowid = X_Rowid
345: FOR UPDATE OF file_control NOWAIT;
346:
347: Recinfo C%ROWTYPE;

Line 355: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.LOCK_ROW<-' ||

351:
352: BEGIN
353: -- Update the calling sequence
354: --
355: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.LOCK_ROW<-' ||
356: X_calling_sequence;
357: debug_info := 'Open cursor C';
358: OPEN C;
359: debug_info := 'Fetch cursor C';

Line 655: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.UPDATE_ROW<-' ||

651: debug_info VARCHAR2(100);
652: BEGIN
653: -- Update the calling sequence
654: --
655: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.UPDATE_ROW<-' ||
656: X_calling_sequence;
657: debug_info := 'Update JL_BR_AP_INT_COLLECT_EXT';
658: UPDATE JL_BR_AP_INT_COLLECT_EXT
659: SET

Line 657: debug_info := 'Update JL_BR_AP_INT_COLLECT_EXT';

653: -- Update the calling sequence
654: --
655: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.UPDATE_ROW<-' ||
656: X_calling_sequence;
657: debug_info := 'Update JL_BR_AP_INT_COLLECT_EXT';
658: UPDATE JL_BR_AP_INT_COLLECT_EXT
659: SET
660: FILE_CONTROL = X_FILE_CONTROL,
661: ENTRY_SEQUENTIAL_NUMBER = X_ENTRY_SEQUENTIAL_NUMBER,

Line 658: UPDATE JL_BR_AP_INT_COLLECT_EXT

654: --
655: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.UPDATE_ROW<-' ||
656: X_calling_sequence;
657: debug_info := 'Update JL_BR_AP_INT_COLLECT_EXT';
658: UPDATE JL_BR_AP_INT_COLLECT_EXT
659: SET
660: FILE_CONTROL = X_FILE_CONTROL,
661: ENTRY_SEQUENTIAL_NUMBER = X_ENTRY_SEQUENTIAL_NUMBER,
662: REGISTRY_CODE = X_REGISTRY_CODE,

Line 760: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.DELETE_ROW<-' ||

756: debug_info VARCHAR2(100);
757: BEGIN
758: -- Update the calling sequence
759: --
760: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.DELETE_ROW<-' ||
761: X_calling_sequence;
762: debug_info := 'Delete from JL_BR_AP_INT_COLLECT_EXT';
763: DELETE FROM JL_BR_AP_INT_COLLECT_EXT
764: WHERE rowid = X_Rowid;

Line 762: debug_info := 'Delete from JL_BR_AP_INT_COLLECT_EXT';

758: -- Update the calling sequence
759: --
760: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.DELETE_ROW<-' ||
761: X_calling_sequence;
762: debug_info := 'Delete from JL_BR_AP_INT_COLLECT_EXT';
763: DELETE FROM JL_BR_AP_INT_COLLECT_EXT
764: WHERE rowid = X_Rowid;
765:
766: IF (SQL%NOTFOUND) THEN

Line 763: DELETE FROM JL_BR_AP_INT_COLLECT_EXT

759: --
760: current_calling_sequence := 'JL_BR_AP_INT_COLLECT_EXT_PKG.DELETE_ROW<-' ||
761: X_calling_sequence;
762: debug_info := 'Delete from JL_BR_AP_INT_COLLECT_EXT';
763: DELETE FROM JL_BR_AP_INT_COLLECT_EXT
764: WHERE rowid = X_Rowid;
765:
766: IF (SQL%NOTFOUND) THEN
767: Raise NO_DATA_FOUND;

Line 783: END JL_BR_AP_INT_COLLECT_EXT_PKG;

779: APP_EXCEPTION.RAISE_EXCEPTION;
780:
781: END Delete_Row;
782:
783: END JL_BR_AP_INT_COLLECT_EXT_PKG;