DBA Data[Home] [Help]

APPS.JL_ZZ_AR_TX_EXC_ITM_PKG dependencies on JL_ZZ_AR_TX_EXC_ITM

Line 1: PACKAGE BODY JL_ZZ_AR_TX_EXC_ITM_PKG as

1: PACKAGE BODY JL_ZZ_AR_TX_EXC_ITM_PKG as
2: /* $Header: jlzzteib.pls 120.3 2003/09/02 21:59:22 opedrega ship $ */
3:
4: PROCEDURE Insert_Row
5: (X_rowid IN OUT NOCOPY VARCHAR2,

Line 42: FROM jl_zz_ar_tx_exc_itm

38: X_calling_sequence IN VARCHAR2) IS
39:
40: CURSOR C IS
41: SELECT rowid
42: FROM jl_zz_ar_tx_exc_itm
43: WHERE ship_from_code = X_ship_from_code
44: AND ship_to_segment_id = X_ship_to_segment_id
45: AND inventory_item_id = X_inventory_item_id
46: AND organization_id = X_organization_id

Line 56: current_calling_sequence := 'JL_ZZ_AR_TX_EXC_ITM_PKG.INSERT_ROW<-' ||

52:
53: BEGIN
54: -- Update the calling sequence
55: --
56: current_calling_sequence := 'JL_ZZ_AR_TX_EXC_ITM_PKG.INSERT_ROW<-' ||
57: X_calling_sequence;
58:
59: debug_info := 'Insert into JL_ZZ_AR_TX_EXC_ITM ';
60: insert into jl_zz_ar_tx_exc_itm(exc_itm_id,

Line 59: debug_info := 'Insert into JL_ZZ_AR_TX_EXC_ITM ';

55: --
56: current_calling_sequence := 'JL_ZZ_AR_TX_EXC_ITM_PKG.INSERT_ROW<-' ||
57: X_calling_sequence;
58:
59: debug_info := 'Insert into JL_ZZ_AR_TX_EXC_ITM ';
60: insert into jl_zz_ar_tx_exc_itm(exc_itm_id,
61: ship_from_code,
62: ship_to_segment_id,
63: inventory_item_id,

Line 60: insert into jl_zz_ar_tx_exc_itm(exc_itm_id,

56: current_calling_sequence := 'JL_ZZ_AR_TX_EXC_ITM_PKG.INSERT_ROW<-' ||
57: X_calling_sequence;
58:
59: debug_info := 'Insert into JL_ZZ_AR_TX_EXC_ITM ';
60: insert into jl_zz_ar_tx_exc_itm(exc_itm_id,
61: ship_from_code,
62: ship_to_segment_id,
63: inventory_item_id,
64: organization_id,

Line 225: FROM jl_zz_ar_tx_exc_itm

221: ATTRIBUTE12,
222: ATTRIBUTE13,
223: ATTRIBUTE14,
224: ATTRIBUTE15
225: FROM jl_zz_ar_tx_exc_itm
226: WHERE ship_from_code = X_ship_from_code
227: AND ship_to_segment_id = X_ship_to_segment_id
228: AND inventory_item_id = X_inventory_item_id
229: AND organization_id = X_organization_id

Line 251: current_calling_sequence := 'JL_ZZ_AR_TX_EXC_ITM_PKG.LOCK_ROW<-' ||

247:
248: BEGIN
249: -- Update the calling sequence
250: --
251: current_calling_sequence := 'JL_ZZ_AR_TX_EXC_ITM_PKG.LOCK_ROW<-' ||
252: X_calling_sequence;
253: debug_info := 'Open cursor C';
254: OPEN C;
255: debug_info := 'Fetch cursor C';

Line 412: UPDATE jl_zz_ar_tx_exc_itm

408: X_attribute15 VARCHAR2,
409: X_calling_sequence IN VARCHAR2) IS
410:
411: BEGIN
412: UPDATE jl_zz_ar_tx_exc_itm
413: SET ship_from_code = X_ship_from_code,
414: ship_to_segment_id = X_ship_to_segment_id,
415: inventory_item_id = X_inventory_item_id,
416: organization_id = X_organization_id,

Line 456: FROM jl_zz_ar_tx_exc_itm

452: (X_rowid VARCHAR2) IS
453:
454: BEGIN
455: DELETE
456: FROM jl_zz_ar_tx_exc_itm
457: WHERE rowid = X_rowid;
458:
459: IF (SQL%NOTFOUND) THEN
460: raise NO_DATA_FOUND;

Line 482: current_calling_sequence := 'JL_ZZ_AR_TX_EXC_ITM_PKG.CHECK_UNIQUE<-' ||

478:
479: BEGIN
480: -- Update the calling sequence
481: --
482: current_calling_sequence := 'JL_ZZ_AR_TX_EXC_ITM_PKG.CHECK_UNIQUE<-' ||
483: X_calling_sequence;
484: SELECT COUNT(1)
485: INTO l_dummy
486: FROM jl_zz_ar_tx_exc_itm

Line 486: FROM jl_zz_ar_tx_exc_itm

482: current_calling_sequence := 'JL_ZZ_AR_TX_EXC_ITM_PKG.CHECK_UNIQUE<-' ||
483: X_calling_sequence;
484: SELECT COUNT(1)
485: INTO l_dummy
486: FROM jl_zz_ar_tx_exc_itm
487: WHERE ship_from_code = X_ship_from_code
488: AND ship_to_segment_id = X_ship_to_segment_id
489: AND inventory_item_id = X_inventory_item_id
490: AND organization_id = X_organization_id

Line 533: 'JL_ZZ_AR_TX_EXC_ITM_PKG.<-CHECK_OVERLAPPED_DATES' ||

529: BEGIN
530: -- Update the calling sequence
531: --
532: current_calling_sequence :=
533: 'JL_ZZ_AR_TX_EXC_ITM_PKG.<-CHECK_OVERLAPPED_DATES' ||
534: X_calling_sequence;
535: SELECT COUNT(1)
536: INTO l_dummy
537: FROM jl_zz_ar_tx_exc_itm a

Line 537: FROM jl_zz_ar_tx_exc_itm a

533: 'JL_ZZ_AR_TX_EXC_ITM_PKG.<-CHECK_OVERLAPPED_DATES' ||
534: X_calling_sequence;
535: SELECT COUNT(1)
536: INTO l_dummy
537: FROM jl_zz_ar_tx_exc_itm a
538: WHERE a.ship_from_code = X_ship_from_code
539: AND a.ship_to_segment_id = X_ship_to_segment_id
540: AND a.inventory_item_id = X_inventory_item_id
541: AND a.organization_id = X_organization_id

Line 590: current_calling_sequence := 'JL_ZZ_AR_TX_EXC_ITM_PKG.CHECK_GAPS<-' ||

586:
587: BEGIN
588: -- Update the calling sequence
589: --
590: current_calling_sequence := 'JL_ZZ_AR_TX_EXC_ITM_PKG.CHECK_GAPS<-' ||
591: X_calling_sequence;
592: --
593: -- Check if there is one row with it's end date exactly one day
594: -- less than the current row's start date

Line 598: FROM jl_zz_ar_tx_exc_itm a

594: -- less than the current row's start date
595:
596: SELECT COUNT(1)
597: INTO l_dummy
598: FROM jl_zz_ar_tx_exc_itm a
599: WHERE a.ship_from_code = X_ship_from_code
600: AND a.ship_to_segment_id = X_ship_to_segment_id
601: AND a.inventory_item_id = X_inventory_item_id
602: AND a.organization_id = X_organization_id

Line 616: FROM jl_zz_ar_tx_exc_itm a

612: --the current row's end-date
613:
614: SELECT COUNT(1)
615: INTO l_dummy1
616: FROM jl_zz_ar_tx_exc_itm a
617: WHERE a.ship_from_code = X_ship_from_code
618: AND a.ship_to_segment_id = X_ship_to_segment_id
619: AND a.inventory_item_id = X_inventory_item_id
620: AND a.organization_id = X_organization_id

Line 633: FROM jl_zz_ar_tx_exc_itm a

629: IF (l_dummy1 = 0) THEN
630: BEGIN
631: SELECT COUNT(1)
632: INTO l_dummy2
633: FROM jl_zz_ar_tx_exc_itm a
634: WHERE a.ship_from_code = X_ship_from_code
635: AND a.ship_to_segment_id = X_ship_to_segment_id
636: AND a.inventory_item_id = X_inventory_item_id
637: AND a.organization_id = X_organization_id

Line 662: END JL_ZZ_AR_TX_EXC_ITM_PKG;

658: END IF;
659: END;
660: END IF;
661: END Check_Gaps;
662: END JL_ZZ_AR_TX_EXC_ITM_PKG;