DBA Data[Home] [Help]

APPS.PO_VENDOR_SITES_SV dependencies on DBMS_SQL

Line 679: cid := dbms_sql.open_cursor;

675: --dbms_output.put_line(substr(sql_str,1,255));
676: --dbms_output.put_line(substr(sql_str,256,255));
677: --dbms_output.put_line(substr(sql_str,513,255));
678:
679: cid := dbms_sql.open_cursor;
680:
681: dbms_sql.parse(cid, sql_str , dbms_sql.native);
682:
683: dbms_sql.define_column(cid,1,p_vendor_site_record.vendor_site_id);

Line 681: dbms_sql.parse(cid, sql_str , dbms_sql.native);

677: --dbms_output.put_line(substr(sql_str,513,255));
678:
679: cid := dbms_sql.open_cursor;
680:
681: dbms_sql.parse(cid, sql_str , dbms_sql.native);
682:
683: dbms_sql.define_column(cid,1,p_vendor_site_record.vendor_site_id);
684: dbms_sql.define_column(cid,2,p_vendor_site_record.vendor_id);
685: dbms_sql.define_column(cid,3,p_vendor_site_record.vendor_site_code,40);

Line 683: dbms_sql.define_column(cid,1,p_vendor_site_record.vendor_site_id);

679: cid := dbms_sql.open_cursor;
680:
681: dbms_sql.parse(cid, sql_str , dbms_sql.native);
682:
683: dbms_sql.define_column(cid,1,p_vendor_site_record.vendor_site_id);
684: dbms_sql.define_column(cid,2,p_vendor_site_record.vendor_id);
685: dbms_sql.define_column(cid,3,p_vendor_site_record.vendor_site_code,40);
686: dbms_sql.define_column(cid,4,p_vendor_site_record.organization_id);
687:

Line 684: dbms_sql.define_column(cid,2,p_vendor_site_record.vendor_id);

680:
681: dbms_sql.parse(cid, sql_str , dbms_sql.native);
682:
683: dbms_sql.define_column(cid,1,p_vendor_site_record.vendor_site_id);
684: dbms_sql.define_column(cid,2,p_vendor_site_record.vendor_id);
685: dbms_sql.define_column(cid,3,p_vendor_site_record.vendor_site_code,40);
686: dbms_sql.define_column(cid,4,p_vendor_site_record.organization_id);
687:
688: IF NOT vendor_site_id_null THEN

Line 685: dbms_sql.define_column(cid,3,p_vendor_site_record.vendor_site_code,40);

681: dbms_sql.parse(cid, sql_str , dbms_sql.native);
682:
683: dbms_sql.define_column(cid,1,p_vendor_site_record.vendor_site_id);
684: dbms_sql.define_column(cid,2,p_vendor_site_record.vendor_id);
685: dbms_sql.define_column(cid,3,p_vendor_site_record.vendor_site_code,40);
686: dbms_sql.define_column(cid,4,p_vendor_site_record.organization_id);
687:
688: IF NOT vendor_site_id_null THEN
689:

Line 686: dbms_sql.define_column(cid,4,p_vendor_site_record.organization_id);

682:
683: dbms_sql.define_column(cid,1,p_vendor_site_record.vendor_site_id);
684: dbms_sql.define_column(cid,2,p_vendor_site_record.vendor_id);
685: dbms_sql.define_column(cid,3,p_vendor_site_record.vendor_site_code,40);
686: dbms_sql.define_column(cid,4,p_vendor_site_record.organization_id);
687:
688: IF NOT vendor_site_id_null THEN
689:
690: dbms_sql.bind_variable(cid,'v_site_id',p_vendor_site_record.vendor_site_id);

Line 690: dbms_sql.bind_variable(cid,'v_site_id',p_vendor_site_record.vendor_site_id);

686: dbms_sql.define_column(cid,4,p_vendor_site_record.organization_id);
687:
688: IF NOT vendor_site_id_null THEN
689:
690: dbms_sql.bind_variable(cid,'v_site_id',p_vendor_site_record.vendor_site_id);
691:
692: END IF;
693:
694: IF NOT vendor_id_null THEN

Line 696: dbms_sql.bind_variable(cid,'v_id',p_vendor_site_record.vendor_id);

692: END IF;
693:
694: IF NOT vendor_id_null THEN
695:
696: dbms_sql.bind_variable(cid,'v_id',p_vendor_site_record.vendor_id);
697:
698: END IF;
699:
700: IF NOT vendor_site_code_null THEN

Line 702: dbms_sql.bind_variable(cid,'v_site_code',p_vendor_site_record.vendor_site_code);

698: END IF;
699:
700: IF NOT vendor_site_code_null THEN
701:
702: dbms_sql.bind_variable(cid,'v_site_code',p_vendor_site_record.vendor_site_code);
703:
704: END IF;
705:
706: /* IF NOT organization_id_null THEN

Line 708: dbms_sql.bind_variable(cid,'v_organization_id',p_vendor_site_record.organization_id);

704: END IF;
705:
706: /* IF NOT organization_id_null THEN
707:
708: dbms_sql.bind_variable(cid,'v_organization_id',p_vendor_site_record.organization_id);
709:
710: END IF; bug 607639 */
711:
712: rows_processed := dbms_sql.execute_and_fetch(cid);

Line 712: rows_processed := dbms_sql.execute_and_fetch(cid);

708: dbms_sql.bind_variable(cid,'v_organization_id',p_vendor_site_record.organization_id);
709:
710: END IF; bug 607639 */
711:
712: rows_processed := dbms_sql.execute_and_fetch(cid);
713:
714: IF rows_processed = 1 THEN
715:
716: IF vendor_site_id_null THEN

Line 717: dbms_sql.column_value(cid,1,p_vendor_site_record.vendor_site_id);

713:
714: IF rows_processed = 1 THEN
715:
716: IF vendor_site_id_null THEN
717: dbms_sql.column_value(cid,1,p_vendor_site_record.vendor_site_id);
718: END IF;
719:
720: IF vendor_site_code_null THEN
721: dbms_sql.column_value(cid,3,p_vendor_site_record.vendor_site_code);

Line 721: dbms_sql.column_value(cid,3,p_vendor_site_record.vendor_site_code);

717: dbms_sql.column_value(cid,1,p_vendor_site_record.vendor_site_id);
718: END IF;
719:
720: IF vendor_site_code_null THEN
721: dbms_sql.column_value(cid,3,p_vendor_site_record.vendor_site_code);
722: END IF;
723:
724: p_vendor_site_record.error_record.error_status := 'S';
725:

Line 736: IF dbms_sql.is_open(cid) THEN

732: p_vendor_site_record.error_record.error_status := 'W';
733:
734: END IF;
735:
736: IF dbms_sql.is_open(cid) THEN
737: dbms_sql.close_cursor(cid);
738: END IF;
739:
740: EXCEPTION

Line 737: dbms_sql.close_cursor(cid);

733:
734: END IF;
735:
736: IF dbms_sql.is_open(cid) THEN
737: dbms_sql.close_cursor(cid);
738: END IF;
739:
740: EXCEPTION
741: WHEN others THEN

Line 743: IF dbms_sql.is_open(cid) THEN

739:
740: EXCEPTION
741: WHEN others THEN
742:
743: IF dbms_sql.is_open(cid) THEN
744: dbms_sql.close_cursor(cid);
745: END IF;
746:
747: p_vendor_site_record.error_record.error_status := 'U';

Line 744: dbms_sql.close_cursor(cid);

740: EXCEPTION
741: WHEN others THEN
742:
743: IF dbms_sql.is_open(cid) THEN
744: dbms_sql.close_cursor(cid);
745: END IF;
746:
747: p_vendor_site_record.error_record.error_status := 'U';
748: p_vendor_site_record.error_record.error_message := sqlerrm;

Line 876: X_cid := dbms_sql.open_cursor;

872: --dbms_output.put_line(substr(X_sql_str,1,255));
873: --dbms_output.put_line(substr(X_sql_str,256,255));
874: --dbms_output.put_line(substr(X_sql_str,513,255));
875:
876: X_cid := dbms_sql.open_cursor;
877:
878: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
879:
880: dbms_sql.define_column(X_cid,1,X_inactive_date);

Line 878: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);

874: --dbms_output.put_line(substr(X_sql_str,513,255));
875:
876: X_cid := dbms_sql.open_cursor;
877:
878: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
879:
880: dbms_sql.define_column(X_cid,1,X_inactive_date);
881: dbms_sql.define_column(X_cid,2,X_purchasing_site_flag,1);
882: dbms_sql.define_column(X_cid,3,X_pay_site_flag,1);

Line 880: dbms_sql.define_column(X_cid,1,X_inactive_date);

876: X_cid := dbms_sql.open_cursor;
877:
878: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
879:
880: dbms_sql.define_column(X_cid,1,X_inactive_date);
881: dbms_sql.define_column(X_cid,2,X_purchasing_site_flag,1);
882: dbms_sql.define_column(X_cid,3,X_pay_site_flag,1);
883: dbms_sql.define_column(X_cid,4,X_hold_all_payments_flag,1);
884:

Line 881: dbms_sql.define_column(X_cid,2,X_purchasing_site_flag,1);

877:
878: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
879:
880: dbms_sql.define_column(X_cid,1,X_inactive_date);
881: dbms_sql.define_column(X_cid,2,X_purchasing_site_flag,1);
882: dbms_sql.define_column(X_cid,3,X_pay_site_flag,1);
883: dbms_sql.define_column(X_cid,4,X_hold_all_payments_flag,1);
884:
885: IF NOT X_vendor_site_id_null THEN

Line 882: dbms_sql.define_column(X_cid,3,X_pay_site_flag,1);

878: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
879:
880: dbms_sql.define_column(X_cid,1,X_inactive_date);
881: dbms_sql.define_column(X_cid,2,X_purchasing_site_flag,1);
882: dbms_sql.define_column(X_cid,3,X_pay_site_flag,1);
883: dbms_sql.define_column(X_cid,4,X_hold_all_payments_flag,1);
884:
885: IF NOT X_vendor_site_id_null THEN
886:

Line 883: dbms_sql.define_column(X_cid,4,X_hold_all_payments_flag,1);

879:
880: dbms_sql.define_column(X_cid,1,X_inactive_date);
881: dbms_sql.define_column(X_cid,2,X_purchasing_site_flag,1);
882: dbms_sql.define_column(X_cid,3,X_pay_site_flag,1);
883: dbms_sql.define_column(X_cid,4,X_hold_all_payments_flag,1);
884:
885: IF NOT X_vendor_site_id_null THEN
886:
887: dbms_sql.bind_variable(X_cid,'v_site_id',p_vendor_site_record.vendor_site_id);

Line 887: dbms_sql.bind_variable(X_cid,'v_site_id',p_vendor_site_record.vendor_site_id);

883: dbms_sql.define_column(X_cid,4,X_hold_all_payments_flag,1);
884:
885: IF NOT X_vendor_site_id_null THEN
886:
887: dbms_sql.bind_variable(X_cid,'v_site_id',p_vendor_site_record.vendor_site_id);
888:
889: END IF;
890:
891: IF NOT X_vendor_id_null THEN

Line 893: dbms_sql.bind_variable(X_cid,'v_id',p_vendor_site_record.vendor_id);

889: END IF;
890:
891: IF NOT X_vendor_id_null THEN
892:
893: dbms_sql.bind_variable(X_cid,'v_id',p_vendor_site_record.vendor_id);
894:
895: END IF;
896:
897: IF NOT X_vendor_site_code_null THEN

Line 899: dbms_sql.bind_variable(X_cid,'v_site_code',p_vendor_site_record.vendor_site_code);

895: END IF;
896:
897: IF NOT X_vendor_site_code_null THEN
898:
899: dbms_sql.bind_variable(X_cid,'v_site_code',p_vendor_site_record.vendor_site_code);
900:
901: END IF;
902:
903: /* IF NOT X_organization_id_null THEN

Line 905: dbms_sql.bind_variable(X_cid,'v_organization_id',p_vendor_site_record.organization_id);

901: END IF;
902:
903: /* IF NOT X_organization_id_null THEN
904:
905: dbms_sql.bind_variable(X_cid,'v_organization_id',p_vendor_site_record.organization_id);
906:
907: END IF; bug 621385 */
908:
909: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);

Line 909: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);

905: dbms_sql.bind_variable(X_cid,'v_organization_id',p_vendor_site_record.organization_id);
906:
907: END IF; bug 621385 */
908:
909: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);
910:
911: IF X_rows_processed = 1 THEN
912:
913: dbms_sql.column_value(X_cid,1,X_inactive_date);

Line 913: dbms_sql.column_value(X_cid,1,X_inactive_date);

909: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);
910:
911: IF X_rows_processed = 1 THEN
912:
913: dbms_sql.column_value(X_cid,1,X_inactive_date);
914: dbms_sql.column_value(X_cid,2,X_purchasing_site_flag);
915: dbms_sql.column_value(X_cid,3,X_pay_site_flag);
916: dbms_sql.column_value(X_cid,4,X_hold_all_payments_flag);
917:

Line 914: dbms_sql.column_value(X_cid,2,X_purchasing_site_flag);

910:
911: IF X_rows_processed = 1 THEN
912:
913: dbms_sql.column_value(X_cid,1,X_inactive_date);
914: dbms_sql.column_value(X_cid,2,X_purchasing_site_flag);
915: dbms_sql.column_value(X_cid,3,X_pay_site_flag);
916: dbms_sql.column_value(X_cid,4,X_hold_all_payments_flag);
917:
918: -- check whether Vendor_site_id is enabled

Line 915: dbms_sql.column_value(X_cid,3,X_pay_site_flag);

911: IF X_rows_processed = 1 THEN
912:
913: dbms_sql.column_value(X_cid,1,X_inactive_date);
914: dbms_sql.column_value(X_cid,2,X_purchasing_site_flag);
915: dbms_sql.column_value(X_cid,3,X_pay_site_flag);
916: dbms_sql.column_value(X_cid,4,X_hold_all_payments_flag);
917:
918: -- check whether Vendor_site_id is enabled
919: -- Active if Inactive date is in the future ie > sysdate

Line 916: dbms_sql.column_value(X_cid,4,X_hold_all_payments_flag);

912:
913: dbms_sql.column_value(X_cid,1,X_inactive_date);
914: dbms_sql.column_value(X_cid,2,X_purchasing_site_flag);
915: dbms_sql.column_value(X_cid,3,X_pay_site_flag);
916: dbms_sql.column_value(X_cid,4,X_hold_all_payments_flag);
917:
918: -- check whether Vendor_site_id is enabled
919: -- Active if Inactive date is in the future ie > sysdate
920:

Line 927: IF dbms_sql.is_open(X_cid) THEN

923: --dbms_output.put_line('Disabled Vendor Site');
924: p_vendor_site_record.error_record.error_status := 'E';
925: p_vendor_site_record.error_record.error_message := 'VEN_SITE_DISABLED';
926:
927: IF dbms_sql.is_open(X_cid) THEN
928: dbms_sql.close_cursor(X_cid);
929: END IF;
930:
931: RETURN;

Line 928: dbms_sql.close_cursor(X_cid);

924: p_vendor_site_record.error_record.error_status := 'E';
925: p_vendor_site_record.error_record.error_message := 'VEN_SITE_DISABLED';
926:
927: IF dbms_sql.is_open(X_cid) THEN
928: dbms_sql.close_cursor(X_cid);
929: END IF;
930:
931: RETURN;
932:

Line 944: IF dbms_sql.is_open(X_cid) THEN

940: x_error_status => p_vendor_site_record.error_record.error_status,
941: x_error_message => p_vendor_site_record.error_record.error_message);
942: -- In case the status is not 'S', close the cursor and return
943: IF (p_vendor_site_record.error_record.error_status <> 'S') THEN
944: IF dbms_sql.is_open(X_cid) THEN
945: dbms_sql.close_cursor(X_cid);
946: END IF;
947: RETURN;
948: END IF;

Line 945: dbms_sql.close_cursor(X_cid);

941: x_error_message => p_vendor_site_record.error_record.error_message);
942: -- In case the status is not 'S', close the cursor and return
943: IF (p_vendor_site_record.error_record.error_status <> 'S') THEN
944: IF dbms_sql.is_open(X_cid) THEN
945: dbms_sql.close_cursor(X_cid);
946: END IF;
947: RETURN;
948: END IF;
949: ELSE

Line 960: IF dbms_sql.is_open(X_cid) THEN

956: --dbms_output.put_line('Payment Hold');
957: p_vendor_site_record.error_record.error_status := 'E';
958: p_vendor_site_record.error_record.error_message := 'VEN_SITE_HOLD_PMT';
959:
960: IF dbms_sql.is_open(X_cid) THEN
961: dbms_sql.close_cursor(X_cid);
962: END IF;
963:
964: RETURN;

Line 961: dbms_sql.close_cursor(X_cid);

957: p_vendor_site_record.error_record.error_status := 'E';
958: p_vendor_site_record.error_record.error_message := 'VEN_SITE_HOLD_PMT';
959:
960: IF dbms_sql.is_open(X_cid) THEN
961: dbms_sql.close_cursor(X_cid);
962: END IF;
963:
964: RETURN;
965:

Line 976: IF dbms_sql.is_open(X_cid) THEN

972: --dbms_output.put_line('Not pay on receipt site');
973: p_vendor_site_record.error_record.error_status := 'E';
974: p_vendor_site_record.error_record.error_message := 'VEN_SITE_NOT_POR_SITE';
975:
976: IF dbms_sql.is_open(X_cid) THEN
977: dbms_sql.close_cursor(X_cid);
978: END IF;
979:
980: RETURN;

Line 977: dbms_sql.close_cursor(X_cid);

973: p_vendor_site_record.error_record.error_status := 'E';
974: p_vendor_site_record.error_record.error_message := 'VEN_SITE_NOT_POR_SITE';
975:
976: IF dbms_sql.is_open(X_cid) THEN
977: dbms_sql.close_cursor(X_cid);
978: END IF;
979:
980: RETURN;
981:

Line 994: IF dbms_sql.is_open(X_cid) THEN

990: --dbms_output.put_line('Not purchasing site');
991: p_vendor_site_record.error_record.error_status := 'E';
992: p_vendor_site_record.error_record.error_message := 'VEN_SITE_NOT_PURCH';
993:
994: IF dbms_sql.is_open(X_cid) THEN
995: dbms_sql.close_cursor(X_cid);
996: END IF;
997:
998: RETURN;

Line 995: dbms_sql.close_cursor(X_cid);

991: p_vendor_site_record.error_record.error_status := 'E';
992: p_vendor_site_record.error_record.error_message := 'VEN_SITE_NOT_PURCH';
993:
994: IF dbms_sql.is_open(X_cid) THEN
995: dbms_sql.close_cursor(X_cid);
996: END IF;
997:
998: RETURN;
999:

Line 1017: IF dbms_sql.is_open(X_cid) THEN

1013: p_vendor_site_record.error_record.error_message := 'TOOMANYROWS';
1014:
1015: END IF;
1016:
1017: IF dbms_sql.is_open(X_cid) THEN
1018: dbms_sql.close_cursor(X_cid);
1019: END IF;
1020:
1021: EXCEPTION

Line 1018: dbms_sql.close_cursor(X_cid);

1014:
1015: END IF;
1016:
1017: IF dbms_sql.is_open(X_cid) THEN
1018: dbms_sql.close_cursor(X_cid);
1019: END IF;
1020:
1021: EXCEPTION
1022: WHEN others THEN

Line 1023: IF dbms_sql.is_open(X_cid) THEN

1019: END IF;
1020:
1021: EXCEPTION
1022: WHEN others THEN
1023: IF dbms_sql.is_open(X_cid) THEN
1024: dbms_sql.close_cursor(X_cid);
1025: END IF;
1026: p_vendor_site_record.error_record.error_status := 'U';
1027: p_vendor_site_record.error_record.error_message := sqlerrm;

Line 1024: dbms_sql.close_cursor(X_cid);

1020:
1021: EXCEPTION
1022: WHEN others THEN
1023: IF dbms_sql.is_open(X_cid) THEN
1024: dbms_sql.close_cursor(X_cid);
1025: END IF;
1026: p_vendor_site_record.error_record.error_status := 'U';
1027: p_vendor_site_record.error_record.error_message := sqlerrm;
1028: IF (g_asn_debug = 'Y') THEN