Home

Welcome to the PL-SQL wiki! PROCEDURE sp_test_save_pnr AS p_reservations nt_reservations := nt_reservations (); p_customers nt_customers := nt_customers (); p_contact_info nt_contact_info := nt_contact_info (); p_segments nt_segments := nt_segments (); p_seat_assignments nt_seat_assignments := nt_seat_assignments (); p_station_pax nt_station_pax := nt_station_pax (); p_inventory nt_inventory := nt_inventory (); p_res_payments nt_res_payments := nt_res_payments (); p_res_charges nt_res_charges := nt_res_charges (); p_res_payment_map nt_res_payment_map := nt_res_payment_map (); p_res_comments nt_res_comments := nt_res_comments (); p_apis_info nt_apis_info := nt_apis_info (); p_dest_contact nt_dest_contact := nt_dest_contact (); p_res_history nt_res_history := nt_res_history (); p_res_history_conversion nt_res_history := nt_res_history (); p_res_pmt_due_date nt_res_pmt_due_date := nt_res_pmt_due_date (); p_ar_receivable nt_ar_receivable := nt_ar_receivable (); p_ar_detail nt_ar_detail := nt_ar_detail (); p_set_no_fly nt_set_no_fly := nt_set_no_fly (); P_unassigned_seats_count NUMBER; p_success VARCHAR2 (50); p_error_code VARCHAR2 (50); p_error_msg VARCHAR2 (500); BEGIN -- For the timne being only reservations input collection is passed to the main procedure. -- For debugging extend and assign values to each of the collection. p_reservations.EXTEND; p_reservations (1) := ty_reservations (NULL, --p_needs_pricing '299 ', --p_series 'WXHECT', --p_confirmation_num '', --p_crscode 'STANDARD', --p_res_type '0', --p_stat NULL, --p_exp_date NULL, --p_book_date 'lijin.gopalan', --p_create_by NULL, --p_last_modified '', --p_travel_id NULL, --p_change_state, NULL, --p_res_lock, NULL, --p_res_lock_date, NULL, --p_base_currency, NULL, --p_res_lock_user, 'USD', --p_res_currency NULL, --p_corporation_id NULL, --p_web_booking_id, '', --p_historic_conf, NULL, --p_web_profileid, NULL, --p_promotion_id, NULL, --p_receipt_lang_id, '0', --p_gds_control NULL, --p_created_date NULL, --p_value_package_data NULL, --p_last_load_guid NULL, --p_pnr_identification_number '', --p_fulfillment_req_by '0', --p_res_fulfillment_override '0'); --p_incl_comm_in_chg sp_save_pnr_main (p_reservations, p_customers, p_contact_info, p_segments, p_seat_assignments, p_station_pax, p_inventory, p_res_payments, p_res_charges, p_res_payment_map, p_res_comments, p_apis_info, p_dest_contact, p_res_history, p_res_history_conversion, p_res_pmt_due_date, p_ar_receivable, p_ar_detail, p_set_no_fly, 1, p_unassigned_seats_count, p_success, p_error_code, p_error_msg);

  DBMS_OUTPUT.PUT_LINE ('p_success = ' || p_success);
  DBMS_OUTPUT.PUT_LINE ('p_error_code = ' || p_error_code);
  DBMS_OUTPUT.PUT_LINE ('p_error_msg = ' || p_error_msg);
  DBMS_OUTPUT.PUT_LINE (
     'p_unassigned_seats_count = ' || p_unassigned_seats_count);

END sp_test_save_pnr;