my $respCodes = $processor->delayedCapture( 
           CCTYPE => $row->{debitacct},                                                         
           ORIGID => $row->{auth_code},
           CURRENCY_TYPE_ID => $row->{currency_type_id} );

croak "Failed authorization for TXID $row->{txid} " 
   unless ( $respCodes->{SUCCESS} == 1 );