4498:
4499: -- Set missing old record elements to NULL.
4500:
4501: IF l_debug_level > 0 THEN
4502: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Convert_Miss_To_Null', 5);
4503: END IF;
4504: OE_Line_Payment_Util.Convert_Miss_To_Null (l_old_Line_Payment_rec);
4505: IF l_debug_level > 0 THEN
4506: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Convert_Miss_To_Null', 5);
4500:
4501: IF l_debug_level > 0 THEN
4502: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Convert_Miss_To_Null', 5);
4503: END IF;
4504: OE_Line_Payment_Util.Convert_Miss_To_Null (l_old_Line_Payment_rec);
4505: IF l_debug_level > 0 THEN
4506: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Convert_Miss_To_Null', 5);
4507: END IF;
4508:
4502: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Convert_Miss_To_Null', 5);
4503: END IF;
4504: OE_Line_Payment_Util.Convert_Miss_To_Null (l_old_Line_Payment_rec);
4505: IF l_debug_level > 0 THEN
4506: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Convert_Miss_To_Null', 5);
4507: END IF;
4508:
4509: ELSIF l_Line_Payment_rec.operation = OE_GLOBALS.G_OPR_UPDATE
4510: OR l_Line_Payment_rec.operation = OE_GLOBALS.G_OPR_DELETE
4517: IF l_old_Line_Payment_rec.payment_number = FND_API.G_MISS_NUM
4518: THEN
4519:
4520: IF l_debug_level > 0 THEN
4521: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Query_Row', 5);
4522: END IF;
4523: OE_Line_Payment_Util.Query_Row
4524: ( p_payment_number => l_Line_Payment_rec.payment_number
4525: , p_line_id => l_Line_Payment_rec.line_id
4519:
4520: IF l_debug_level > 0 THEN
4521: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Query_Row', 5);
4522: END IF;
4523: OE_Line_Payment_Util.Query_Row
4524: ( p_payment_number => l_Line_Payment_rec.payment_number
4525: , p_line_id => l_Line_Payment_rec.line_id
4526: , p_header_id => l_Line_Payment_rec.header_id
4527: , x_line_payment_rec => l_old_Line_Payment_rec
4526: , p_header_id => l_Line_Payment_rec.header_id
4527: , x_line_payment_rec => l_old_Line_Payment_rec
4528: );
4529: IF l_debug_level > 0 THEN
4530: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Query_Row', 5);
4531: END IF;
4532:
4533: ELSE
4534:
4533: ELSE
4534:
4535: -- Set missing old record elements to NULL.
4536:
4537: OE_Line_Payment_Util.Convert_Miss_To_Null (l_old_Line_Payment_rec);
4538:
4539: END IF;
4540:
4541: -- Complete new record from old
4540:
4541: -- Complete new record from old
4542:
4543: IF l_debug_level > 0 THEN
4544: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Complete_Record', 5);
4545: END IF;
4546: OE_Line_Payment_Util.Complete_Record
4547: ( p_x_Line_Payment_rec => l_Line_Payment_rec
4548: , p_old_Line_Payment_rec => l_old_Line_Payment_rec
4542:
4543: IF l_debug_level > 0 THEN
4544: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Complete_Record', 5);
4545: END IF;
4546: OE_Line_Payment_Util.Complete_Record
4547: ( p_x_Line_Payment_rec => l_Line_Payment_rec
4548: , p_old_Line_Payment_rec => l_old_Line_Payment_rec
4549: );
4550: IF l_debug_level > 0 THEN
4547: ( p_x_Line_Payment_rec => l_Line_Payment_rec
4548: , p_old_Line_Payment_rec => l_old_Line_Payment_rec
4549: );
4550: IF l_debug_level > 0 THEN
4551: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Complete_Record', 5);
4552: END IF;
4553:
4554: OE_MSG_PUB.update_msg_context(
4555: p_entity_code => 'LINE_PAYMENT'
4627:
4628: IF l_control_rec.clear_dependents THEN
4629:
4630: IF l_debug_level > 0 THEN
4631: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Clear_Dependent_Attr', 5);
4632: END IF;
4633: OE_Line_Payment_Util.Clear_Dependent_Attr
4634: ( p_x_Line_Payment_rec => l_Line_Payment_rec
4635: , p_old_Line_Payment_rec => l_old_Line_Payment_rec
4629:
4630: IF l_debug_level > 0 THEN
4631: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Clear_Dependent_Attr', 5);
4632: END IF;
4633: OE_Line_Payment_Util.Clear_Dependent_Attr
4634: ( p_x_Line_Payment_rec => l_Line_Payment_rec
4635: , p_old_Line_Payment_rec => l_old_Line_Payment_rec
4636: );
4637: IF l_debug_level > 0 THEN
4634: ( p_x_Line_Payment_rec => l_Line_Payment_rec
4635: , p_old_Line_Payment_rec => l_old_Line_Payment_rec
4636: );
4637: IF l_debug_level > 0 THEN
4638: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Clear_Dependent_Attr', 5);
4639: END IF;
4640:
4641: END IF;
4642:
4669: IF l_control_rec.change_attributes
4670: THEN
4671:
4672: IF l_debug_level > 0 THEN
4673: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Apply_Attribute_Changes', 5);
4674: END IF;
4675: OE_Line_Payment_Util.Apply_Attribute_Changes
4676: ( p_x_Line_Payment_rec => l_Line_Payment_rec
4677: , p_old_Line_Payment_rec => l_old_Line_Payment_rec
4671:
4672: IF l_debug_level > 0 THEN
4673: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Apply_Attribute_Changes', 5);
4674: END IF;
4675: OE_Line_Payment_Util.Apply_Attribute_Changes
4676: ( p_x_Line_Payment_rec => l_Line_Payment_rec
4677: , p_old_Line_Payment_rec => l_old_Line_Payment_rec
4678: );
4679: IF l_debug_level > 0 THEN
4676: ( p_x_Line_Payment_rec => l_Line_Payment_rec
4677: , p_old_Line_Payment_rec => l_old_Line_Payment_rec
4678: );
4679: IF l_debug_level > 0 THEN
4680: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Apply_Attribute_Changes', 5);
4681: END IF;
4682:
4683: END IF;
4684:
4771: IF l_control_rec.write_to_db THEN
4772:
4773: /* Start Audit Trail */
4774: IF l_debug_level > 0 THEN
4775: oe_debug_pub.add('Payment:before Oe_line_Payment_Util.Pre_Write_Process', 5);
4776: END IF;
4777: Oe_line_Payment_Util.Pre_Write_Process
4778: (p_x_line_payment_rec => l_line_payment_rec,
4779: p_old_line_payment_rec => l_old_line_payment_rec);
4773: /* Start Audit Trail */
4774: IF l_debug_level > 0 THEN
4775: oe_debug_pub.add('Payment:before Oe_line_Payment_Util.Pre_Write_Process', 5);
4776: END IF;
4777: Oe_line_Payment_Util.Pre_Write_Process
4778: (p_x_line_payment_rec => l_line_payment_rec,
4779: p_old_line_payment_rec => l_old_line_payment_rec);
4780: IF l_debug_level > 0 THEN
4781: oe_debug_pub.add('Payment:after Oe_line_Payment_Util.Pre_Write_Process', 5);
4777: Oe_line_Payment_Util.Pre_Write_Process
4778: (p_x_line_payment_rec => l_line_payment_rec,
4779: p_old_line_payment_rec => l_old_line_payment_rec);
4780: IF l_debug_level > 0 THEN
4781: oe_debug_pub.add('Payment:after Oe_line_Payment_Util.Pre_Write_Process', 5);
4782: END IF;
4783: /* End AuditTrail */
4784:
4785: IF l_Line_Payment_rec.operation = OE_GLOBALS.G_OPR_DELETE THEN
4784:
4785: IF l_Line_Payment_rec.operation = OE_GLOBALS.G_OPR_DELETE THEN
4786:
4787: IF l_debug_level > 0 THEN
4788: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Delete_Row', 5);
4789: END IF;
4790: OE_Line_Payment_Util.Delete_Row
4791: ( p_payment_number => l_Line_Payment_rec.payment_number
4792: , p_line_id => l_Line_Payment_rec.line_id
4786:
4787: IF l_debug_level > 0 THEN
4788: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Delete_Row', 5);
4789: END IF;
4790: OE_Line_Payment_Util.Delete_Row
4791: ( p_payment_number => l_Line_Payment_rec.payment_number
4792: , p_line_id => l_Line_Payment_rec.line_id
4793: , p_header_id => l_Line_Payment_rec.header_id
4794: );
4792: , p_line_id => l_Line_Payment_rec.line_id
4793: , p_header_id => l_Line_Payment_rec.header_id
4794: );
4795: IF l_debug_level > 0 THEN
4796: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Delete_Row', 5);
4797: END IF;
4798:
4799: ELSE
4800:
4806:
4807: IF l_Line_Payment_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
4808:
4809: IF l_debug_level > 0 THEN
4810: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Update_Row', 5);
4811: END IF;
4812: OE_Line_Payment_Util.Update_Row (l_Line_Payment_rec);
4813: IF l_debug_level > 0 THEN
4814: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Update_Row', 5);
4808:
4809: IF l_debug_level > 0 THEN
4810: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Update_Row', 5);
4811: END IF;
4812: OE_Line_Payment_Util.Update_Row (l_Line_Payment_rec);
4813: IF l_debug_level > 0 THEN
4814: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Update_Row', 5);
4815: END IF;
4816:
4810: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Update_Row', 5);
4811: END IF;
4812: OE_Line_Payment_Util.Update_Row (l_Line_Payment_rec);
4813: IF l_debug_level > 0 THEN
4814: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Update_Row', 5);
4815: END IF;
4816:
4817: ELSIF l_Line_Payment_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
4818:
4819: l_Line_Payment_rec.creation_date := SYSDATE;
4820: l_Line_Payment_rec.created_by := NVL(OE_STANDARD_WF.g_user_id, FND_GLOBAL.USER_ID); -- 3169637
4821:
4822: IF l_debug_level > 0 THEN
4823: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Insert_Row', 5);
4824: END IF;
4825: OE_Line_Payment_Util.Insert_Row (l_Line_Payment_rec);
4826: IF l_debug_level > 0 THEN
4827: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Insert_Row', 5);
4821:
4822: IF l_debug_level > 0 THEN
4823: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Insert_Row', 5);
4824: END IF;
4825: OE_Line_Payment_Util.Insert_Row (l_Line_Payment_rec);
4826: IF l_debug_level > 0 THEN
4827: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Insert_Row', 5);
4828: END IF;
4829:
4823: oe_debug_pub.add('Payment:before OE_Line_Payment_Util.Insert_Row', 5);
4824: END IF;
4825: OE_Line_Payment_Util.Insert_Row (l_Line_Payment_rec);
4826: IF l_debug_level > 0 THEN
4827: oe_debug_pub.add('Payment:after OE_Line_Payment_Util.Insert_Row', 5);
4828: END IF;
4829:
4830: END IF;
4831:
10832: WHILE I IS NOT NULL LOOP
10833:
10834: IF p_x_Line_Payment_tbl(I).operation = OE_GLOBALS.G_OPR_LOCK THEN
10835:
10836: OE_Line_Payment_Util.Lock_Row
10837: ( p_x_Line_Payment_rec => p_x_Line_Payment_tbl(I)
10838: , x_return_status => l_return_status
10839: );
10840:
11290: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
11291: -- Get Line_Payment ( parent = line )
11292:
11293: l_Line_Payment_tbl.delete; --6052770
11294: OE_Line_Payment_Util.Query_Rows
11295: ( p_line_id => x_line_tbl(I2).line_id
11296: , p_header_id => x_line_tbl(I2).header_id
11297: , x_Line_Payment_tbl => l_Line_Payment_tbl
11298: );