- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- WebServices (Integração)
- Dúvida webservice
Perguntas Dúvida webservice
- rlajunior
- Autor do Tópico
- Desconectado
- Membro Júnior
Menos
Mais
- Postagens: 24
- Obrigados Recebidos: 0
8 anos 2 meses atrás - 8 anos 2 meses atrás #31034
por rlajunior
Dúvida webservice foi criado por rlajunior
Foi pedido onde eu trabalho para criar um webservice para retornar um pedido de venda que já foi excluído, no caso eles iriam me passar o número do pedido e o webservice faria o resto, através do audit trail percebi que as tabelas que são alteradas são essas SB2, SC5 e SC6.
Através desses Updates direto no banco consigo voltar o pedido, mas como sou novo em programação ADVPL e vi muito pouco de webservice estou com algumas dificuldades, se alguém pude me dar uma luz aí agradeceria muito.
O sql básico para retornar é esse abaixo:
UPDATE SB2010
SET B2_QPEDVEN = B2_QPEDVEN + C6_QTDVEN
FROM SB2010, SC6010
WHERE C6_NUM = '00000' AND B2_COD = C6_PRODUTO AND B2_LOCAL = C6_LOCAL AND SC6010.D_E_L_E_T_ = '*'
UPDATE SC5010
SET D_E_L_E_T_ = '',
C5_DTLANC = ''
WHERE C5_NUM = '00000' AND D_E_L_E_T_ = '*'
UPDATE SC6010
SET D_E_L_E_T_ = ''
WHERE C6_NUM = '00000' AND D_E_L_E_T_ = '*'
Através desses Updates direto no banco consigo voltar o pedido, mas como sou novo em programação ADVPL e vi muito pouco de webservice estou com algumas dificuldades, se alguém pude me dar uma luz aí agradeceria muito.
O sql básico para retornar é esse abaixo:
UPDATE SB2010
SET B2_QPEDVEN = B2_QPEDVEN + C6_QTDVEN
FROM SB2010, SC6010
WHERE C6_NUM = '00000' AND B2_COD = C6_PRODUTO AND B2_LOCAL = C6_LOCAL AND SC6010.D_E_L_E_T_ = '*'
UPDATE SC5010
SET D_E_L_E_T_ = '',
C5_DTLANC = ''
WHERE C5_NUM = '00000' AND D_E_L_E_T_ = '*'
UPDATE SC6010
SET D_E_L_E_T_ = ''
WHERE C6_NUM = '00000' AND D_E_L_E_T_ = '*'
Ultima edição: 8 anos 2 meses atrás por rlajunior.
Por favor Acessar ou Registrar para participar da conversa.
- rlajunior
- Autor do Tópico
- Desconectado
- Membro Júnior
Menos
Mais
- Postagens: 24
- Obrigados Recebidos: 0
8 anos 2 meses atrás #31043
por rlajunior
Respondido por rlajunior no tópico Dúvida webservice
Pessoal, segundo eu pesquisei e li vi que poderia usar a função TCSQLExec, mas ainda estou com dúvidas como colocar esse update usando essa função se puderam me ajudar ?
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- WebServices (Integração)
- Dúvida webservice
Tempo para a criação da página:0.063 segundos