Pular para o conteúdo
Início » Advpl FinNatRea

Advpl FinNatRea

Advpl FinNatRea

Tipo: Processamento e Planilha

Retorna o valor realizado da Natureza.

Sintaxe

FinNatRea(cNatureza,dData1,dData2,nMoeda)

Parâmetros

cNatureza – Natureza a ser pesquisada

dData1 – Data Inicial para cálculo

dData2 – Data Final de cálculo

nMoeda – Moeda de saída

Exemplo

FinNatRea(“R001”,CtoD(“01/01/98”),dDataBase,1)

aAdd(aL,”+—————————————————————+”)

aAdd(aL,”|XXXXXXXX Relatorio de Teste Pagina: XXXXX|”)

aAdd(aL,”+————+————————————+————+”)

aAdd(aL,”| CODIGO | DESCRICAO | PRECO |”)

aAdd(aL,”+————+————————————+————+”)

aAdd(aL,”| XXXXXXX | XXXXXXXXXXXXXXXXXXXXXX | XXXXXX |”)

aAdd(aL,”+————+————————————+————+”)

nLim:= 80 // Relatorio de 80 colunas

nLi:= 60

nPg:= 1

dbSelectArea(“SB1”)

dbGoTop()

While !EOF()

If nLi > 55

nLi := 0

FmtLin({},aL[1],,,@nLi,.T.,nLim)

FmtLin({dDataBase,nPg},aL[2],,,@nLi,.T.,nLim)

FmtLin({},aL[3],,,@nLi,.T.,nLim)

FmtLin({},aL[4],,,@nLi,.T.,nLim)

FmtLin({},aL[5],,,@nLi,.T.,nLim)

nPg := nPg + 1

Endif

aDados := {}

aAdd(aDados,Subs(B1_COD,1,7))

aAdd(aDados,Subs(B1_DESC,1,22))

Estude para provas de certificações em TI com os simulados Bynem

Veja também: