Função RecMoeda
Rotina de verIficacao de valor da moeda em detrminada data
nExp1:= RecMoeda(dExp1,cExp1)
nExp1:= Retorna valor da moeda solicitada
dExp1:= Data recebida para posicionamento no Arq. de Moeda
cExp1:= Moeda a qual deseja-se verIficar o valor
1 2 3 4 |
Local dData := dDatabase Local cMoeda := "02" RecMoeda(dData,cMoeda) |