MMCria

Criar o objeto para tratamento das rotinas de multimoeda;

Sintaxe: MMCria();

Exemplo:

Definir Alfa vMoeEmp;

Definir Alfa vRetAlf;

MMCria();

MMBuscaDados("MOEEMP",VMoeEmp,VRetNum);

Se (E301Tcr.CodMoe <> VMoeEmp)

Inicio

MMParametrosCarga("CODMOE",E301Tcr.CodMoe,0);

MMParametrosCarga("DATBAS","",EDatBas);

MMParametrosCarga("DATEMI","",E301Tcr.DatEmi);

MMParametrosCarga("DATPGT","",EDatBas);

MMParametrosCarga("VLRBAS","",E301Tcr.VlrAbe);

MMExecuta();

MMBuscaDados("VlrCor",VRetAlf,FVlrCor);

MMBuscaDados("VlrOde",VRetAlf,FVlrOde);

Fim;

MMLibera();

Utilização da Função (dependentes): Nenhum dependente.

Observações: Não esquecer de liberar depois MMLibera();

PORTAL DE DOCUMENTAÇÃO
Gestão Empresarial \| ERP - versão 5.10.3 (XTended)