Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 5

changes.mady.by.user Julio Jose Nery Junior

Gravado em

comparado com

Nova versão 6

changes.mady.by.user Julio Jose Nery Junior

Gravado em

Chave

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

Ponto de Entrada

Descrição:Customização para Tela de CPF/CNPJ da venda
Localização:Venda Assistida (LOJA701)
Eventos:Este ponto de entrada permite omitir a tela de CPF/CNPJ e/ou incluir o retorno automático das
informações ( em substituição a tela padrão do sistema ) 
Programa Fonte:LOJXFUND
Função:LJRETCLI
Parâmetrosnenhum
Retorno:
NomeTipoDescriçãoObrigatório
aRetCli[1]caracterCódigo do ClienteSim
aRetCli[2]caracterLoja do ClienteSim
aRetCli[3]caracterCPF/CNPJSim
aRetCli[4]lógicoTela Customizada ou omitida?
Se retorno .T., o protheus não mostra
a tela padrão.
Caso .F., mesmo retornando as informações
a tela será mostrada 		Sim
aRetCli[5]caracterNome do ClienteNão
aRetCli[6]caracterEndereço do clienteNão
aRetCli[7]caracterPlaca do Carro ( somente se usa Template de Combustíveis )Não
aRetCli[8]caracterQuilometragem ( somente se usa Template de Combustíveis )Não

 

Exemplo #1

 

#include "protheus.ch"

User Function LjRetCli()
Local aRet := {"","","",.F.,"","",""}

//[1] - Código do cliente
//[2] - Loja do cliente
//[3] - CPF/CNPJ
//[4] - Logico, tela customizada no PE (se .T. não mostra a tela padrão, se .F. mostra a tela padrão)
//[5] - Nome do cliente
//[6] - Endereco do cliente
//[7] - Se usar Template de Combustiveis deve mostrar a placa do carro
//[8] - Se usar Template de Combustiveis deve mostrar a kilometragem do carro
aRet[1] := "2 "
aRet[2] := "01"
aRet[3] := "52840975483"
aRet[4] := .T.
aRet[5] := "CLIENTE 2 "
aRet[6] := "RUA XXXX,78 "
aRet[7] := "ABC-1234"
aRet[8] := "5000 Km"

Return aRet

------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------