... B A R A N E S D E C R E D I T O' Publicas:cbk:='B' Publicas:xntipo:=1 Publicas:cfe := Publicas:dFetra Publicas:cDomiprou:=' ' Publicas:cControlSal:=" " Publicas:cDomipro:=' ' Publicas:Ruta:=space(2) Publicas:Ruta1:=space(2) if cQueHago ="V" Publicas:cTota:=round((aAlias[24])->baseimpo*Publicas:resultado,2) ...