Árvore de páginas

Descrição:

Este ponto de entrada é executado ao realizar um cancelamento de venda de Vale Presente ou Vale Crédito no TOTVS PDV, desde que esteja configurado para impressão de cupom não fiscal através do parâmetro MV_LJVPCNF (DT_MV_LJVPCNF).


Exemplo:


//Exemplo abaixo é apresentado apenas uma mensagem ao usuário
User Function STRelCanVc()



Local cFilVen   := PARAMIXB[1] // Filial da venda L1_FILIAL
Local cNroVen   := PARAMIXB[2] // Numero da venda L1_NUM
Local aArea     := GetArea() // Armazena a area

dbSelectArea('SL1')
SL1->(dbSetOrder(1))
If SL1->(dbSeek(cFilVen+cNroVen))
    MsgInfo('A venda foi cancelada com sucesso - Doc. Nao Fiscal: ' + SL1->L1_DOCPED + ' Serie Nao Fiscal: ' + SL1->L1_SERPED)
EndIf

RestArea(aArea)

Return .T.


Versão:Microsiga Protheus 12
Parâmetros:


PARAMIXB[1] → Filial (L1_FILIAL)

PARAMIXB[2] → Numero da venda (L1_NUM)


Retorno:Não há.
Programa fonte:STWCancelSale.prw