Histórico da Página
...
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: GPE210LOG - Adiciona Dados no Array aLog
Descrição: Permite a manipulação das informações do Array aLog, bem como adicionar registros. Eventos Este Ponto de Entrada é chamado dentro do for da leitura que é feita linha a linha dos registros do arquivo que está sendo importado, após o funcionário ter sido adicionado no log de funcionários importados.
Programa Fonte GPEA210.PRX Sintaxe GPE210LOG - Adiciona Dados no Array aLog ( [ aLog ] ) --> aLog Parâmetros:
Retorno aLog
Exemplos No exemplo abaixo, a cada registro adicionado no log, soma o total do valor na variável nTotalHrs. Quando chegar no último registro, adiciona um terceiro elemento no array aLog com este total.#INCLUDE 'RWMAKE.CH'USER FUNCTION GPE210LOG()Local nFilial := cCodFil Local cMat := cMatric Local cNome := cNome Local nVerba := cVerba Local cDescVerba:=fDesc("SRV",nVerba,"RV_DESC",20) Local nHoras := Val(cHoras) Local nValor := Val(cValor) Local nTotalHrs := 0 Local cLog := "" If nValor > 0 nTotalhrs += nValor EndIf If nRegis == nLinhas cLog := oEmToAnsi("TOTAL") Aadd(aTitle,cLog) Aadd(aLog,{}) Aadd(aLog[3],Transform(nTotalHrs,"@E 999,999,999.99" )) EndIfReturn (aLog) Variáveis
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas