Subject MacroSubstitute
Author nairne_ulisses
Hi !!

I am with a problem. I have substitue my old objects from access at
DataBase ( RXLIB ) by IBObjects but I didn't meet similiar code for
to do:

E.g.(TRXQuery):

SQL->SELECT C.DATA_VCTO, SUM(C.VALOR_LIQUIDO) AS TOTAL
FROM
CONTAS_PAGAR C
WHERE (C.DATA_VCTO BETWEEN :pDATA_INICIAL AND :pDATA_FINAL)
AND (C.TIPO_DUPLICATA <> 'P') AND (%mFILIAL) AND (%mTIPO)
AND (% mCONTAS_PAGAR) AND (%mPAGAS)
GROUP BY C.DATA_VCTO
ORDER BY C.DATA_VCTO

With qryDespesasDias Do
Begin
Close;
If Trim(pFilial)<>'' Then
MacroByName('mFILIAL').AsString := 'Filial = 1'
Else
MacroByName('mFILIAL').AsString := '0=0';

.
.
.
If Trim(pPagas)<>'' Then
MacroByName('mPAGAS').AsString := 'Pagas=0'
Else
MacroByName('mPAGAS').AsString := '0=0'

Open;
End;

Thanks
Ulisses