Ir para conteúdo
Fórum Script Brasil
  • 0

Update Com Insert


Claudio Volles

Pergunta

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

Link para o comentário
Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

  • 0

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

%>

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,4k
×
×
  • Criar Novo...