my $sth = $self->prepare( q{
	begin pkg_abcdef.pr_setAbcdef(
	   :in_sourceType,
	   :in_sourceNames,
	   :in_peerTypes,
	   :in_peerNames,
	   :in_writables,
	   :in_requireLevels,
	   :in_testdefs
	 );
	end;
} );

$sth->bind_param( ':in_sourceType',    $sourceType,    
	{ ora_type => ORA_VARCHAR2       } );
$sth->bind_param( ':in_sourceNames',   $sourceNames,   
	{ ora_type => ORA_VARCHAR2_TABLE } );
$sth->bind_param( ':in_peerTypes',     $peerTypes,     
	{ ora_type => ORA_VARCHAR2_TABLE } );
$sth->bind_param( ':in_peerNames',     $peerNames,     
	{ ora_type => ORA_VARCHAR2_TABLE } );
$sth->bind_param( ':in_writables',     $writables,     
	{ ora_type => ORA_VARCHAR2_TABLE } );
$sth->bind_param( ':in_requireLevels', $requireLevels, 
	{ ora_type => ORA_VARCHAR2_TABLE } );
$sth->bind_param( ':in_testdefs',      $testDefs,      
	{ ora_type => ORA_VARCHAR2_TABLE } );

$sth->execute();