[Cascavel-pm] reutilizar variaveis

Elvio Barbalho elvio.barbalho em gmail.com
Sexta Agosto 8 14:11:27 PDT 2008


Senhores boa noite tenho a seguinte instrução abaixo:

my $sth2 = $dbh->prepare("
                    Declare
                       v_msg_erro        VARCHAR (150);
                    BEGIN
                    GNVBILLCANCEL.CREATEREBILLFORCUSTOMER(?,?);
                    GNVGEN.GNVCOMMIT;
                    COMMIT;
                    EXCEPTION WHEN OTHERS THEN
                     v_msg_erro := SUBSTR (SQLERRM, 1, 100);
                     INSERT      /*+APPEND*/INTO
extract.ope_analise_controle_erro (customer_ref, account_num, data_insert,
cod_erro, ds_erro)
                  VALUES (?, null,SYSDATE,'CANCEL_FAT',
'CREATEREBILLFORCUSTOMER: '||v_msg_erro);
                COMMIT;
                    END;") or die("nao foi possivel preparar o comando: ",
$dbh->errstr(), "\n");
                $sth2->bind_param( 1, $customer);
                $sth2->bind_param(2, $descicao);
                $sth2->execute() or die ("Nao foi possivel executar o
comando:", $sth->errstr(),"\n");




no insert INSERT      /*+APPEND..........* *o primeiro campo a ser inserido
e o conteudo armazenado em *$sth2->bind_param( 1, $customer);* que tambem é
utilizado em *"GNVBILLCANCEL.**CREATEREBILLFORCUSTOMER(?,?);"* tenho que
declara-lo ($sth2->bind_param( 3, $customer); novamente para utiliza-lo no
insert??????? nao teria uma forma de utilizar $sth2->bind_param( 1,
$customer); que ja esta declarado????????
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20080808/75ea3866/attachment.html>


Mais detalhes sobre a lista de discussão Cascavel-pm