Devido à descontinuação da versão 5.10.3, que ocorrerá em 30/09/2025, informamos que este manual não receberá atualizações a partir desta data. Para mais informações sobre a evolução do Gestão Empresarial | ERP, acesse a documentação sobre a PCVV - Política do Ciclo de Vida das Versões.

Informamos que as funcionalidades da Reforma Tributária estão disponíveis apenas a partir da versão 5.10.4 do Gestão Empresarial.
Acesse o Portal de Exigências Legais da Senior para saber como preparar o seu negócio!

LeMemListSaldosMensaisMoeda

Esta função lê uma lista em memória criada no Fechamento de Saldos da Tesouraria, retornando os valores dos saldos na moeda da conta.

Sintaxe: Funcao LeMemListSaldosMensaisMoeda(Numero pPos,Numero End pFim,Numero End p0,Numero End p1,Numero End p2,Numero End p3,Numero End p4,Numero End p5,Numero End p6,Numero End p7,Numero End p8,Numero End p9,Numero End pa,Numero End pb);

Parâmetros:

Nome Tipo Descrição
pPos Numero Posição inicial da lista a ser lida.
pFim Numero Posição final a ser lida na lista.
p0 Numero  
p1 Numero  
p2 Numero  
p3 Numero  
p4 Numero  
p5 Numero  
p6 Numero  
p7 Numero  
p8 Numero  
p9 Numero  
pa Numero  
pb Numero  

Exemplo:

Definir Alfa VHisMov[30];
Definir Alfa VCodTns[05];
Definir Alfa VDebCre[01];
Definir Alfa VSitMcc[01];

se (IniciouRel = 0)
{
IniciouRel = 1;
PosMemListMes = 0;
FimMemListMes = 0;
PosMemListMcc = 0;
FimMemListMcc = 0;

LeMemListSaldosMensais(PosMemListMes, FimMemListMes, FDatCmp, FSAnMes, FSAnCal, FSAnDif, FSCrMes, FSCrCal, FSCrDif, FSDeMes,
FSDeCal, FSDeDif, FSMeMes, FSMeCal, FSMeDif);
LeMemListSaldosMensaisMoeda(PosMemListMes, FimMemListMes, FSAnMem, FSAnCam, FSAnDim, FSCrMem, FSCrCam, FSCrDim, FSDeMem,
FSDeCam, FSDeDim, FSMeMem, FSMeCam, FSMeDim);

enquanto (FimMemListMes = 0)
{
ListaSecao("Adicional_Cabecalho_Mes");
ListaSecao("Adicional_Mes");
PosMemListMes++;
DatCmp = FDatCmp;

LeMemListMovimentosMensais(PosMemListMcc, FimMemListMcc, DatCmp, FDatPer, FSeqMov, VCodTns, VHisMov, FVlrMov, VDebCre,
FSalCal, VSitMcc);
LeMemListMovimentosMensaisMoeda(PosMemListMcc, FimMemListMcc, FVlrMoe, FSalCmo, FVlrMol, FSalCml);
PosMemListMcc++;
se ((FimMemListMcc = 0) e (FDatCmp = DatCmp))
ListaSecao("Adicional_Cabecalho_Mcc");

enquanto ((FDatCmp = DatCmp) e (FimMemListMcc = 0))
{
ListaSecao("Adicional_Mcc");
PosMemListMcc++;
LeMemListMovimentosMensais(PosMemListMcc, FimMemListMcc, DatCmp, FDatPer, FSeqMov, VCodTns, VHisMov, FVlrMov, VDebCre,
FSalCal, VSitMcc);
LeMemListMovimentosMensaisMoeda(PosMemListMcc, FimMemListMcc, FVlrMoe, FSalCmo, FVlrMol, FSalCml);
}
LeMemListSaldosMensais(PosMemListMes, FimMemListMes, FDatCmp, FSAnMes, FSAnCal, FSAnDif, FSCrMes, FSCrCal, FSCrDif,
FSDeMes, FSDeCal, FSDeDif, FSMeMes, FSMeCal, FSMeDif);
LeMemListSaldosMensaisMoeda(PosMemListMes, FimMemListMes, FSAnMem, FSAnCam, FSAnDim, FSCrMem, FSCrCam, FSCrDim, FSDeMem,
FSDeCam, FSDeDim, FSMeMem, FSMeCam, FSMeDim);
}

Observações: O relatório que utiliza esta função só funcionará através do Fechamento de Saldos da Tesouraria, e utilizando a função em conjunto com a LeMemListSaldosMensais.

Este artigo ajudou você?