DBA Data[Home] [Help]

APPS.PAY_SG_CPFLINE dependencies on PAY_SG_IRAS_ARCHIVE

Line 560: if pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 2, 2)) and

556: if length(p_er_cpf_number) = 15 then
557: if l_payer_id_type = 'U' then
558: if (substr(l_cpf_num_uen, 1, 1) = 'S' or
559: substr(l_cpf_num_uen, 1, 1) = 'T') then
560: if pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 2, 2)) and
561: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 4, 2)) and
562: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 6,4)) and
563: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen,10,1)) then
564: null;

Line 561: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 4, 2)) and

557: if l_payer_id_type = 'U' then
558: if (substr(l_cpf_num_uen, 1, 1) = 'S' or
559: substr(l_cpf_num_uen, 1, 1) = 'T') then
560: if pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 2, 2)) and
561: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 4, 2)) and
562: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 6,4)) and
563: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen,10,1)) then
564: null;
565: else

Line 562: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 6,4)) and

558: if (substr(l_cpf_num_uen, 1, 1) = 'S' or
559: substr(l_cpf_num_uen, 1, 1) = 'T') then
560: if pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 2, 2)) and
561: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 4, 2)) and
562: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 6,4)) and
563: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen,10,1)) then
564: null;
565: else
566: l_return := 'N';

Line 563: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen,10,1)) then

559: substr(l_cpf_num_uen, 1, 1) = 'T') then
560: if pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 2, 2)) and
561: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 4, 2)) and
562: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 6,4)) and
563: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen,10,1)) then
564: null;
565: else
566: l_return := 'N';
567: end if;

Line 572: if pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen,1,8)) and

568: else
569: l_return := 'N';
570: end if;
571: elsif l_payer_id_type = '7' then
572: if pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen,1,8)) and
573: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen,9,1)) and
574: substr(l_cpf_num_uen,10,1) = ' ' then
575: null;
576: else

Line 573: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen,9,1)) and

569: l_return := 'N';
570: end if;
571: elsif l_payer_id_type = '7' then
572: if pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen,1,8)) and
573: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen,9,1)) and
574: substr(l_cpf_num_uen,10,1) = ' ' then
575: null;
576: else
577: l_return := 'N';

Line 582: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 5, 5)) and

578: end if;
579: elsif l_payer_id_type = '8' then
580: l_year := to_number(substr(l_cpf_num_uen, 1, 4));
581: if ((l_year >= 1900 and l_year < 4712) and
582: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 5, 5)) and
583: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 10, 1))) or
584: (substr(l_cpf_num_uen, 1, 1) = 'F' and
585: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 2, 8)) and
586: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 10, 1))) then

Line 583: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 10, 1))) or

579: elsif l_payer_id_type = '8' then
580: l_year := to_number(substr(l_cpf_num_uen, 1, 4));
581: if ((l_year >= 1900 and l_year < 4712) and
582: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 5, 5)) and
583: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 10, 1))) or
584: (substr(l_cpf_num_uen, 1, 1) = 'F' and
585: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 2, 8)) and
586: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 10, 1))) then
587: null;

Line 585: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 2, 8)) and

581: if ((l_year >= 1900 and l_year < 4712) and
582: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 5, 5)) and
583: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 10, 1))) or
584: (substr(l_cpf_num_uen, 1, 1) = 'F' and
585: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 2, 8)) and
586: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 10, 1))) then
587: null;
588: else
589: l_return := 'N';

Line 586: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 10, 1))) then

582: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 5, 5)) and
583: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 10, 1))) or
584: (substr(l_cpf_num_uen, 1, 1) = 'F' and
585: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 2, 8)) and
586: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_uen, 10, 1))) then
587: null;
588: else
589: l_return := 'N';
590: end if;

Line 608: if not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,1,1)) and

604: else
605: l_return := 'N';
606: end if;
607: else
608: if not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,1,1)) and
609: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,2,1)) and
610: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,3,1)) then
611: null;
612: else

Line 609: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,2,1)) and

605: l_return := 'N';
606: end if;
607: else
608: if not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,1,1)) and
609: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,2,1)) and
610: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,3,1)) then
611: null;
612: else
613: l_return := 'N';

Line 610: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,3,1)) then

606: end if;
607: else
608: if not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,1,1)) and
609: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,2,1)) and
610: not pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc,3,1)) then
611: null;
612: else
613: l_return := 'N';
614: end if;

Line 619: if pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc_s,1,1)) and

615: end if;
616: end if;
617:
618: if l_return <> 'N' then
619: if pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc_s,1,1)) and
620: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc_s,2,1)) then
621: null;
622: else
623: l_return := 'N';

Line 620: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc_s,2,1)) then

616: end if;
617:
618: if l_return <> 'N' then
619: if pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc_s,1,1)) and
620: pay_sg_iras_archive.check_is_number(substr(l_cpf_num_pc_s,2,1)) then
621: null;
622: else
623: l_return := 'N';
624: end if;