Uecko/AbetoDesign_FactuGES2
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
21fc34c32f
AbetoDesign_FactuGES2/Source/Modulos/Facturas de cliente/Data/uDataModuleFacturasCliente.dfm
roberto 21fc34c32f Versión 2.6.3 
Tareas #722: Repasar formas de pago porque falla al cogerlas
Tareas #750: Poder facturar varios albaranes en una misma factura
Tareas #958: El informe resumen de recibos de graden no sale bien cuando son varias páginas
Tareas #1205: Que se guarde en albaran de cliente el contrato del que parte si parte.
Tareas #1209: Meter en el campo cliente final tambien el facturas de cliente
Tareas #1262: Revisar forma de pago de factura para que salga la descripción de la forma de pago al igual que en presupuestos y contratos
Tareas #1272: En la lista de facturas añadir referencia del cliente
Tareas #1273: Cuando generas una factura a partir de un contrato, te avisara de alguna forma si ya tiene factura asociada para no facturarlo dos veces

git-svn-id: https://192.168.0.254/svn/Proyectos.AbetoDesign_FactuGES/trunk@85 93f398dd-4eb6-7a46-baf6-13f46f578da2
2013-10-24 15:51:37 +00:00

502 lines
15 KiB
Plaintext
Raw Blame History

inherited DataModuleFacturasCliente: TDataModuleFacturasCliente
OnCreate = DAClientDataModuleCreate
Height = 398
Width = 518
object RORemoteService: TRORemoteService
Message = dmConexion.ROMessage
Channel = dmConexion.ROChannel
ServiceName = 'srvFacturasCliente'
Left = 48
Top = 24
end
object rda_FacturasCliente: TDARemoteDataAdapter
DataStreamer = Bin2DataStreamer
GetSchemaCall.RemoteService = RORemoteService
GetDataCall.RemoteService = RORemoteService
UpdateDataCall.RemoteService = RORemoteService
GetScriptsCall.RemoteService = RORemoteService
RemoteService = RORemoteService
Left = 51
Top = 143
end
object Bin2DataStreamer: TDABin2DataStreamer
Left = 48
Top = 80
end
object tbl_FacturasCliente: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_FACTURAS_CLIENTE_ID'
Required = True
ServerAutoRefresh = True
DictionaryEntry = 'FacturasCliente_ID'
InPrimaryKey = True
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'FacturasCliente_ID_EMPRESA'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 20
DisplayLabel = 'Referencia'
DictionaryEntry = 'FacturasCliente_REFERENCIA'
end
item
Name = 'TIPO'
DataType = datString
Size = 1
DisplayLabel = 'Tipo'
DictionaryEntry = 'FacturasCliente_TIPO'
end
item
Name = 'ID_COMISION_LIQUIDADA'
DataType = datInteger
DictionaryEntry = 'FacturasCliente_ID_COMISION_LIQUIDADA'
end
item
Name = 'FECHA_FACTURA'
DataType = datDateTime
DisplayLabel = 'Fecha de las factura'
DictionaryEntry = 'FacturasCliente_FECHA_FACTURA'
end
item
Name = 'FECHA_VENCIMIENTO'
DataType = datDateTime
DisplayLabel = 'Fecha de vencimiento'
DictionaryEntry = 'FacturasCliente_FECHA_VENCIMIENTO'
end
item
Name = 'SITUACION'
DataType = datString
Size = 255
DisplayLabel = 'Situaci'#243'n'
DictionaryEntry = 'FacturasCliente_SITUACION'
end
item
Name = 'BASE_IMPONIBLE'
DataType = datCurrency
DisplayLabel = 'Base imponible'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_BASE_IMPONIBLE'
end
item
Name = 'DESCUENTO'
DataType = datFloat
DisplayLabel = 'Dto.'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_DESCUENTO'
end
item
Name = 'IMPORTE_DESCUENTO'
DataType = datCurrency
DisplayLabel = 'Importe dto.'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_DESCUENTO'
end
item
Name = 'IVA'
DataType = datFloat
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IVA'
end
item
Name = 'IMPORTE_IVA'
DataType = datCurrency
DisplayLabel = 'Importe IVA'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_IVA'
end
item
Name = 'RE'
DataType = datFloat
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_RE'
end
item
Name = 'IMPORTE_RE'
DataType = datCurrency
DisplayLabel = 'Importe RE'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_RE'
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
DisplayLabel = 'Importe total'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_TOTAL'
end
item
Name = 'OBSERVACIONES'
DataType = datMemo
DisplayLabel = 'Observaciones'
DictionaryEntry = 'FacturasCliente_OBSERVACIONES'
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
DictionaryEntry = 'FacturasCliente_ID_CLIENTE'
end
item
Name = 'REFERENCIA_CLIENTE'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE_CLIENTE'
DataType = datString
Size = 255
DisplayLabel = 'FacturasCliente_NOMBRE_CLIENTE'
ServerAutoRefresh = True
DictionaryEntry = 'FacturasCliente_NOMBRE_CLIENTE'
end
item
Name = 'NOMBRE_COMERCIAL_CLIENTE'
DataType = datString
Size = 255
DisplayLabel = 'FacturasCliente_NOMBRE_COMERCIAL_CLIENTE'
ServerAutoRefresh = True
DictionaryEntry = 'FacturasCliente_NOMBRE_COMERCIAL_CLIENTE'
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
DisplayLabel = 'NIF/CIF'
DictionaryEntry = 'FacturasCliente_NIF_CIF'
end
item
Name = 'NOMBRE'
DataType = datString
Size = 100
DisplayLabel = 'Cliente'
DictionaryEntry = 'FacturasCliente_NOMBRE'
end
item
Name = 'ID_DIRECCION'
DataType = datInteger
DisplayLabel = 'FacturasCliente_ID_DIRECCION'
DictionaryEntry = 'FacturasCliente_ID_DIRECCION'
end
item
Name = 'CALLE'
DataType = datString
Size = 150
DisplayLabel = 'Direcci'#243'n'
DictionaryEntry = 'FacturasCliente_CALLE'
end
item
Name = 'POBLACION'
DataType = datString
Size = 150
DisplayLabel = 'Poblaci'#243'n'
DictionaryEntry = 'FacturasCliente_POBLACION'
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 30
DisplayLabel = 'Provincia'
DictionaryEntry = 'FacturasCliente_PROVINCIA'
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
DisplayLabel = 'C'#243'd. postal'
DictionaryEntry = 'FacturasCliente_CODIGO_POSTAL'
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
DictionaryEntry = 'FacturasCliente_FECHA_ALTA'
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
DictionaryEntry = 'FacturasCliente_FECHA_MODIFICACION'
end
item
Name = 'USUARIO'
DataType = datString
Size = 100
DictionaryEntry = 'FacturasCliente_USUARIO'
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
DisplayLabel = 'FacturasCliente_ID_FORMA_PAGO'
DictionaryEntry = 'FacturasCliente_ID_FORMA_PAGO'
end
item
Name = 'RECARGO_EQUIVALENCIA'
DataType = datSmallInt
DisplayLabel = #191'Con R.E.?'
DictionaryEntry = 'FacturasCliente_RECARGO_EQUIVALENCIA'
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
DictionaryEntry = 'FacturasCliente_ID_TIPO_IVA'
end
item
Name = 'IMPORTE_NETO'
DataType = datCurrency
DisplayLabel = 'Importe neto'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_NETO'
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
DisplayLabel = 'Importe del porte'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_PORTE'
end
item
Name = 'ID_AGENTE'
DataType = datInteger
DictionaryEntry = 'FacturasCliente_ID_AGENTE'
end
item
Name = 'REFERENCIA_COMISION'
DataType = datString
Size = 255
DictionaryEntry = 'FacturasCliente_REFERENCIA_COMISION'
end
item
Name = 'IGNORAR_CONTABILIDAD'
DataType = datSmallInt
DisplayLabel = 'FacturasCliente_IGNORAR_CONTABILIDAD'
DictionaryEntry = 'FacturasCliente_IGNORAR_CONTABILIDAD'
end
item
Name = 'ID_TIENDA'
DataType = datInteger
DisplayLabel = 'FacturasCliente_ID_TIENDA'
ServerAutoRefresh = True
DictionaryEntry = 'FacturasCliente_ID_TIENDA'
end
item
Name = 'TIENDA'
DataType = datString
Size = 255
DisplayLabel = 'FacturasCliente_TIENDA'
ServerAutoRefresh = True
DictionaryEntry = 'FacturasCliente_TIENDA'
end
item
Name = 'ID_SUBCUENTA'
DataType = datInteger
DisplayLabel = 'FacturasCliente_ID_SUBCUENTA'
DictionaryEntry = 'FacturasCliente_ID_SUBCUENTA'
end
item
Name = 'SUBCUENTA'
DataType = datString
Size = 255
DisplayLabel = 'FacturasCliente_SUBCUENTA'
DictionaryEntry = 'FacturasCliente_SUBCUENTA'
end
item
Name = 'ID_EJERCICIO'
DataType = datInteger
DisplayLabel = 'FacturasCliente_ID_EJERCICIO'
DictionaryEntry = 'FacturasCliente_ID_EJERCICIO'
end
item
Name = 'ESTADO_EJERCICIO'
DataType = datString
Size = 255
DisplayLabel = 'FacturasCliente_ESTADO_EJERCICIO'
DictionaryEntry = 'FacturasCliente_ESTADO_EJERCICIO'
end
item
Name = 'ASIENTO_PUNTEADO'
DataType = datSmallInt
DisplayLabel = 'FacturasCliente_ASIENTO_PUNTEADO'
DictionaryEntry = 'FacturasCliente_ASIENTO_PUNTEADO'
end
item
Name = 'ID_CONTRATO'
DataType = datInteger
DisplayLabel = 'FacturasCliente_ID_CONTRATO'
DictionaryEntry = 'FacturasCliente_ID_CONTRATO'
end
item
Name = 'REF_CONTRATO'
DataType = datString
Size = 255
DisplayLabel = 'FacturasCliente_REF_CONTRATO'
DictionaryEntry = 'FacturasCliente_REF_CONTRATO'
end
item
Name = 'REF_CLI_CONTRATO'
DataType = datString
Size = 255
end
item
Name = 'SIN_COMISION'
DataType = datSmallInt
DisplayLabel = 'FacturasCliente_SIN_COMISION'
DictionaryEntry = 'FacturasCliente_SIN_COMISION'
end>
Params = <>
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_FacturasCliente
LogicalName = 'FacturasCliente'
IndexDefs = <>
Left = 240
Top = 112
end
object ds_FacturasCliente: TDADataSource
DataSet = tbl_FacturasCliente.Dataset
DataTable = tbl_FacturasCliente
Left = 240
Top = 48
end
object tbl_FacturasCliente_Detalles: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_FACTURA_CLIENTE_DETALLES_ID'
Required = True
ServerAutoRefresh = True
DictionaryEntry = 'FacturasCliente_Detalles_ID'
InPrimaryKey = True
end
item
Name = 'ID_FACTURA'
DataType = datInteger
DictionaryEntry = 'FacturasCliente_Detalles_ID_FACTURA'
end
item
Name = 'POSICION'
DataType = datInteger
DisplayLabel = 'Posici'#243'n'
DictionaryEntry = 'FacturasCliente_Detalles_POSICION'
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 10
DisplayLabel = 'Tipo detalle'
DictionaryEntry = 'FacturasCliente_Detalles_TIPO_DETALLE'
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 2000
DisplayLabel = 'Concepto'
DictionaryEntry = 'FacturasCliente_Detalles_CONCEPTO'
end
item
Name = 'CANTIDAD'
DataType = datFloat
DisplayLabel = 'Cantidad'
DictionaryEntry = 'FacturasCliente_Detalles_CANTIDAD'
end
item
Name = 'IMPORTE_UNIDAD'
DataType = datCurrency
DisplayLabel = 'Importe unidad'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_Detalles_IMPORTE_UNIDAD'
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
DisplayLabel = 'Importe total'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_Detalles_IMPORTE_TOTAL'
end
item
Name = 'VISIBLE'
DataType = datInteger
DisplayLabel = #191'Visible?'
DictionaryEntry = 'FacturasCliente_Detalles_VISIBLE'
end
item
Name = 'VALORADO'
DataType = datSmallInt
DisplayLabel = #191'Valorado?'
DictionaryEntry = 'FacturasCliente_Detalles_VALORADO'
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
DisplayLabel = 'FacturasCliente_Detalles_ID_ARTICULO'
DictionaryEntry = 'FacturasCliente_Detalles_ID_ARTICULO'
end
item
Name = 'DESCUENTO'
DataType = datFloat
DisplayLabel = 'FacturasCliente_Detalles_DESCUENTO'
DictionaryEntry = 'FacturasCliente_Detalles_DESCUENTO'
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
DisplayLabel = 'FacturasCliente_Detalles_IMPORTE_PORTE'
DictionaryEntry = 'FacturasCliente_Detalles_IMPORTE_PORTE'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'REFERENCIA_PROVEEDOR'
DataType = datString
Size = 255
end>
Params = <>
MasterMappingMode = mmWhere
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_FacturasCliente
MasterSource = ds_FacturasCliente
MasterFields = 'ID'
DetailFields = 'ID_FACTURA'
LogicalName = 'FacturasCliente_Detalles'
IndexDefs = <>
Left = 400
Top = 112
end
object ds_FacturasCliente_Detalles: TDADataSource
DataSet = tbl_FacturasCliente_Detalles.Dataset
DataTable = tbl_FacturasCliente_Detalles
Left = 400
Top = 40
end
object tbl_ListaAnosFacturas: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ANO'
DataType = datString
Size = 255
end>
Params = <>
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_FacturasCliente
LogicalName = 'ListaAnosFacturas'
IndexDefs = <>
Left = 232
Top = 232
end
object ds_ListaAnosFacturas: TDADataSource
DataSet = tbl_ListaAnosFacturas.Dataset
DataTable = tbl_ListaAnosFacturas
Left = 232
Top = 184
end
end
Reference in New Issue View Git Blame Copy Permalink