[Home] [Help]
121: -- This is the Main procedure which is being called by Concurrent process
122: -- Input parameter is Batch Name
123: -- fetches all records from psp_distribution_interface table belongs to given batch name and
124: -- validates each record whether it is valid or not.
125: -- If all records are valid then imports into psp_pre_gen_dist_lines table and marks as Transfered in
126: -- psp_distribution_interface table
127: --
128: PROCEDURE IMPORT_PREGEN_LINES (ERRBUF OUT NOCOPY Varchar2,
129: RETCODE OUT NOCOPY Number,
713: --For Bug 2096440 : Moved the END IF above , the check for l_batch_status=1 has to be applicable for autopop 'Y' as well as 'N'
714: -- end if; /* Bug 2007521: Optimization */
715: --
716: if l_batch_status = 0 then
717: INSERT INTO PSP_PRE_GEN_DIST_LINES ( pre_gen_dist_line_id,
718: distribution_interface_id,
719: person_id,
720: assignment_id,
721: element_type_id,
906: fnd_msg_pub.add_exc_msg('PSP_PREGEN','Error while inserting data in Payroll Controls');
907: raise FND_API.G_EXC_UNEXPECTED_ERROR;
908: end if;
909: --dbms_output.PUT_LINE('...Before Updating control_id in pre gen ' );
910: UPDATE psp_pre_gen_dist_lines
911: SET payroll_control_id = l_control_id
912: WHERE time_period_id = l_ft_time_period_id and
913: batch_name = p_batch_name and
914: source_type = 'P' and
994: fnd_msg_pub.add_exc_msg('PSP_PREGEN','Error while inserting data in Payroll Controls');
995: raise FND_API.G_EXC_UNEXPECTED_ERROR;
996: end if;
997: --dbms_output.PUT_LINE('...Before Updating control_id in pre gen ' );
998: UPDATE psp_pre_gen_dist_lines
999: SET payroll_control_id = l_control_id
1000: WHERE time_period_id = l_ft_time_period_id and
1001: batch_name = p_batch_name and
1002: source_type = 'P' and