By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
455,841 Members | 1,390 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 455,841 IT Pros & Developers. It's quick & easy.

DBI: Array bind is supported only for ORA_TABLE types.

P: 1
I have a script that runs in my DEV and PROD environment, but for some reason on my TEST server, I am getting the following error:

Array bind is supported only for ORA_TABLE types. Unable to bind ':p1'. at ./xmlimport.pl line 973.
Issuing rollback() for database handle being DESTROY'd without explicit disconnect().
The script's function is to read from an XML file and load the data to an Oracle table. I believe this error is actually caused by the environment, not sure what yet, but I have checked the DBI and DBD version against our PROD server and they are matched.

I am running the script against the exact same XML file to rule out the XML file itself. The script on TEST is the same as on PROD.

My main question is if DBI doesn't think that my bind is against an ORA_TABLE type, how can I find out what it thinks I'm trying to bind to? Also, does anyone have a clue as to what I can do to debug this. I have run through the debugger and done everything I know how to do, but I'm at a loss for why this error would happen.

I'm going to include the relevant (hopefully) lines of code below.

Line 973 is the line that has $event_id right after $ir_insert_st->execute(:

Expand|Select|Wrap|Line Numbers
  1. my $INVITATION_REQUESTS_INSERT_ST01 =
  2.  
  3. "
  4. insert into invitation_requests
  5.  
  6.     (
  7.  
  8.         EVENT_ID,
  9.  
  10.         EVENT_TYPE_DESC,
  11.  
  12.         EVENT_START_DATE,
  13.  
  14.         EVENT_STATUS_TYPE,
  15.  
  16.         EVENT_VENUE,
  17.  
  18.         EVENT_VENUE_ADDR1,
  19.  
  20.         EVENT_VENUE_ADDR2,
  21.  
  22.         EVENT_VENUE_ADDR3,
  23.  
  24.         EVENT_VENUE_CITY,
  25.  
  26.         EVENT_VENUE_STATE,
  27.  
  28.         EVENT_VENUE_ZIP,
  29.  
  30.         EVENT_OWNER_ID,
  31.  
  32.         EVENT_OWNER_PREFIX,
  33.  
  34.         EVENT_OWNER_FIRST_NAME,
  35.  
  36.         EVENT_OWNER_MIDDLE_NAME, 
  37.  
  38.         EVENT_OWNER_LAST_NAME,
  39.  
  40.         EVENT_OWNER_SUFFIX,
  41.  
  42.         EVENT_OWNER_PHONE,
  43.  
  44.         EVENT_OWNER_RBG, 
  45.  
  46.         EVENT_OWNER_REGION,
  47.  
  48.         EVENT_OWNER_DISTRICT,
  49.  
  50.         EVENT_OWNER_TERRITORY,
  51.  
  52.         EVENT_DELIVERY_SEQ,
  53.  
  54.         EVENT_DELIVERY_STATUS,
  55.  
  56.         EVENT_TALK_TITLE_ID,
  57.  
  58.         EVENT_TALK_TITLE,
  59.  
  60.         EVENT_TOPIC_ID,
  61.  
  62.         EVENT_TOPIC_NAME,
  63.  
  64.         EVENT_SPEAKER_ID, 
  65.  
  66.         EVENT_SPEAKER_PREFIX,
  67.  
  68.         EVENT_SPEAKER_FIRST_NAME,
  69.  
  70.         EVENT_SPEAKER_MIDDLE_NAME  ,
  71.  
  72.         EVENT_SPEAKER_LAST_NAME,
  73.  
  74.         EVENT_SPEAKER_SUFFIX,
  75.  
  76.         EVENT_SPEAKER_PROF_DESIG, 
  77.  
  78.         EVENT_SPEAKER_BIO,
  79.  
  80.         EVENT_SPEAKER_ADDR1,
  81.  
  82.         EVENT_SPEAKER_ADDR2,
  83.  
  84.         EVENT_SPEAKER_ADDR3,
  85.  
  86.         EVENT_SPEAKER_CITY,
  87.  
  88.         EVENT_SPEAKER_STATE,
  89.  
  90.         EVENT_SPEAKER_ZIP,
  91.  
  92.         EVENT_JDE_NUMBER,
  93.  
  94.         EVENT_SUB_LEDGER,
  95.  
  96.         EVENT_PROCESS_TS 
  97.  
  98.     )
  99.  
  100.     values
  101.  
  102.     (
  103.  
  104.         ?, ?, to_date(?, 'YYYY-MM-DD HH24:MI:SS'), ?, ?, ?, ?, ?, ?, ?,
  105.  
  106.         ?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
  107.  
  108.         ?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
  109.  
  110.         ?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
  111.  
  112.         ?, ?, ?, ?, SYSDATE
  113.  
  114.     )
  115.  
  116. ";
  117.     my $ir_insert_st            = $db_handle->prepare($INVITATION_REQUESTS_INSERT_ST01);
  118.  
  119. /*RETRIEVES THE DATA FROM XML*/
  120.  
  121.                                               $ir_insert_st->execute(
  122.  
  123.                 $event_id,
  124.  
  125.                 $event_type_desc,
  126.  
  127.                 "$event_start_date $event_start_time",
  128.  
  129.                 $event_status_type,
  130.  
  131.                 $event_venue,
  132.  
  133.                 $event_venue_addr1,
  134.  
  135.                 $event_venue_addr2,
  136.  
  137.                 $event_venue_addr3,
  138.  
  139.                 $event_venue_city,
  140.  
  141.                 $event_venue_state,
  142.  
  143.                 $event_venue_zip,
  144.  
  145.                 $event_owner_id,
  146.  
  147.                 $event_owner_prefix,
  148.  
  149.                 $event_owner_first_name,
  150.  
  151.                 $event_owner_middle_name,
  152.  
  153.                 $event_owner_last_name,
  154.  
  155.                 $event_owner_suffix,
  156.  
  157.                 $event_owner_phone,
  158.  
  159.                 $event_owner_rbg,
  160.  
  161.                 $event_owner_region,
  162.  
  163.                 $event_owner_district,
  164.  
  165.                 $event_owner_territory,
  166.  
  167.                 $event_delivery_seq,
  168.  
  169.                 $event_delivery_status,
  170.  
  171.                 $event_talk_title_id,
  172.  
  173.                 $event_talk_title,
  174.  
  175.                 $event_topic_id,
  176.  
  177.                 $event_topic_name,
  178.  
  179.                 $event_speaker_id,
  180.  
  181.                 $event_speaker_prefix,
  182.  
  183.                 $event_speaker_first_name,
  184.  
  185.                 $event_speaker_middle_name,
  186.  
  187.                 $event_speaker_last_name,
  188.  
  189.                 $event_speaker_suffix,
  190.  
  191.                 $event_speaker_prof_desig,
  192.  
  193.                 $event_speaker_bio,
  194.  
  195.                 $event_speaker_addr1,
  196.  
  197.                 $event_speaker_addr2,
  198.  
  199.                 $event_speaker_addr3,
  200.  
  201.                 $event_speaker_city,
  202.  
  203.                 $event_speaker_state,
  204.  
  205.                 $event_speaker_zip,
  206.  
  207.                 $event_jde_number,
  208.  
  209.                 $event_sub_ledger
  210.  
  211.             );
Mar 28 '08 #1
Share this Question
Share on Google+
1 Reply


KevinADC
Expert 2.5K+
P: 4,059
You might want to take this question over to www.perlmonks.com
Mar 28 '08 #2

Post your reply

Sign in to post your reply or Sign up for a free account.