From 266745ac19e60dca083e9b11ad2b22198676812d Mon Sep 17 00:00:00 2001 From: david Date: Thu, 21 Feb 2008 10:06:02 +0000 Subject: [PATCH] Contactos: poder tener varias cuentas bancarias en un contacto. git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@287 0c75b7a4-871f-7646-8a2f-f78d34cc349f --- Build/Build.fbp5 | 4 +- Source/Base/Base.dproj | 100 ++++---- Source/Base/Base.res | Bin 4748 -> 384 bytes Source/GUIBase/GUIBase.res | Bin 4748 -> 384 bytes .../Controller/Contactos_controller.dpk | 4 +- .../Controller/Contactos_controller.dproj | 45 +++- .../View/uIEditorDatoBancarioContacto.pas | 28 +++ .../Controller/uContactosController.pas | 7 +- .../uDatosBancariosContactoController.pas | 90 ++++++++ .../uDireccionesContactoController.pas | 7 +- .../uEtiquetasContactosReportController.pas | 4 +- .../uFichasEmpleadoReportController.pas | 4 +- .../Controller/uGruposClienteController.pas | 4 +- .../Controller/uGruposEmpleadoController.pas | 4 +- .../Controller/uGruposProveedorController.pas | 4 +- .../Contactos/Data/uDataModuleContactos.dfm | 12 +- .../Model/uBizContactosDatosBancarios.pas | 2 +- .../Contactos/Views/Contactos_view.dpk | 28 ++- .../Contactos/Views/Contactos_view.dproj | 54 +++-- .../Views/uContactosViewRegister.pas | 7 +- .../Contactos/Views/uEditorCliente.dfm | 124 +++++----- .../Contactos/Views/uEditorCliente.pas | 2 +- .../Contactos/Views/uEditorContacto.dfm | 49 ++-- .../Contactos/Views/uEditorContacto.pas | 11 +- .../Contactos/Views/uEditorDatoBancario.dfm | 136 +++++++++++ .../Contactos/Views/uEditorDatoBancario.pas | 89 +++++++ .../Contactos/Views/uEditorEmpleado.dfm | 199 ++++++++-------- .../Contactos/Views/uEditorEmpleado.pas | 2 +- .../Contactos/Views/uEditorProveedor.dfm | 217 +++++++++--------- .../Contactos/Views/uEditorProveedor.pas | 2 +- .../uViewContactoListaDatosBancarios.dfm | 76 ++++++ .../uViewContactoListaDatosBancarios.pas | 76 ++++++ 32 files changed, 983 insertions(+), 408 deletions(-) create mode 100644 Source/Modulos/Contactos/Controller/View/uIEditorDatoBancarioContacto.pas create mode 100644 Source/Modulos/Contactos/Controller/uDatosBancariosContactoController.pas create mode 100644 Source/Modulos/Contactos/Views/uEditorDatoBancario.dfm create mode 100644 Source/Modulos/Contactos/Views/uEditorDatoBancario.pas create mode 100644 Source/Modulos/Contactos/Views/uViewContactoListaDatosBancarios.dfm create mode 100644 Source/Modulos/Contactos/Views/uViewContactoListaDatosBancarios.pas diff --git a/Build/Build.fbp5 b/Build/Build.fbp5 index 7c7f5215..449cde4f 100644 --- a/Build/Build.fbp5 +++ b/Build/Build.fbp5 @@ -625,9 +625,9 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= -ProductVersion= +ProductVersion=1.0.0.0 Comments= -CompileDate= +CompileDate=domingo, 10 de febrero de 2008 12:11 ]]> diff --git a/Source/Base/Base.dproj b/Source/Base/Base.dproj index 39883c75..46184b15 100644 --- a/Source/Base/Base.dproj +++ b/Source/Base/Base.dproj @@ -53,57 +53,57 @@ MainSource + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
fConfigurarConexion
TForm diff --git a/Source/Base/Base.res b/Source/Base/Base.res index 1641339fcc482e7e3492d1b45813a86619622c33..8b251f312bcccec5485024f6fe8d80e1cdf25746 100644 GIT binary patch delta 11 ScmeBCZD5|Duvteife`=|>;pCc 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 diff --git a/Source/GUIBase/GUIBase.res b/Source/GUIBase/GUIBase.res index 1641339fcc482e7e3492d1b45813a86619622c33..8b251f312bcccec5485024f6fe8d80e1cdf25746 100644 GIT binary patch delta 11 ScmeBCZD5|Duvteife`=|>;pCc 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 diff --git a/Source/Modulos/Contactos/Controller/Contactos_controller.dpk b/Source/Modulos/Contactos/Controller/Contactos_controller.dpk index 79dd733e..f746dc74 100644 --- a/Source/Modulos/Contactos/Controller/Contactos_controller.dpk +++ b/Source/Modulos/Contactos/Controller/Contactos_controller.dpk @@ -61,6 +61,8 @@ contains uFichasEmpleadoReportController in 'uFichasEmpleadoReportController.pas', uIEditorFichasEmpleadoPreview in 'View\uIEditorFichasEmpleadoPreview.pas', uEtiquetasContactosReportController in 'uEtiquetasContactosReportController.pas', - uIEditorEtiquetasContactosPreview in 'View\uIEditorEtiquetasContactosPreview.pas'; + uIEditorEtiquetasContactosPreview in 'View\uIEditorEtiquetasContactosPreview.pas', + uDatosBancariosContactoController in 'uDatosBancariosContactoController.pas', + uIEditorDatoBancarioContacto in 'View\uIEditorDatoBancarioContacto.pas'; end. diff --git a/Source/Modulos/Contactos/Controller/Contactos_controller.dproj b/Source/Modulos/Contactos/Controller/Contactos_controller.dproj index cbc1e9ef..0f3a6bfa 100644 --- a/Source/Modulos/Contactos/Controller/Contactos_controller.dproj +++ b/Source/Modulos/Contactos/Controller/Contactos_controller.dproj @@ -43,6 +43,33 @@ Package FalseTrueFalseTrueFalseFalseTrueFalse1000FalseFalseFalseFalseFalse308212521.0.0.01.0.0.0 + + + + + + + + + + + + + + + + + + + + + + + + + + + JCL Debug IDE extension JCL Project Analyzer JCL Open and Save IDE dialogs with favorite folders @@ -53,15 +80,9 @@ MainSource - - - - - - - + @@ -70,10 +91,17 @@ + + + + + + + @@ -88,12 +116,13 @@ +