DBA Data[Home] [Help]

APPS.JL_ZZ_AR_TX_LOCN_PKG dependencies on JL_ZZ_AR_TX_LOCN

Line 1: PACKAGE BODY JL_ZZ_AR_TX_LOCN_PKG as

1: PACKAGE BODY JL_ZZ_AR_TX_LOCN_PKG as
2: /* $Header: jlzztxlb.pls 120.2 2003/03/03 19:40:23 opedrega ship $ */
3:
4: PROCEDURE Insert_Row
5: (X_rowid IN OUT NOCOPY VARCHAR2,

Line 41: FROM jl_zz_ar_TX_LOCN

37: X_calling_sequence IN VARCHAR2) IS
38:
39: CURSOR C IS
40: SELECT rowid
41: FROM jl_zz_ar_TX_LOCN
42: WHERE ship_from_code = X_ship_from_code
43: AND ship_to_segment_id = X_ship_to_segment_id
44: AND tax_category_id = X_tax_category_id
45: AND end_date_active = X_end_date_active

Line 54: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.INSERT_ROW<-' ||

50:
51: BEGIN
52: -- Update the calling sequence
53: --
54: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.INSERT_ROW<-' ||
55: X_calling_sequence;
56:
57: debug_info := 'Insert into JL_ZZ_AR_TX_LOCN ';
58: INSERT INTO JL_ZZ_AR_TX_LOCN (locn_id,

Line 57: debug_info := 'Insert into JL_ZZ_AR_TX_LOCN ';

53: --
54: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.INSERT_ROW<-' ||
55: X_calling_sequence;
56:
57: debug_info := 'Insert into JL_ZZ_AR_TX_LOCN ';
58: INSERT INTO JL_ZZ_AR_TX_LOCN (locn_id,
59: ship_from_code,
60: ship_to_segment_id,
61: tax_category_id,

Line 58: INSERT INTO JL_ZZ_AR_TX_LOCN (locn_id,

54: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.INSERT_ROW<-' ||
55: X_calling_sequence;
56:
57: debug_info := 'Insert into JL_ZZ_AR_TX_LOCN ';
58: INSERT INTO JL_ZZ_AR_TX_LOCN (locn_id,
59: ship_from_code,
60: ship_to_segment_id,
61: tax_category_id,
62: end_date_active,

Line 186: FROM jl_zz_ar_tx_locn

182: X_calling_sequence IN VARCHAR2) IS
183:
184: CURSOR C IS
185: SELECT *
186: FROM jl_zz_ar_tx_locn
187: WHERE ship_from_code = X_ship_from_code
188: AND ship_to_segment_id = X_ship_to_segment_id
189: AND tax_category_id = X_tax_category_id
190: AND end_date_active = X_end_date_active

Line 206: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.LOCK_ROW<-' ||

202:
203: BEGIN
204: -- Update the calling sequence
205: --
206: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.LOCK_ROW<-' ||
207: X_calling_sequence;
208: debug_info := 'Open cursor C';
209: OPEN C;
210: debug_info := 'Fetch cursor C';

Line 360: UPDATE jl_zz_ar_tx_locn

356: X_attribute15 VARCHAR2,
357: X_calling_sequence IN VARCHAR2) IS
358:
359: BEGIN
360: UPDATE jl_zz_ar_tx_locn
361: SET ship_from_code = X_ship_from_code,
362: ship_to_segment_id = X_ship_to_segment_id,
363: tax_category_id = X_tax_category_id,
364: end_date_active = X_end_date_active,

Line 403: FROM JL_ZZ_AR_TX_LOCN

399: (X_rowid VARCHAR2) IS
400:
401: BEGIN
402: DELETE
403: FROM JL_ZZ_AR_TX_LOCN
404: WHERE rowid = X_rowid;
405:
406: IF (SQL%NOTFOUND) THEN
407: raise NO_DATA_FOUND;

Line 427: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.CHECK_UNIQUE<-' ||

423:
424: BEGIN
425: -- Update the calling sequence
426: --
427: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.CHECK_UNIQUE<-' ||
428: X_calling_sequence;
429: SELECT COUNT(1)
430: INTO l_dummy
431: FROM jl_zz_ar_TX_LOCN

Line 431: FROM jl_zz_ar_TX_LOCN

427: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.CHECK_UNIQUE<-' ||
428: X_calling_sequence;
429: SELECT COUNT(1)
430: INTO l_dummy
431: FROM jl_zz_ar_TX_LOCN
432: WHERE ship_from_code = X_ship_from_code
433: AND ship_to_segment_id = X_ship_to_segment_id
434: AND tax_category_id = X_tax_category_id
435: AND end_date_active = X_end_date_active

Line 470: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.<-CHECK_OVERLAPPED_DATES' ||

466:
467: BEGIN
468: -- Update the calling sequence
469: --
470: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.<-CHECK_OVERLAPPED_DATES' ||
471: X_calling_sequence;
472: SELECT COUNT(1)
473: INTO l_dummy
474: FROM JL_ZZ_AR_TX_LOCN A

Line 474: FROM JL_ZZ_AR_TX_LOCN A

470: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.<-CHECK_OVERLAPPED_DATES' ||
471: X_calling_sequence;
472: SELECT COUNT(1)
473: INTO l_dummy
474: FROM JL_ZZ_AR_TX_LOCN A
475: WHERE a.ship_from_code = X_ship_from_code
476: AND a.ship_to_segment_id = X_ship_to_segment_id
477: AND a.tax_category_id = X_tax_category_id
478: AND org_id = X_org_id

Line 520: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.CHECK_GAPS<-' ||

516:
517: BEGIN
518: -- Update the calling sequence
519: --
520: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.CHECK_GAPS<-' ||
521: X_calling_sequence;
522: SELECT COUNT(1)
523: INTO l_dummy
524: FROM jl_zz_ar_TX_LOCN a

Line 524: FROM jl_zz_ar_TX_LOCN a

520: current_calling_sequence := 'JL_ZZ_AR_TX_LOCN_PKG.CHECK_GAPS<-' ||
521: X_calling_sequence;
522: SELECT COUNT(1)
523: INTO l_dummy
524: FROM jl_zz_ar_TX_LOCN a
525: WHERE a.ship_from_code = X_ship_from_code
526: AND a.ship_to_segment_id = X_ship_to_segment_id
527: AND a.tax_category_id = X_tax_category_id
528: AND trunc(a.end_date_active) = (trunc(X_start_date_active) -1)

Line 540: FROM jl_zz_ar_TX_LOCN a

536:
537: BEGIN
538: SELECT COUNT(1)
539: INTO l_dummy1
540: FROM jl_zz_ar_TX_LOCN a
541: WHERE a.ship_from_code = X_ship_from_code
542: AND a.ship_to_segment_id = X_ship_to_segment_id
543: AND a.tax_category_id = X_tax_category_id
544: AND trunc(a.start_date_active) = (trunc(X_end_date_active) + 1)

Line 555: FROM jl_zz_ar_TX_LOCN a

551: IF (l_dummy1 = 0) THEN
552: BEGIN
553: SELECT COUNT(1)
554: INTO l_dummy2
555: FROM jl_zz_ar_TX_LOCN a
556: WHERE a.ship_from_code = X_ship_from_code
557: AND a.ship_to_segment_id = X_ship_to_segment_id
558: AND a.tax_category_id = X_tax_category_id
559: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid))

Line 580: END JL_ZZ_AR_TX_LOCN_PKG;

576: END;
577: END IF;
578: END Check_Gaps;
579:
580: END JL_ZZ_AR_TX_LOCN_PKG;