Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 3

changes.mady.by.user Flavio Luiz Vicco

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Fabio Marchiori Sampaio

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Descrição

Este Ponto de Entrada permite executar alguns procedimentos específicos , no momento de ao efetuar o estorno dos documentos de transporte do cliente.

Observações

Exemplos

User

Function TMA050EXC

FunctionTMA050EXC()

Local aNfs :=

PARAMIXB1

 PARAMIXB[1]

Local lRet := PARAMIXB[2]

Local nCnt := 0

For nCnt := 1 To  Len(aNfs)

   If lRet

      MsgAlert("Docto: "+aNfs[nCnt,1]+" Serie:"+aNfs[nCnt,2]+"  Cliente: "+aNfs[nCnt,3]+" Loja: "+aNfs[nCnt,4]+" Fil.Orig: "+aNfs[nCnt,5]+"

Produto

Lote:     "  +aNfs[nCnt,

5

6], "TMA050EXC") 

           lRet := .F.

   EndIf

Next nCnt

Return Nil(lRet)

 

Preview

Veja também

Idioma

Português(Brasil)

Versões

Microsiga_Protheus10_e_Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

PARAMIXB 1, onde 1o item contém vetor contendo os documentos estornados, contendo número e série da nota, código cliente e loja e , código de produto, Filial Origem, Numero do Lote e Chave NFe.

PARAMIXB 2, Retorno Booleano. 

Retorno

NenhumBooleano

Eventos de chamada do Ponto de Entrada

Variáveis

Programa Fonte

TMSA050.PRW