This repository has been archived on 2024-11-29. You can view files and clone it, but cannot push or open issues or pull requests.
Tecsitel_FactuGES/Libreria/Constantes.pas

103 lines
3.2 KiB
ObjectPascal
Raw Normal View History

{
===============================================================================
Copyright (<EFBFBD>) 2002. Rodax Software.
===============================================================================
Los contenidos de este fichero son propiedad de Rodax Software titular del
copyright. Este fichero s<EFBFBD>lo podr<EFBFBD> ser copiado, distribuido y utilizado,
en su totalidad o en parte, con el permiso escrito de Rodax Software, o de
acuerdo con los t<EFBFBD>rminos y condiciones establecidas en el acuerdo/contrato
bajo el que se suministra.
-----------------------------------------------------------------------------
Web: www.rodax-software.com
===============================================================================
Fecha primera versi<EFBFBD>n: 03-11-2002
Versi<EFBFBD>n actual: 1.0.2
Fecha versi<EFBFBD>n actual: 18-03-2004
===============================================================================
Modificaciones:
Fecha Comentarios
---------------------------------------------------------------------------
27-04-2004 A<EFBFBD>adidas constantes para representar colores en los grids.
18-03-2004 A<EFBFBD>adida constante IVA
===============================================================================
}
unit Constantes;
interface
uses
Graphics;
const
COLOR_FACTURADO = clBlue;
COLOR_PAGADO = clBlue;
COLOR_ABONO = clRed;
COLOR_ACEPTADO = clBlue;
COLOR_ANULADO = clRed;
COLOR_RECIBIDO = clGreen;
COLOR_ETIQUETADO = clGreen;
COLOR_NOETIQUETADO = clRed;
COLOR_NEGATIVO = clRed;
COLOR_POSITIVO = clBlack;
COLOR_PORCENTAJENEG = clRed;
COLOR_PORCENTAJEPOS = clBlue;
ANCHO_LOGO_INF = 60;
ANCHO_LOGO_INF_PRE = 282;
CTE_NOETIQUETAR = 0;
CTE_ETIQUETAR = 1;
////////////////////////////////////////////////////////////////////////////////
// Estad<61>sticas
////////////////////////////////////////////////////////////////////////////////
CTE_TOP = 5;
CTE_MENSUAL = 12;
CTE_TRIMESTRAL = 4;
CTE_SEMESTRAL = 2;
resourcestring
////////////////////////////////////////////////////////////////////////////////
// Comunes
////////////////////////////////////////////////////////////////////////////////
CTE_IVA = '16';
CTE_TODOS = 'Todos';
CTE_ANO = 'ANO';
DISPLAY_EUROS2 = '#,0.00 <20>';
DISPLAY_EUROS4 = '#,0.0000 <20>';
EDIT_EUROS2 = '0.00';
EDIT_EUROS4 = '0.0000';
DISPLAY_DTO = '0.00';
EDIT_DTO = '#.##';
DISPLAY_IVA = '0.00';
EDIT_IVA = '#.##';
MASK_FECHA = '!99/99/0000;1; ';
DISPLAY_PORCENTAJE = '#,0.00 %';
CTE_SEPSERIADO = '/';
CTE_SEPSERIADO2 = '';
CTE_DOC = '.doc';
////////////////////////////////////////////////////////////////////////////////
// Presupuestos
////////////////////////////////////////////////////////////////////////////////
CTE_ACEPTADO = 'ACEPTADO';
CTE_ANULADO = 'ANULADO';
CTE_PENDIENTE = 'PENDIENTE';
////////////////////////////////////////////////////////////////////////////////
// Estad<61>sticas
////////////////////////////////////////////////////////////////////////////////
CTE_CAMPO1 = 'NFILA';
CTE_CAMPO2 = 'TITINTERVALO';
CTE_ING = 'Ingresos';
CTE_GAS = 'Gastos';
CTE_BEN = 'Beneficios';
implementation
end.