oracle type调试

declare
  -- Non-scalar parameters require additional processing 
  p_sup_except_tbl cux_dlr_sup_except_iface_tbl := cux_dlr_sup_except_iface_tbl();
  p_single         cux_dlr_sup_except_iface_t := cux_dlr_sup_except_iface_t(116,
                                                                            'A000096',
                                                                            'Y',
                                                                            3,
                                                                            sysdate,
                                                                            sysdate,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null,
                                                                            null);
begin
  p_sup_except_tbl.extend();
  p_sup_except_tbl(1) := p_single;
  -- Call the procedure
  cux_dlr_sup_except_api_pkg.do_import(p_sup_except_tbl => p_sup_except_tbl,
                                       responsetype     => :responsetype,
                                       responsecode     => :responsecode,
                                       responsemessage  => :responsemessage);
end;