Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: LJGRVTIT - Substituição da gravação dos títulos

 

Versões:Microsiga Protheus 10
Compatível Países:Todos
Sistemas Operacionais:Windows
Compatível às Bases de Dados:Todos
Idiomas:Espanhol , Inglês

 

Descrição:

Este Ponto de Entrada permite a gravação dos títulos recebidos.

Programa Fonte
.PRW
Sintaxe

LJGRVTIT - Permissão para continuidade da gravação dos títulos recebidos ( [ ExpA1 ], [ @ExpL2 ], [ ExpA3 ], [ ExpC4 ], [ ExpA5 ], [ ExpN6 ] ) --> lRet

Parâmetros:

 

 Nome  Tipo  Descrição  Default  Obrigatório  Referência 
 ExpA1  Array of Record  Descrição das formas de pagamentos.          
 ExpL2  Lógico  Retorno lógico da função principal de Gravação de Títulos        X 
 ExpA3  Array of Record  Array com os títulos carregados  {}       
 ExpC4  Caracter  cTotRecNFis - Nome do totalizador não fiscal.  ""       
 ExpA5  Array of Record  aTitImpr - Array com os titulos a serem impressos  {}       
 ExpN6  Numeric  nTroco - valor do troco .  0       

 

Retorno
lRet
    ()
  • Caso .T. executara um Return da função principal com o conteúdo do parâmetro lRet.

 

Exemplo :

 

#Include 'Protheus.ch'

User Function LJGRVTIT( aPgtos , lRet, aTitulo, cTotRecNFis , aTitImpr, nTroco)

Local _lRet := .T.

DEFAULT aPgtos := {} // Descricao das formas de pagamentos.
DEFAULT lRet := .T. // Retorno logico da funcao principal de Gravacao de Titulos
DEFAULT aTitulo := {} // Array com os titulos carregados
DEFAULT cTotRecNFis := "" // cTotRecNFis - Nome do totalizador nao fiscal.
DEFAULT aTitImpr := {} // aTitImpr - Array com os titulos a serem impressos
DEFAULT nTroco := 0 // nTroco - valor do troco .

/*
Regra de Negocio
*/

_lRet := .T. // Retorno do Ponto de Entrada


Return _lRet