Histórico da Página

Ponto de entrada para validação do usuário no momento do cálculo do evento.

PLSA720

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

aRetPto(array_of_record)
• Array com as críticas gerada pelo usuário.

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)