[Home] [Help]
4755: BEGIN
4756:
4757: write_log('Inside Process Header');
4758:
4759: QP_BULK_UTIL.LOAD_INS_HEADER
4760: (p_request_id=>p_request_id
4761: ,x_header_rec=>G_INS_HEADER_REC);
4762:
4763: write_log('Records loaded for INS:'||G_INS_HEADER_REC.orig_sys_header_ref.count);
4765: IF G_INS_HEADER_REC.orig_sys_header_ref.count>0 THEN
4766:
4767: QP_BULK_VALIDATE.ENTITY_HEADER(p_header_rec=>G_INS_HEADER_REC);
4768:
4769: QP_BULK_UTIL.Insert_Header(p_header_rec=>G_INS_HEADER_REC);
4770: QP_BULK_MSG.Save_Message(p_request_id);
4771:
4772:
4773: FORALL I IN G_INS_HEADER_REC.orig_sys_header_ref.FIRST..
4781: write_log('Records Updated with process_status_flag: ' || sql%rowcount);
4782:
4783: END IF;
4784:
4785: QP_BULK_UTIL.LOAD_UDT_HEADER
4786: (p_request_id => p_request_id
4787: ,x_header_rec => G_UDT_HEADER_REC);
4788:
4789: write_log('Records loaded for UDT:'||G_UDT_HEADER_REC.orig_sys_header_ref.count);
4791: IF G_UDT_HEADER_REC.orig_sys_header_ref.count>0 THEN
4792:
4793: QP_BULK_VALIDATE.ENTITY_HEADER(p_header_rec=>G_UDT_HEADER_REC);
4794:
4795: QP_BULK_UTIL.Update_Header(p_header_rec=>G_UDT_HEADER_REC);
4796: QP_BULK_MSG.Save_Message(p_request_id);
4797:
4798: FORALL I IN G_UDT_HEADER_REC.orig_sys_header_ref.FIRST..
4799: G_UDT_HEADER_REC.orig_sys_header_ref.LAST
4806: write_log('Records Updated with process_status_flag:' || sql%rowcount);
4807: END IF;
4808:
4809:
4810: QP_BULK_UTIL.Delete_Header(p_request_id);
4811:
4812: QP_BULK_MSG.Save_Message(p_request_id);
4813:
4814: write_log('Leaving Process Header');
5099:
5100: QP_BULK_VALIDATE.ENTITY_QUALIFIER
5101: (p_qualifier_rec=>G_INS_QUALIFIER_REC);
5102:
5103: QP_BULK_UTIL.Insert_Qualifier(p_qualifier_rec=>G_INS_QUALIFIER_REC);
5104:
5105: QP_BULK_MSG.SAVE_MESSAGE(p_request_id);
5106:
5107: --set process_status_flag
5250:
5251: QP_BULK_VALIDATE.ENTITY_QUALIFIER
5252: (p_qualifier_rec=>G_UDT_QUALIFIER_REC);
5253:
5254: QP_BULK_UTIL.Update_Qualifier(p_qualifier_rec=>G_UDT_QUALIFIER_REC);
5255:
5256: QP_BULK_MSG.SAVE_MESSAGE(p_request_id);
5257:
5258: --set process_status_flag
5277:
5278:
5279: QP_BULK_MSG.SAVE_MESSAGE(p_request_id);
5280:
5281: QP_BULK_UTIL.Delete_Qualifier(p_request_id);
5282:
5283: write_log('Existing Process Qualifier');
5284:
5285: EXCEPTION
5771: and qill2.price_break_header_ref=qill1.orig_sys_line_ref);
5772: COMMIT;
5773: end if;
5774:
5775: QP_BULK_UTIL.Update_line(G_UDT_LINE_REC);
5776:
5777:
5778: --set process_status_flag
5779: FORALL I IN G_UDT_LINE_REC.orig_sys_line_ref.FIRST
5790: -- changes for bug no 6028305
5791: Process_pricing_attr(p_request_id,p_process_parent);
5792: -- update the parent back 6028305
5793: if p_process_parent='N' then
5794: QP_BULK_UTIL.UPDATE_LINE_TO_OLD(G_UDT_LINE_REC_OLD);
5795: end if;
5796:
5797: END IF;
5798:
6053:
6054:
6055: -- end bug 6028305
6056:
6057: QP_BULK_UTIL.Insert_line(G_INS_LINE_REC);
6058:
6059: --set process_status_flag
6060: FORALL I IN G_INS_LINE_REC.orig_sys_line_ref.FIRST
6061: ..G_INS_LINE_REC.orig_sys_line_ref.LAST
6150: CLOSE C_INS_LINE;
6151:
6152:
6153: -- performing UPDATE before INSERT smbalara for bug 9458481/10152629 END
6154: QP_BULK_UTIL.Delete_Line(p_request_id);
6155:
6156: write_log('Existing Process Line');
6157:
6158: EXCEPTION
6513:
6514: COMMIT;
6515: end if;
6516:
6517: QP_BULK_UTIL.Insert_pricing_attr(G_INS_PRICING_ATTR_REC);
6518:
6519: --set the process_status_flag
6520: FORALL I IN G_INS_PRICING_ATTR_REC.orig_sys_pricing_attr_ref.FIRST
6521: ..G_INS_PRICING_ATTR_REC.orig_sys_pricing_attr_ref.LAST
6730: write_log( 'Number of attribute lines picked1: '||SQL%ROWCOUNT);
6731: commit;
6732: end if;
6733:
6734: QP_BULK_UTIL.Update_pricing_attr(G_UDT_PRICING_ATTR_REC);
6735:
6736: --set the process_status_flag
6737: FORALL I IN G_UDT_PRICING_ATTR_REC.orig_sys_pricing_attr_ref.FIRST
6738: ..G_UDT_PRICING_ATTR_REC.orig_sys_pricing_attr_ref.LAST
6750: CLOSE C_UDT_PRICING_ATTR;
6751:
6752: Post_cleanup_Line(p_request_id); --delete all the errored records
6753:
6754: QP_BULK_UTIL.Delete_Pricing_Attr(p_request_id);
6755:
6756: write_log('Leaving Process Pricing Attribute');
6757: EXCEPTION
6758: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN