Update Com Insert

[Claudio Volles]

Amigos, preciso novamente da ajuda de vocês.

Eu tenho um formulário de inserção de metas por produtos. A pessoa pode atualizar os dados e nessa atualização também pode fazer novas inclusões, então eu fiz o seguinte:

<%

‘Essa variável receberá o numero total de linhas que já foi inserida e que a pessoa quer editar: Ex: 5

set COUNT_SOLICITACAO= cn.Execute ("select count(solicitacao) as total_solicitacao from tb_verbas_deletar where solicitacao="&NUM_SOLICITACAO)

for i=1 to 20

valor_verba=Request.form("FORM_valor_verba"&(i))

cod_produto=Request.form("FORM_cod_produto"&(i))

nom_produto=Request.form("FORM_nom_produto"&(i))

‘ aquele valor “5” deixará apenas as 5 primeiras linhas serem atualizadas as demais deverão ser inseridas

if 1<=Count_Solicitacao then

ATUALIZA os VALORES e NOMES ‘esse está funcionando bem

Else

INSERT ‘esse não está funcionando no IF ELSE, mas o script de insert está ok.

End if

%>

Está rodando sem problemas, mas não está fazendo o INSERT

[.Andreia.]

coloca o insert porque assim não da pra entender. Voce mandou executar? tipo:

cn.Execute("insert ......................................")

[Claudio Volles]

Ai está Andréa

<%

i=1

for i=1 to 20

loop_valor_verba=Request.form("FORM_valor_verba"&(i)) 'por padrão esse valor quando ausente é 1

loop_cod_produto=Request.form("FORM_cod_produto"&(i))

loop_nom_produto=Request.form("FORM_nom_produto"&(i))

if i<=Count_Solicitacao then

UPDATE_VERBAS_DML="update tb_verbas_deletar set Tipo_Verba='"&EDITANDO_TIPO_VERBA&"',Data_BI='"&EDITANDO_DT_BI_ANO&"-"&EDITANDO_DT_BI_MES&"-"&EDITANDO_DT_BI_DIA&"',"

UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Data_Negociacao='"&EDITANDO_DT_NEG_ANO&"-"&EDITANDO_DT_NEG_MES&"-"&EDITANDO_DT_NEG_DIA&"',"

UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Data_Competencia='"&EDITANDO_DT_COMP_ANO&"-"&EDITANDO_DT_COMP_MES&"-"&EDITANDO_DT_COMP_DIA&"',"

UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Data_Vencimento='"&EDITANDO_DT_VENC_ANO&"-"&EDITANDO_DT_VENC_mes&"-"&EDITANDO_DT_VENC_DIA&"',"

UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Data_Realizacao='"&EDITANDO_DT_REALIZ_ANO&"-"&EDITANDO_DT_REALIZ_MES&"-"&EDITANDO_DT_REALIZ_DIA&"',"

UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Dia_BI="&EDITANDO_DT_REALIZ_DIA&",Mes_BI="&EDITANDO_DT_REALIZ_MES&",Ano_BI="&EDITANDO_DT_REALIZ_ANO&","

UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Num_Contrato="&EDITANDO_NUM_CONTRATO&",Valor_da_Verba=replace('"&loop_valor_verba&"',',','.'),Historico='"&EDITANDO_HSTORICO&"',Pedidos_Envolvidos='"&EDITANDO_PED_ENVOLV&"',"

UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"Produto='"&loop_nom_produto&"',Cod_Produto="&loop_cod_produto&",Forma_Pagamento='"&EDITANDO_PAGAMENTO&"',Centro_Custo='"&EDITANDO_CENTRO_CUSTO&"',"

UPDATE_VERBAS_DML=UPDATE_VERBAS_DML+"usuario='"&USUARIO_LOGADO&"',atualizado_em=getdate() where solicitacao="&EDITANDO_SOLICITACAO&" and Cod_Produto="&loop_cod_produto

set UPDATE_VERBAS = cn.Execute (UPDATE_VERBAS_DML)

else

if loop_valor_verba>1 then

INSERT_VERBA_DML="insert tb_verbas_deletar select top 1 Solicitacao,Emissao,Cod_Cliente,Cod_Rep,Nome_Cliente,CNPJ,Tipo_Verba,Data_BI,Data_Negociacao,Data_Competencia, "

INSERT_VERBA_DML=INSERT_VERBA_DML&"Data_Vencimento,Data_Realizacao,Dia_BI,Mes_BI,Ano_BI,Num_Contrato,Valor_da_Verba="&loop_valor_verba&",Historico,Pedidos_Envolvidos,Produto="&loop_nom_produto&","

INSERT_VERBA_DML=INSERT_VERBA_DML&"Cod_Produto="&loop_cod_produto&",Forma_Pagamento,Centro_Custo,Banco,Agencia,Conta,nro_raiz_cnpj,usuario,atualizado_em"

INSERT_VERBA_DML=INSERT_VERBA_DML&" from tb_verbas_deletar"

INSERT_VERBA_DML=INSERT_VERBA_DML&" where solicitacao="&EDITANDO_SOLICITACAO

set INSERT_VERBA = cn.Execute (INSERT_VERBA_DML)

end if

end if

next

%>

[.Andreia.]

não deve estar caindo nesse IF

if loop_valor_verba>1 then

da uma conferida nos valores, imprima o loop_valor_verba pra saber se é maior que 1...

pode também colocar dentro desse if um

response.write "passou"

pra certificar que passou por esse IF mesmo...

[Claudio Volles]

beleza Andréa, vou testa isso.

Claudio

Sua dica foi muito boa.

O problema era que avariável estava recebendo o numero como texto e foi só mudar isso.

Graças ao response.write "passou"

BJS

Claudio