Repaso a mensajes de warnings y hints
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@960 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
parent
56b18d02d7
commit
86f045c09a
@ -296,9 +296,9 @@ end;
|
||||
|
||||
procedure TControllerDetallesBase.CalculoDetalleDescuento(
|
||||
DataTable: TDADataTable; var ImporteAcumulado, ImporteTotal: Double);
|
||||
var
|
||||
{var
|
||||
ImporteDto : Double;
|
||||
Redondeado : Double;
|
||||
Redondeado : Double;}
|
||||
begin
|
||||
//Este metodo calcula el descuento por capitulo que no se activa para tecsitel
|
||||
{ with DataTable do
|
||||
|
||||
@ -155,7 +155,7 @@ var Data:THandle;
|
||||
p : pointer;
|
||||
Count, i : integer;
|
||||
Buffer : array[0..MAX_PATH] of Char;
|
||||
AList : TStringLIst;
|
||||
// AList : TStringLIst;
|
||||
begin
|
||||
|
||||
{ AList := TStringList.Create;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user