Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Bruno Luiz de Souza Almeida

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Alberto Deviciente

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin

Ponto de entrada: STFinishSale_Possibilita gravação de arquivos complementares - TOTVS PDV

Descrição:

Possibilitar a gravação de arquivos complementares. O ponto de entrada é executado após o fechamento do cupom e da venda.

Programa Fonte:

STBPayment.prw

Função:

A função não recebe parâmetros.
STFinishSale()
Parâmetros:
ParâmetroTipoDescrição
PARAMIXB[1]CarácterFilial (L1_FILIAL)
PARAMIXB[2]CarácterNúmero do Orçametno (L1_NUM)
PARAMIXB[3]CarácterNúmero do Cupom Fiscal (L1_SERIE)
PARAMIXB[4]CarácterSérie do Cupom Fiscal (L1_DOC)

PARAMIXB[5]


* Informações integração com SIGACRD

Array

[1] - Número do Cartão Fidelidade

[2] - CPF / CNPJ do Cliente

[3] - Código do Cliente

[4] - Loja do Cliente

Retorno:

A função não precisa retornar nenhum valor.

Observação:Não é recomendado a utilização desse ponto de entrada para alterar as tabelas SL1, SL2 e/ou SL4, pois no ponto que esta localizado o ponto de entrada a venda já subiu para a retaguarda e não ira subir novamente.
Exemplo:

User Function STFinishSale

Local cFil := PARAMIXB[1]

Local cNum := PARAMIXB[2]

Local cDoc := PARAMIXB[3]

Local cSerie := PARAMIXB[4]

If ValType("cFil") <> "U"

    MsgInfo("Filial = " + cFil + ", Número = " + cNum + ", Doc = " + cDoc + ", Série = " + cSerie )

Else

    MsgInfo("Filial inexistente.")

EndIf    

Return nil