Home

Linha Microsiga Protheus

Páginas filhas
  • PLS720EV - Cálculo do Evento

Ponto-de-Entrada: PLS720EV - Cálculo do Evento
Abrangências: Microsiga Protheus 10
Versões: Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Português (Brasil) , Português (Portugal) , Espanhol , Inglês
Descrição:
Ponto de entrada para validação do usuário no momento do cálculo do evento.
Programa Fonte
PLSA720
Sintaxe

PLS720EV - Cálculo do Evento ( [ cTipoGuia ], [ cLocalExec ], [ lValorCobr ], [ lValorPagto ], [ cAlias ], [ cChaveGui ], [ lRet ], [ aRetFun ] ) --> aRetPto

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cTipoGuia Caracter Tipo de guia.
cLocalExec Array of Record Local de execução.
lValorCobr Array of Record Se há valor de cobraça
lValorPagto Array of Record Se há valor pago
cAlias Array of Record Alias corrente
cChaveGui Array of Record Chave da guia
lRet Array of Record Caso for .T. não há criticas geradas pelo sitema.
aRetFun Array of Record Array das criticas efetuadas pelo sistema.
Retorno
    aRetPto(array_of_record)
  • Array com as críticas gerada pelo usuário.
Exemplos
User Function PLS720EV()Local cTipoGuia		:=Paramixb[1] //Tipo de guiaLocal cLocalExec	:=Paramixb[2] //Local de execuçãoLocal lValorCobr	:=Paramixb[3] //Valor de cobrança	Local lValorPagto	:=Paramixb[4] //Valor PagoLocal cAlias		:=Paramixb[5] //Alias correnteLocal cChaveGui		:=Paramixb[6] //Chave da guiaLocal lRet			:=Paramixb[7] //Caso for .T. há criticas geradas pelo sitema.	Local aRetFun		:=Paramixb[8] //Array das criticas efetuadas pelo sistema. aRetPto:={}aadd(aRetPto,.T.) // Caso for Falso há criticas. aadd(aRetPto,{""   ,"Soma dos valores a cobrar dos subitens (BD7_VLRTPF) nao confere com valor do item (BD6_VLRTPF)","","","",BD6->BD6_CODPAD,BD6->BD6_CODPRO,BD6->BD6_SEQUEN})Return(aRetPto)
Variáveis
Nome Tipo Escopo Pode Alterar descrição
Array of Record Global Não