From 4888227b75ec86f356bd7b9bf0662b25908f83bc Mon Sep 17 00:00:00 2001 From: roberto Date: Tue, 10 Feb 2009 10:35:42 +0000 Subject: [PATCH] Repaso de contablidad para facturas de cliente y proveedor, se arreglan detalles de visualizacion de importes el lista de facturas de cliente y proeveedor git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@394 f4e31baf-9722-1c47-927c-6f952f962d4b --- Database/scripts/factuges.sql | 147 ++++++---- Source/Base/Base.dproj | 104 ++++--- Source/GUIBase/GUIBase.dproj | 62 ++-- Source/GUIBase/GUIBase.res | Bin 384 -> 4748 bytes Source/GUIBase/uEditorDBBase.dfm | 2 +- Source/GUIBase/uEditorDBItem.dfm | 2 +- .../Controller/Contabilidad_controller.dproj | 46 +-- .../Controller/View/uIEditorAsiento.pas | 4 +- .../Controller/View/uIEditorCuenta.pas | 4 +- .../Controller/View/uIEditorEpigrafe.pas | 4 +- .../Controller/View/uIEditorSubCuenta.pas | 4 +- .../Controller/uApuntesController.pas | 13 + .../Controller/uAsientosController.pas | 37 ++- .../Controller/uCuentasController.pas | 43 ++- .../Controller/uEpigrafesController.pas | 45 ++- .../Controller/uSubCuentasController.pas | 73 +++-- .../Contabilidad/Data/Contabilidad_data.dproj | 30 +- .../Data/uDataModuleContabilidad.dfm | 25 ++ .../Model/schContabilidadClient_Intf.pas | 275 ++++++++++++++---- .../Model/schContabilidadServer_Intf.pas | 271 +++++++++++++++-- .../Servidor/srvContabilidad_Impl.dfm | 45 +++ .../Contabilidad/Views/uEditorCuenta.dfm | 5 +- .../Contabilidad/Views/uEditorCuenta.pas | 10 +- .../Contabilidad/Views/uEditorCuentas.dfm | 10 + .../Contabilidad/Views/uEditorCuentas.pas | 28 +- .../Contabilidad/Views/uEditorDiario.dfm | 16 + .../Contabilidad/Views/uEditorDiario.pas | 17 +- .../Contabilidad/Views/uEditorEpigrafe.dfm | 8 +- .../Contabilidad/Views/uEditorEpigrafe.pas | 10 +- .../Contabilidad/Views/uEditorEpigrafes.dfm | 10 + .../Contabilidad/Views/uEditorEpigrafes.pas | 26 +- .../Views/uEditorExtractoMovimientos.dfm | 45 ++- .../Views/uEditorExtractoMovimientos.pas | 17 +- .../Contabilidad/Views/uEditorSubCuenta.dfm | 8 +- .../Contabilidad/Views/uEditorSubCuenta.pas | 10 +- .../Contabilidad/Views/uEditorSubCuentas.dfm | 10 + .../Contabilidad/Views/uEditorSubCuentas.pas | 28 +- .../Contactos/Views/uEditorCliente.dfm | 13 - .../Contactos/Views/uEditorCliente.pas | 1 - .../Controller/FacturasCliente_controller.dpk | Bin 1528 -> 1655 bytes .../FacturasCliente_controller.dproj | 20 +- .../Controller/uFacturasClienteController.pas | 80 ++--- .../Data/FacturasCliente_data.dproj | 46 +-- .../Data/uDataModuleFacturasCliente.dfm | 9 + .../Model/schFacturasClienteClient_Intf.pas | 78 ++++- .../Model/schFacturasClienteServer_Intf.pas | 94 +++++- .../Servidor/srvFacturasCliente_Impl.dfm | 17 ++ .../Views/uEditorFacturaCliente.dfm | 44 +-- .../Views/uEditorFacturasCliente.dfm | 33 +++ .../Views/uEditorFacturasCliente.pas | 7 +- .../Views/uViewFacturasCliente.dfm | 12 + .../Views/uViewFacturasCliente.pas | 2 + .../uFacturasProveedorController.pas | 26 +- .../Data/uDataModuleFacturasProveedor.dfm | 9 + .../Model/schFacturasProveedorClient_Intf.pas | 78 ++++- .../Model/schFacturasProveedorServer_Intf.pas | 94 +++++- .../Servidor/srvFacturasProveedor_Impl.dfm | 17 ++ .../Views/uEditorFacturasProveedor.dfm | 23 ++ .../Views/uEditorFacturasProveedor.pas | 6 +- .../Views/uViewFacturasProveedor.dfm | 53 ++-- .../Views/uViewFacturasProveedor.pas | 5 +- Source/Servidor/FactuGES_Server.RES | Bin 23352 -> 23348 bytes Source/Servidor/FactuGES_Server.dpr | 6 +- Source/Servidor/FactuGES_Server.rc | 2 +- 64 files changed, 1743 insertions(+), 526 deletions(-) diff --git a/Database/scripts/factuges.sql b/Database/scripts/factuges.sql index f3794038..73a5ecc7 100644 --- a/Database/scripts/factuges.sql +++ b/Database/scripts/factuges.sql @@ -2066,7 +2066,7 @@ WHERE CREATE VIEW V_CONT_CUENTAS( ID, REF_CUENTA, - ID_EJERCICIO, + ID_EJERCICIO, ESTADO, DESCRIPCION, ID_EPIGRAFE, EPIGRAFE, @@ -2075,7 +2075,7 @@ CREATE VIEW V_CONT_CUENTAS( ID_CUENTA_ESPECIAL, CUENTA_ESPECIAL) AS -select CONT_CUENTAS.ID, CONT_CUENTAS.REF_CUENTA, CONT_CUENTAS.ID_EJERCICIO, +select CONT_CUENTAS.ID, CONT_CUENTAS.REF_CUENTA, CONT_CUENTAS.ID_EJERCICIO, CONT_EJERCICIOS.ESTADO, CONT_CUENTAS.DESCRIPCION, CONT_CUENTAS.ID_EPIGRAFE, CONT_EPIGRAFES.DESCRIPCION as EPIGRAFE, CONT_CUENTAS.ID_BALANCE, CONT_BALANCES.REF_BALANCE as BALANCE, CONT_CUENTAS.ID_CUENTA_ESPECIAL, CONT_CUENTAS_ESPECIALES.DESCRIPCION as CUENTA_ESPECIAL @@ -2083,7 +2083,7 @@ from CONT_CUENTAS left join CONT_EPIGRAFES on (CONT_EPIGRAFES.ID = CONT_CUENTAS.ID_EPIGRAFE) left join CONT_BALANCES on (CONT_BALANCES.ID = CONT_CUENTAS.ID_BALANCE) left join CONT_CUENTAS_ESPECIALES on (CONT_CUENTAS_ESPECIALES.ID = CONT_CUENTAS.ID_CUENTA_ESPECIAL) -; +left join CONT_EJERCICIOS on (CONT_EJERCICIOS.ID = CONT_CUENTAS.ID_EJERCICIO); @@ -2100,6 +2100,7 @@ CREATE VIEW V_CONT_DIARIO( REF_SUBCUENTA, SUBCUENTA, ID_EJERCICIO, + ESTADO, CONCEPTO, DOCUMENTO, DEBE, @@ -2117,7 +2118,7 @@ SELECT CONT_APUNTES.ID_SUBCUENTA, CONT_SUBCUENTAS.REF_SUBCUENTA as REF_SUBCUENTA, CONT_SUBCUENTAS.DESCRIPCION as SUBCUENTA, - CONT_SUBCUENTAS.ID_EJERCICIO, + CONT_SUBCUENTAS.ID_EJERCICIO, CONT_EJERCICIOS.ESTADO, CONT_APUNTES.CONCEPTO, CONT_APUNTES.DOCUMENTO, CONT_APUNTES.DEBE, @@ -2127,6 +2128,7 @@ SELECT FROM CONT_APUNTES LEFT JOIN CONT_ASIENTOS ON (CONT_ASIENTOS.ID = CONT_APUNTES.ID_ASIENTO) LEFT JOIN CONT_SUBCUENTAS ON (CONT_SUBCUENTAS.ID = CONT_APUNTES.ID_SUBCUENTA) +LEFT JOIN CONT_EJERCICIOS ON (CONT_EJERCICIOS.ID = CONT_SUBCUENTAS.ID_EJERCICIO) order by CONT_ASIENTOS.FECHA_ASIENTO desc, CONT_ASIENTOS.ORDEN desc ; @@ -2137,14 +2139,15 @@ CREATE VIEW V_CONT_EPIGRAFES( ID, REF_EPIGRAFE, DESCRIPCION, - ID_EJERCICIO, + ID_EJERCICIO, ESTADO, ID_PADRE, EPIGRAFE_PADRE) AS -select CONT_EPI1.ID, CONT_EPI1.REF_EPIGRAFE, CONT_EPI1.DESCRIPCION, CONT_EPI1.ID_EJERCICIO, +select CONT_EPI1.ID, CONT_EPI1.REF_EPIGRAFE, CONT_EPI1.DESCRIPCION, CONT_EPI1.ID_EJERCICIO, CONT_EJERCICIOS.ESTADO, CONT_EPI1.ID_PADRE, CONT_EPI2.DESCRIPCION as EPIGRAFE_PADRE from CONT_EPIGRAFES CONT_EPI1 left join CONT_EPIGRAFES CONT_EPI2 on (CONT_EPI2.ID = CONT_EPI1.ID_PADRE) +left join CONT_EJERCICIOS on (CONT_EJERCICIOS.ID = CONT_EPI1.ID_EJERCICIO) ; @@ -2153,17 +2156,22 @@ left join CONT_EPIGRAFES CONT_EPI2 on (CONT_EPI2.ID = CONT_EPI1.ID_PADRE) CREATE VIEW V_CONT_FAC_CLI_VENTAS( ID_FACTURA, ID_SUBCUENTA, - SUBCUENTA) + SUBCUENTA, + ID_EJERCICIO, + ESTADO) AS select CONT_ASIENTOS.ID_FACTURA, CONT_SUBCUENTAS.ID as ID_SUBCUENTA, - CONT_SUBCUENTAS.DESCRIPCION as SUBCUENTA + CONT_SUBCUENTAS.DESCRIPCION as SUBCUENTA, + CONT_SUBCUENTAS.ID_EJERCICIO, + CONT_EJERCICIOS.ESTADO from CONT_ASIENTOS LEFT JOIN CONT_APUNTES ON (CONT_APUNTES.ID_ASIENTO = CONT_ASIENTOS.ID) LEFT JOIN CONT_SUBCUENTAS ON (CONT_SUBCUENTAS.ID = CONT_APUNTES.ID_SUBCUENTA) LEFT JOIN CONT_CUENTAS ON (CONT_CUENTAS.ID = CONT_SUBCUENTAS.ID_CUENTA) + LEFT JOIN CONT_EJERCICIOS ON (CONT_EJERCICIOS.ID = CONT_SUBCUENTAS.ID_EJERCICIO) /* Solo sacaremos aquellas tuplas de apuntes cuya subcuenta contable pertenezca ventas*/ where (CONT_ASIENTOS.ID_FACTURA is not null) and (CONT_CUENTAS.ref_cuenta = 700) ; @@ -2174,21 +2182,24 @@ from CONT_ASIENTOS CREATE VIEW V_CONT_FAC_PRO_COMPRAS( ID_FACTURA, ID_SUBCUENTA, - SUBCUENTA) + SUBCUENTA, + ID_EJERCICIO, + ESTADO) AS select CONT_ASIENTOS.ID_FACTURA, CONT_SUBCUENTAS.ID as ID_SUBCUENTA, - CONT_SUBCUENTAS.DESCRIPCION as SUBCUENTA + CONT_SUBCUENTAS.DESCRIPCION as SUBCUENTA, + CONT_SUBCUENTAS.ID_EJERCICIO, + CONT_EJERCICIOS.ESTADO from CONT_ASIENTOS LEFT JOIN CONT_APUNTES ON (CONT_APUNTES.ID_ASIENTO = CONT_ASIENTOS.ID) LEFT JOIN CONT_SUBCUENTAS ON (CONT_SUBCUENTAS.ID = CONT_APUNTES.ID_SUBCUENTA) LEFT JOIN CONT_CUENTAS ON (CONT_CUENTAS.ID = CONT_SUBCUENTAS.ID_CUENTA) + LEFT JOIN CONT_EJERCICIOS ON (CONT_EJERCICIOS.ID = CONT_SUBCUENTAS.ID_EJERCICIO) /* Solo sacaremos aquellas tuplas de apuntes cuya subcuenta contable pertenezca compras*/ - where (CONT_ASIENTOS.ID_FACTURA is not null) and (CONT_CUENTAS.ref_cuenta = 600) -; - + where (CONT_ASIENTOS.ID_FACTURA is not null) and (CONT_CUENTAS.ref_cuenta = 600); /* View: V_CONT_SUBCUENTAS_SALDO */ @@ -2206,14 +2217,14 @@ left join cont_apuntes on (cont_apuntes.id_subcuenta = cont_subcuentas.ID) group by cont_subcuentas.ID ; - - /* View: V_CONT_SUBCUENTAS */ CREATE VIEW V_CONT_SUBCUENTAS( ID, REF_SUBCUENTA, DESCRIPCION, ID_EJERCICIO, + ESTADO, + REF_EPIGRAFE_PADRE, ID_CONTACTO, ID_CUENTA, REF_CUENTA, @@ -2223,11 +2234,15 @@ CREATE VIEW V_CONT_SUBCUENTAS( SALDO) AS select CONT_SUBCUENTAS.ID, CONT_SUBCUENTAS.REF_SUBCUENTA, CONT_SUBCUENTAS.DESCRIPCION, -CONT_SUBCUENTAS.ID_EJERCICIO, CONT_SUBCUENTAS.ID_CONTACTO, CONT_SUBCUENTAS.ID_CUENTA, +CONT_SUBCUENTAS.ID_EJERCICIO, CONT_EJERCICIOS.ESTADO, COALESCE(CONT_EPI2.REF_EPIGRAFE, CONT_EPI1.REF_EPIGRAFE), +CONT_SUBCUENTAS.ID_CONTACTO, CONT_SUBCUENTAS.ID_CUENTA, CONT_CUENTAS.REF_CUENTA, CONT_CUENTAS.DESCRIPCION as CUENTA, V_CONT_SUBCUENTAS_SALDO.DEBE, V_CONT_SUBCUENTAS_SALDO.HABER, V_CONT_SUBCUENTAS_SALDO.SALDO from V_CONT_SUBCUENTAS_SALDO left join CONT_SUBCUENTAS on (CONT_SUBCUENTAS.ID = V_CONT_SUBCUENTAS_SALDO.ID_SUBCUENTA) left join CONT_CUENTAS on (CONT_CUENTAS.ID = CONT_SUBCUENTAS.ID_CUENTA) +left join CONT_EPIGRAFES CONT_EPI1 on (CONT_EPI1.ID = CONT_CUENTAS.ID_EPIGRAFE) +left join CONT_EPIGRAFES CONT_EPI2 on (CONT_EPI2.ID = CONT_EPI1.ID_PADRE) +left join CONT_EJERCICIOS on (CONT_EJERCICIOS.ID = CONT_SUBCUENTAS.ID_EJERCICIO) order by CONT_CUENTAS.REF_CUENTA ; @@ -2423,48 +2438,50 @@ GROUP BY ID_FACTURA; /* Create view: V_FACTURAS_CLIENTE */ CREATE VIEW V_FACTURAS_CLIENTE( -ID, -ID_EMPRESA, -REFERENCIA, -TIPO, -ID_COMISION_LIQUIDADA, -FECHA_FACTURA, -FECHA_VENCIMIENTO, -SITUACION, -BASE_IMPONIBLE, -DESCUENTO, -IMPORTE_DESCUENTO, -IVA, -IMPORTE_IVA, -RE, -IMPORTE_RE, -IMPORTE_TOTAL, -OBSERVACIONES, -ID_CLIENTE, -NOMBRE_CLIENTE, -NOMBRE_COMERCIAL_CLIENTE, -NIF_CIF, -NOMBRE, -CALLE, -POBLACION, -PROVINCIA, -CODIGO_POSTAL, -FECHA_ALTA, -FECHA_MODIFICACION, -USUARIO, -ID_FORMA_PAGO, -RECARGO_EQUIVALENCIA, -ID_TIPO_IVA, -IMPORTE_NETO, -IMPORTE_PORTE, -ID_AGENTE, -REFERENCIA_COMISION, -IGNORAR_CONTABILIDAD, -ID_TIENDA, -TIENDA, -ID_SUBCUENTA, -SUBCUENTA) - AS + ID, + ID_EMPRESA, + REFERENCIA, + TIPO, + ID_COMISION_LIQUIDADA, + FECHA_FACTURA, + FECHA_VENCIMIENTO, + SITUACION, + BASE_IMPONIBLE, + DESCUENTO, + IMPORTE_DESCUENTO, + IVA, + IMPORTE_IVA, + RE, + IMPORTE_RE, + IMPORTE_TOTAL, + OBSERVACIONES, + ID_CLIENTE, + NOMBRE_CLIENTE, + NOMBRE_COMERCIAL_CLIENTE, + NIF_CIF, + NOMBRE, + CALLE, + POBLACION, + PROVINCIA, + CODIGO_POSTAL, + FECHA_ALTA, + FECHA_MODIFICACION, + USUARIO, + ID_FORMA_PAGO, + RECARGO_EQUIVALENCIA, + ID_TIPO_IVA, + IMPORTE_NETO, + IMPORTE_PORTE, + ID_AGENTE, + REFERENCIA_COMISION, + IGNORAR_CONTABILIDAD, + ID_TIENDA, + TIENDA, + ID_SUBCUENTA, + SUBCUENTA, + ID_EJERCICIO, + ESTADO) +AS SELECT FACTURAS_CLIENTE.ID, FACTURAS_CLIENTE.ID_EMPRESA, FACTURAS_CLIENTE.REFERENCIA, @@ -2505,7 +2522,9 @@ SELECT FACTURAS_CLIENTE.ID, FACTURAS_CLIENTE.ID_TIENDA, COALESCE(EMPRESAS_TIENDAS.NOMBRE, 'Todas') AS TIENDA, V_CONT_FAC_CLI_VENTAS.ID_SUBCUENTA, - V_CONT_FAC_CLI_VENTAS.SUBCUENTA + V_CONT_FAC_CLI_VENTAS.SUBCUENTA, + V_CONT_FAC_CLI_VENTAS.ID_EJERCICIO, + V_CONT_FAC_CLI_VENTAS.ESTADO FROM V_FAC_CLI_SITUACION LEFT JOIN FACTURAS_CLIENTE @@ -2515,7 +2534,7 @@ SELECT FACTURAS_CLIENTE.ID, INNER JOIN CONTACTOS ON (CONTACTOS.ID = FACTURAS_CLIENTE.ID_CLIENTE) INNER JOIN CLIENTES_DATOS ON (CLIENTES_DATOS.ID_CLIENTE = FACTURAS_CLIENTE.ID_CLIENTE) LEFT JOIN EMPRESAS_TIENDAS ON (EMPRESAS_TIENDAS.ID = FACTURAS_CLIENTE.ID_TIENDA) - LEFT JOIN V_CONT_FAC_CLI_VENTAS ON (V_CONT_FAC_CLI_VENTAS.ID_FACTURA = FACTURAS_CLIENTE.ID); + LEFT JOIN V_CONT_FAC_CLI_VENTAS ON (V_CONT_FAC_CLI_VENTAS.ID_FACTURA = FACTURAS_CLIENTE.ID) ; @@ -2559,7 +2578,9 @@ CREATE VIEW V_FACTURAS_PROVEEDOR( ID_TIENDA, TIENDA, ID_SUBCUENTA, - SUBCUENTA) + SUBCUENTA, + ID_EJERCICIO, + ESTADO) AS SELECT FACTURAS_PROVEEDOR.ID, FACTURAS_PROVEEDOR.ID_EMPRESA, @@ -2599,7 +2620,9 @@ SELECT FACTURAS_PROVEEDOR.ID, FACTURAS_PROVEEDOR.ID_TIENDA, COALESCE(EMPRESAS_TIENDAS.NOMBRE, 'Todas') AS TIENDA, V_CONT_FAC_PRO_COMPRAS.ID_SUBCUENTA, - V_CONT_FAC_PRO_COMPRAS.SUBCUENTA + V_CONT_FAC_PRO_COMPRAS.SUBCUENTA, + V_CONT_FAC_PRO_COMPRAS.ID_EJERCICIO, + V_CONT_FAC_PRO_COMPRAS.ESTADO FROM V_FAC_PRO_SITUACION LEFT JOIN FACTURAS_PROVEEDOR diff --git a/Source/Base/Base.dproj b/Source/Base/Base.dproj index 4042672c..e4f9e426 100644 --- a/Source/Base/Base.dproj +++ b/Source/Base/Base.dproj @@ -44,6 +44,20 @@ Package FalseTrueFalseLibreria base de FactuGESFalseFalseFalseTrueFalse1000FalseFalseFalseFalseFalse308212521.0.0.01.0.0.0 + + + + + + + + + + + + + + VCL for the Web Design Package for CodeGear RAD Studio CodeGear WebSnap Components CodeGear SOAP Components @@ -58,53 +72,53 @@ MainSource + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
fConfigurarConexion
TForm diff --git a/Source/GUIBase/GUIBase.dproj b/Source/GUIBase/GUIBase.dproj index 14eaaaa9..68e7fe82 100644 --- a/Source/GUIBase/GUIBase.dproj +++ b/Source/GUIBase/GUIBase.dproj @@ -58,37 +58,37 @@ MainSource - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
fDialogBase
 diff --git a/Source/GUIBase/GUIBase.res b/Source/GUIBase/GUIBase.res index 8b251f312bcccec5485024f6fe8d80e1cdf25746..1641339fcc482e7e3492d1b45813a86619622c33 100644 GIT binary patch literal 4748 zcmbW5&ub)A5XUPdpe&2#;C*uNAUVhgd+&(4um@dnom`vXF9g}ZuHJ;se=<3UNdFJg zbCw+UD9j$byGIXV`~6hC>h4S?F|k9X-j90q{Z_qtZ<;nUJCO8!h?p${kR>3GhM`oH*q zk=UsjOCIgA_4!`B+Gb&`I84R)bT4dy-BQV<-SyFz?R8ILEQ(+JB$u{sEXE@j@B*7W zT;iZH#|OJ<&DO$RCkM6VbK3(B(k{nbdv1lpc;E$xz9as|v3uE1V{hw2w~g3eD0an7 z{BT%G%irdMe*|oDJmgvJaA2`9B<6Xi*?M~Q;)@Sbfwf3uf zVaWkbUjU=;sL{BlYemIZXv%qZ{SZw{-TCU+;!nH6KDDIJumU+9{E0zXW4>7T)y|>$DQlv zRJe?TjSp{c!DqeayAnSMTtZZT;>LN7J0Rls+5m@q)MbyB*eL%Eu@(+$Cw}Pd@q7N| z%Q0*AHpCP^b9v`@jx-l_FD>khpW2W8(OU2&V5TrnoAY-m_hlcV?zq3;7{2gF{J#Hc z6R+o~mVenX?>@W0@_DVzyOFs(5464CY{!q9ChoF#_*eXi@4gFuV8?vhl=_w5$iKL0 zEV0nMBcN08xtRmsgJrqjh@s#|{?*ssnsG)mH*wa6{efF0JFWHok@kA5%b661{B38= zCcgJ|*ZFTpV$8<-&+AWpa)Q8*`wL&hMeNQ^v6I7$HSdLZhZ^&+6<@Uw_Zsml9^v3W zVvPDBKHh;i=RU4J_ta3E;)Mn>Y+L zKLZ0UQ+*km9FO-b?U4gmn-62iwzH6&*duKGo~aUV)bYDla8wWZ9+^7p-F<8lP@i!m z@vhbD_${F}h>^T;C(?(b*OJDk?{dEXB?nuehoON3HAb!7Mr7-ls!84-5V-jJugbu<_$}mU=Yd9!?TOX;|B-#B)+0x#9q*yqJiqS!`49d=7ztk$O+9=1i;?K_|J<8T z?0b7=-`Z3A#vV$4XJ5(lQ~TOZHUFdA%oWvK5zg&_IKXIbughQBA8XAsd#=@|TFLXC zy(^m((;DnQmDQKatmw!@c`| G?EMQ&4NnpP delta 11 ScmeBCZD5|Duvteife`=|>;pCc diff --git a/Source/GUIBase/uEditorDBBase.dfm b/Source/GUIBase/uEditorDBBase.dfm index 24f2b830..aedba9e3 100644 --- a/Source/GUIBase/uEditorDBBase.dfm +++ b/Source/GUIBase/uEditorDBBase.dfm @@ -18,7 +18,7 @@ inherited fEditorDBBase: TfEditorDBBase end inherited TBXDock: TTBXDock Width = 646 - ExplicitWidth = 648 + ExplicitWidth = 646 inherited tbxMain: TTBXToolbar ExplicitWidth = 646 end diff --git a/Source/GUIBase/uEditorDBItem.dfm b/Source/GUIBase/uEditorDBItem.dfm index 813a7f80..750b5ef5 100644 --- a/Source/GUIBase/uEditorDBItem.dfm +++ b/Source/GUIBase/uEditorDBItem.dfm @@ -19,7 +19,7 @@ inherited fEditorDBItem: TfEditorDBItem end inherited TBXDock: TTBXDock Width = 650 - ExplicitWidth = 652 + ExplicitWidth = 650 inherited tbxMain: TTBXToolbar ExplicitWidth = 605 inherited TBXItem26: TTBXItem diff --git a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj index 74948bfa..4ca23fb9 100644 --- a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj +++ b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj @@ -48,6 +48,29 @@ MainSource + + + + + + + + + + + + + + + + + + + + + + + @@ -55,24 +78,6 @@ - - - - - - - - - - - - - - - - - - @@ -92,11 +97,6 @@ - - - - -