354: t_ChildTypes t_ChildTypeTable;
355:
356: CURSOR c_GetIndServices (LineItemID NUMBER) IS
357: SELECT XOL.LINE_ITEM_ID
358: FROM XDP_LINE_RELATIONSHIPS XLR,
359: XDP_ORDER_LINE_ITEMS XOL
360: WHERE XLR.RELATED_LINE_ITEM_ID = LineItemID
361: AND XLR.LINE_RELATIONSHIP IN ('IS_PART_OF_PACKAGE','IS_PART_OF_IB_EXPLOSION')
362: AND XOL.LINE_ITEM_ID = XLR.LINE_ITEM_ID
365: AND (SEQ_IN_PACKAGE IS NULL OR SEQ_IN_PACKAGE = 0);
366:
367: CURSOR c_GetDepServices (LineItemID NUMBER) IS
368: SELECT XOL.LINE_ITEM_ID
369: FROM XDP_LINE_RELATIONSHIPS XLR, XDP_ORDER_LINE_ITEMS XOL
370: WHERE XLR.RELATED_LINE_ITEM_ID = LineItemID
371: AND XLR.LINE_RELATIONSHIP IN ('IS_PART_OF_PACKAGE','IS_PART_OF_IB_EXPLOSION')
372: AND XOL.LINE_ITEM_ID = XLR.LINE_ITEM_ID
373: AND XOL.STATUS_CODE = 'READY'
557: l_PrevSequence NUMBER;
558:
559: CURSOR c_GetSrcSeq (LineItemID number, OrderID number, Seq number) is
560: SELECT XOl.LINE_ITEM_ID, XOL.SEQ_IN_PACKAGE
561: FROM XDP_ORDER_LINE_ITEMS XOL, XDP_LINE_RELATIONSHIPS XLR
562: WHERE XLR.RELATED_LINE_ITEM_ID = LineItemID
563: AND XLR.LINE_RELATIONSHIP = 'IS_PART_OF_PACKAGE'
564: AND XOL.LINE_ITEM_ID = XLR.LINE_ITEM_ID
565: AND XOL.STATUS_CODE = 'READY'
565: AND XOL.STATUS_CODE = 'READY'
566: AND XOL.IS_VIRTUAL_LINE_FLAG = 'Y'
567: AND XOL.SEQ_IN_PACKAGE = (
568: SELECT MIN(XOL1.SEQ_IN_PACKAGE)
569: FROM XDP_ORDER_LINE_ITEMS XOL1, XDP_LINE_RELATIONSHIPS XLR1
570: WHERE XLR1.RELATED_LINE_ITEM_ID = LineItemID
571: AND XLR1.LINE_RELATIONSHIP = 'IS_PART_OF_PACKAGE'
572: AND XOL1.LINE_ITEM_ID = XLR1.LINE_ITEM_ID
573: AND XOL1.STATUS_CODE = 'READY'
650:
651: CURSOR c_GetSrcSeq (LineItemID number, OrderID number, Seq number) is
652: SELECT XOl.LINE_ITEM_ID, XOL.SEQ_IN_PACKAGE
653: FROM XDP_ORDER_LINE_ITEMS XOL,
654: XDP_LINE_RELATIONSHIPS XLR
655: WHERE XLR.RELATED_LINE_ITEM_ID = LineItemID
656: AND XLR.LINE_RELATIONSHIP = 'IS_PART_OF_PACKAGE'
657: AND XOL.LINE_ITEM_ID = XLR.LINE_ITEM_ID
658: AND XOL.STATUS_CODE = 'READY'
659: AND XOL.IS_VIRTUAL_LINE_FLAG = 'Y'
660: AND XOL.SEQ_IN_PACKAGE = (
661: SELECT MIN(XOL1.SEQ_IN_PACKAGE)
662: FROM XDP_ORDER_LINE_ITEMS XOL1,
663: XDP_LINE_RELATIONSHIPS XLR1
664: WHERE XLR1.RELATED_LINE_ITEM_ID = LineItemID
665: AND XLR1.LINE_RELATIONSHIP = 'IS_PART_OF_PACKAGE'
666: AND XOL1.LINE_ITEM_ID = XLR1.LINE_ITEM_ID
667: AND XOL1.STATUS_CODE = 'READY'
842:
843:
844: CURSOR c_GetIndServices (LineItemID NUMBER) IS
845: SELECT 'Y'
846: FROM XDP_LINE_RELATIONSHIPS XLR,
847: XDP_ORDER_LINE_ITEMS XOL
848: WHERE XLR.RELATED_LINE_ITEM_ID = LineItemID
849: AND XLR.LINE_RELATIONSHIP IN ('IS_PART_OF_PACKAGE','IS_PART_OF_IB_EXPLOSION')
850: AND XOL.LINE_ITEM_ID = XLR.LINE_ITEM_ID
853: AND (SEQ_IN_PACKAGE IS NULL OR SEQ_IN_PACKAGE = 0);
854:
855: CURSOR c_GetDepServices (LineItemID NUMBER) IS
856: SELECT 'Y'
857: FROM XDP_LINE_RELATIONSHIPS XLR, XDP_ORDER_LINE_ITEMS XOL
858: WHERE XLR.RELATED_LINE_ITEM_ID = LineItemID
859: AND XLR.LINE_RELATIONSHIP IN ('IS_PART_OF_PACKAGE','IS_PART_OF_IB_EXPLOSION')
860: AND XOL.LINE_ITEM_ID = XLR.LINE_ITEM_ID
861: AND XOL.STATUS_CODE = 'READY'
911: t_ChildKeys t_ChildKeyTable;
912:
913: CURSOR c_GetIndServices (LineItemID NUMBER) IS
914: SELECT XOL.LINE_ITEM_ID
915: FROM XDP_LINE_RELATIONSHIPS XLR,
916: XDP_ORDER_LINE_ITEMS XOL
917: WHERE XLR.RELATED_LINE_ITEM_ID = LineItemID
918: AND XLR.LINE_RELATIONSHIP IN ('IS_PART_OF_PACKAGE','IS_PART_OF_IB_EXPLOSION')
919: AND XOL.LINE_ITEM_ID = XLR.LINE_ITEM_ID