diff --git a/BD/BASEDATOS.FDB b/BD/BASEDATOS.FDB index eb08a56..08250a0 100644 Binary files a/BD/BASEDATOS.FDB and b/BD/BASEDATOS.FDB differ diff --git a/Base/uDataModuleBase.dfm b/Base/uDataModuleBase.dfm index b65fb2c..627b62e 100644 --- a/Base/uDataModuleBase.dfm +++ b/Base/uDataModuleBase.dfm @@ -1,8 +1,8 @@ object dmBase: TdmBase OldCreateOrder = True OnCreate = DAClientDataModuleCreate - Left = 994 - Top = 219 + Left = 996 + Top = 255 Height = 368 Width = 494 object SmallImages: TPngImageList diff --git a/Base/uViewObservaciones.dfm b/Base/uViewObservaciones.dfm index 86381d8..4647660 100644 --- a/Base/uViewObservaciones.dfm +++ b/Base/uViewObservaciones.dfm @@ -3,7 +3,7 @@ inherited frViewObservaciones: TfrViewObservaciones Constraints.MinWidth = 300 DesignSize = ( 300 - 226) + 222) object Label5: TLabel Left = 8 Top = 8 diff --git a/Base/uViewPlazoEntrega.dfm b/Base/uViewPlazoEntrega.dfm index a639fd0..314a777 100644 --- a/Base/uViewPlazoEntrega.dfm +++ b/Base/uViewPlazoEntrega.dfm @@ -3,7 +3,7 @@ inherited frViewPlazoEntrega: TfrViewPlazoEntrega Constraints.MinWidth = 300 DesignSize = ( 300 - 240) + 222) object Label5: TLabel Left = 8 Top = 8 diff --git a/Cliente/FactuGES.cfg b/Cliente/FactuGES.cfg index 52439a1..908ac9e 100644 --- a/Cliente/FactuGES.cfg +++ b/Cliente/FactuGES.cfg @@ -40,6 +40,7 @@ -O"c:\archivos de programa\borland\delphi7\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Intervalos;..\Modulos\Documentos asociados;..\Modulos\Contactos\Cliente;..\Modulos\Contactos\Reglas;..\Modulos\Presupuestos\Cliente;..\Modulos\Presupuestos\Reglas;..\Modulos\Albaranes de cliente\Cliente;..\Modulos\Albaranes de cliente\Reglas;..\Modulos\Facturas de cliente\Cliente;..\Modulos\Facturas de cliente\Reglas;..\Modulos\Pedidos a proveedor\Cliente;..\Modulos\Pedidos a proveedor\Reglas;..\Modulos\Facturas de proveedor\Cliente;..\Modulos\Facturas de proveedor\Reglas;..\Modulos\Montajes\Reglas;..\Modulos\Montajes\Cliente;..\Modulos\Articulos\Cliente;..\Modulos\Articulos\Reglas;..\Modulos\Almacenes\Reglas;..\Modulos\Almacenes\Cliente;..\Modulos\Pagos\Reglas;..\Modulos\Pagos\Cliente;..\Modulos\Cuentas\Reglas;..\Modulos\Cuentas\Cliente;..\Modulos\Asientos\Reglas;..\Modulos\Asientos\Cliente;..\Modulos\Calendarios\Cliente;..\Modulos\Calendarios\Reglas" -I"c:\archivos de programa\borland\delphi7\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Intervalos;..\Modulos\Documentos asociados;..\Modulos\Contactos\Cliente;..\Modulos\Contactos\Reglas;..\Modulos\Presupuestos\Cliente;..\Modulos\Presupuestos\Reglas;..\Modulos\Albaranes de cliente\Cliente;..\Modulos\Albaranes de cliente\Reglas;..\Modulos\Facturas de cliente\Cliente;..\Modulos\Facturas de cliente\Reglas;..\Modulos\Pedidos a proveedor\Cliente;..\Modulos\Pedidos a proveedor\Reglas;..\Modulos\Facturas de proveedor\Cliente;..\Modulos\Facturas de proveedor\Reglas;..\Modulos\Montajes\Reglas;..\Modulos\Montajes\Cliente;..\Modulos\Articulos\Cliente;..\Modulos\Articulos\Reglas;..\Modulos\Almacenes\Reglas;..\Modulos\Almacenes\Cliente;..\Modulos\Pagos\Reglas;..\Modulos\Pagos\Cliente;..\Modulos\Cuentas\Reglas;..\Modulos\Cuentas\Cliente;..\Modulos\Asientos\Reglas;..\Modulos\Asientos\Cliente;..\Modulos\Calendarios\Cliente;..\Modulos\Calendarios\Reglas" -R"c:\archivos de programa\borland\delphi7\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Intervalos;..\Modulos\Documentos asociados;..\Modulos\Contactos\Cliente;..\Modulos\Contactos\Reglas;..\Modulos\Presupuestos\Cliente;..\Modulos\Presupuestos\Reglas;..\Modulos\Albaranes de cliente\Cliente;..\Modulos\Albaranes de cliente\Reglas;..\Modulos\Facturas de cliente\Cliente;..\Modulos\Facturas de cliente\Reglas;..\Modulos\Pedidos a proveedor\Cliente;..\Modulos\Pedidos a proveedor\Reglas;..\Modulos\Facturas de proveedor\Cliente;..\Modulos\Facturas de proveedor\Reglas;..\Modulos\Montajes\Reglas;..\Modulos\Montajes\Cliente;..\Modulos\Articulos\Cliente;..\Modulos\Articulos\Reglas;..\Modulos\Almacenes\Reglas;..\Modulos\Almacenes\Cliente;..\Modulos\Pagos\Reglas;..\Modulos\Pagos\Cliente;..\Modulos\Cuentas\Reglas;..\Modulos\Cuentas\Cliente;..\Modulos\Asientos\Reglas;..\Modulos\Asientos\Cliente;..\Modulos\Calendarios\Cliente;..\Modulos\Calendarios\Reglas" +-DEUREKALOG;EUREKALOG_VER6 -LUPluginSDK_D7R;GUISDK_D7;BaseD7;Configuracion;Usuarios -w-UNSAFE_TYPE -w-UNSAFE_CODE diff --git a/Cliente/FactuGES.dof b/Cliente/FactuGES.dof index 4ffcfa7..93f4af8 100644 --- a/Cliente/FactuGES.dof +++ b/Cliente/FactuGES.dof @@ -96,7 +96,7 @@ PackageDLLOutputDir= PackageDCPOutputDir= SearchPath=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Intervalos;..\Modulos\Documentos asociados;..\Modulos\Contactos\Cliente;..\Modulos\Contactos\Reglas;..\Modulos\Presupuestos\Cliente;..\Modulos\Presupuestos\Reglas;..\Modulos\Albaranes de cliente\Cliente;..\Modulos\Albaranes de cliente\Reglas;..\Modulos\Facturas de cliente\Cliente;..\Modulos\Facturas de cliente\Reglas;..\Modulos\Pedidos a proveedor\Cliente;..\Modulos\Pedidos a proveedor\Reglas;..\Modulos\Facturas de proveedor\Cliente;..\Modulos\Facturas de proveedor\Reglas;..\Modulos\Montajes\Reglas;..\Modulos\Montajes\Cliente;..\Modulos\Articulos\Cliente;..\Modulos\Articulos\Reglas;..\Modulos\Almacenes\Reglas;..\Modulos\Almacenes\Cliente;..\Modulos\Pagos\Reglas;..\Modulos\Pagos\Cliente;..\Modulos\Cuentas\Reglas;..\Modulos\Cuentas\Cliente;..\Modulos\Asientos\Reglas;..\Modulos\Asientos\Cliente;..\Modulos\Calendarios\Cliente;..\Modulos\Calendarios\Reglas Packages=PluginSDK_D7R;GUISDK_D7;BaseD7;Configuracion;Usuarios -Conditionals= +Conditionals=EUREKALOG;EUREKALOG_VER6 DebugSourceDirs= UsePackages=1 [Parameters] @@ -183,8 +183,8 @@ Count=1 Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; [HistoryLists\hlSearchPath] Count=16 -Item0=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Intervalos;..\Modulos\Documentos asociados;..\Modulos\Contactos\Cliente;..\Modulos\Contactos\Reglas;..\Modulos\Presupuestos\Cliente;..\Modulos\Presupuestos\Reglas;..\Modulos\Albaranes de cliente\Cliente;..\Modulos\Albaranes de cliente\Reglas;..\Modulos\Facturas de cliente\Cliente;..\Modulos\Facturas de cliente\Reglas;..\Modulos\Pedidos a proveedor\Cliente;..\Modulos\Pedidos a proveedor\Reglas;..\Modulos\Facturas de proveedor\Cliente;..\Modulos\Facturas de proveedor\Reglas;..\Modulos\Montajes\Reglas;..\Modulos\Montajes\Cliente;..\Modulos\Articulos\Cliente;..\Modulos\Articulos\Reglas;..\Modulos\Almacenes\Reglas;..\Modulos\Almacenes\Cliente;..\Modulos\Pagos\Reglas;..\Modulos\Pagos\Cliente;..\Modulos\Cuentas\Reglas;..\Modulos\Cuentas\Cliente;..\Modulos\Asientos\Reglas;..\Modulos\Asientos\Cliente;..\Modulos\Calendarios\Cliente;..\Modulos\Calendarios\Reglas -Item1=..\Modulos\Presupuestos\Reglas;..\Modulos\Contactos\Reglas;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Albaranes de cliente\Reglas +Item0=..\Modulos\Presupuestos\Reglas;..\Modulos\Contactos\Reglas;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Albaranes de cliente\Reglas +Item1=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Intervalos;..\Modulos\Documentos asociados;..\Modulos\Contactos\Cliente;..\Modulos\Contactos\Reglas;..\Modulos\Presupuestos\Cliente;..\Modulos\Presupuestos\Reglas;..\Modulos\Albaranes de cliente\Cliente;..\Modulos\Albaranes de cliente\Reglas;..\Modulos\Facturas de cliente\Cliente;..\Modulos\Facturas de cliente\Reglas;..\Modulos\Pedidos a proveedor\Cliente;..\Modulos\Pedidos a proveedor\Reglas;..\Modulos\Facturas de proveedor\Cliente;..\Modulos\Facturas de proveedor\Reglas;..\Modulos\Montajes\Reglas;..\Modulos\Montajes\Cliente;..\Modulos\Articulos\Cliente;..\Modulos\Articulos\Reglas;..\Modulos\Almacenes\Reglas;..\Modulos\Almacenes\Cliente;..\Modulos\Pagos\Reglas;..\Modulos\Pagos\Cliente;..\Modulos\Cuentas\Reglas;..\Modulos\Cuentas\Cliente;..\Modulos\Asientos\Reglas;..\Modulos\Asientos\Cliente;..\Modulos\Calendarios\Cliente;..\Modulos\Calendarios\Reglas Item2=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\Presupuestos\Cliente;..\..\..\Usuarios;..\..\Albaranes de cliente\Cliente;..\..\Documentos asociados;..\..\Pagos\Cliente;..\..\Intervalos\Cliente;..\..\Asientos\Cliente;..\..\Cuentas\Cliente Item3=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\Presupuestos\Cliente;..\..\..\Usuarios;..\..\Albaranes de cliente\Cliente;..\..\Documentos asociados;..\..\Pagos\Cliente;..\..\Intervalos\Cliente;..\..\Asientos\Cliente Item4=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\Presupuestos\Cliente;..\..\..\Usuarios;..\..\Albaranes de cliente\Cliente;..\..\Documentos asociados;..\..\Pagos\Cliente;..\..\Intervalos\Cliente @@ -204,8 +204,8 @@ Count=1 Item0=.\ [HistoryLists\hlOutputDirectorry] Count=2 -Item0=..\Output\Cliente -Item1=..\Output\Servidor +Item0=..\Output\Servidor +Item1=..\Output\Cliente [HistoryLists\hlBPLOutput] Count=3 Item0=..\..\..\Output\Cliente @@ -214,3 +214,486 @@ Item2=..\..\Output\Cliente [HistoryLists\hlDCPOutput] Count=1 Item0=.\ +[Exception Log] +EurekaLog Version=6006 +Activate=1 +Activate Handle=1 +Save Log File=1 +Foreground Tab=0 +Freeze Activate=0 +Freeze Timeout=0 +SMTP From=eurekalog@email.com +SMTP Host= +SMTP Port=25 +SMTP UserID= +SMTP Password= +Append to Log=0 +TerminateBtn Operation=2 +Errors Number=32 +Errors Terminate=3 +Email Address= +Email Object= +Email Send Options=0 +Output Path= +Encrypt Password= +AutoCloseDialogSecs=0 +WebSendMode=0 +SupportULR= +HTMLLayout Count=15 +HTMLLine0="%3Chtml%3E" +HTMLLine1=" %3Chead%3E" +HTMLLine2=" %3C/head%3E" +HTMLLine3=" %3Cbody TopMargin=10 LeftMargin=10%3E" +HTMLLine4=" %3Ctable width="100%%" border="0"%3E" +HTMLLine5=" %3Ctr%3E" +HTMLLine6=" %3Ctd nowrap%3E" +HTMLLine7=" %3Cfont face="Lucida Console, Courier" size="2"%3E" +HTMLLine8=" %3C%%HTML_TAG%%%3E" +HTMLLine9=" %3C/font%3E" +HTMLLine10=" %3C/td%3E" +HTMLLine11=" %3C/tr%3E" +HTMLLine12=" %3C/table%3E" +HTMLLine13=" %3C/body%3E" +HTMLLine14="%3C/html%3E" +AutoCrashOperation=2 +AutoCrashNumber=10 +AutoCrashMinutes=1 +WebURL= +WebUserID= +WebPassword= +WebPort=0 +AttachedFiles= +ProxyURL= +ProxyUser= +ProxyPassword= +ProxyPort=8080 +TrakerUser= +TrakerPassword= +TrakerAssignTo= +TrakerProject= +TrakerCategory= +TrakerTrialID= +ZipPassword= +PreBuildEvent= +PostSuccessfulBuildEvent= +PostFailureBuildEvent= +ExceptionDialogType=2 +Count=0 +EMail Message Line Count=0 +loNoDuplicateErrors=0 +loAppendReproduceText=0 +loDeleteLogAtVersionChange=0 +loAddComputerNameInLogFileName=0 +loSaveModulesAndProcessesSections=1 +loSaveAssemblerAndCPUSections=1 +soAppStartDate=1 +soAppName=1 +soAppVersionNumber=1 +soAppParameters=1 +soAppCompilationDate=1 +soAppUpTime=1 +soExcDate=1 +soExcAddress=1 +soExcModuleName=1 +soExcModuleVersion=1 +soExcType=1 +soExcMessage=1 +soExcID=1 +soExcCount=1 +soExcStatus=1 +soExcNote=1 +soUserID=1 +soUserName=1 +soUserEmail=1 +soUserPrivileges=1 +soUserCompany=1 +soActCtlsFormClass=1 +soActCtlsFormText=1 +soActCtlsControlClass=1 +soActCtlsControlText=1 +soCmpName=1 +soCmpTotalMemory=1 +soCmpFreeMemory=1 +soCmpTotalDisk=1 +soCmpFreeDisk=1 +soCmpSysUpTime=1 +soCmpProcessor=1 +soCmpDisplayMode=1 +soCmpDisplayDPI=1 +soCmpVideoCard=1 +soCmpPrinter=1 +soOSType=1 +soOSBuildN=1 +soOSUpdate=1 +soOSLanguage=1 +soOSCharset=1 +soNetIP=1 +soNetSubmask=1 +soNetGateway=1 +soNetDNS1=1 +soNetDNS2=1 +soNetDHCP=1 +soCustomData=1 +sndShowSendDialog=1 +sndShowSuccessFailureMsg=0 +sndSendEntireLog=0 +sndSendXMLLogCopy=0 +sndSendScreenshot=1 +sndUseOnlyActiveWindow=0 +sndSendLastHTMLPage=1 +sndSendInSeparatedThread=0 +sndAddDateInFileName=0 +sndAddComputerNameInFileName=0 +edoSendErrorReportChecked=1 +edoAttachScreenshotChecked=1 +edoShowCopyToClipOption=1 +edoShowDetailsButton=1 +edoShowInDetailedMode=0 +edoShowInTopMostMode=0 +edoUseEurekaLogLookAndFeel=0 +edoShowSendErrorReportOption=1 +edoShowAttachScreenshotOption=1 +edoShowCustomButton=0 +csoShowDLLs=1 +csoShowBPLs=1 +csoShowBorlandThreads=1 +csoShowWindowsThreads=1 +csoDoNotStoreProcNames=0 +boPauseBorlandThreads=0 +boDoNotPauseMainThread=0 +boPauseWindowsThreads=0 +boUseMainModuleOptions=1 +boCopyLogInCaseOfError=1 +boSaveCompressedCopyInCaseOfError=0 +boHandleSafeCallExceptions=1 +boCallRTLExceptionEvent=0 +boCatchHandledExceptions=0 +loCatchLeaks=0 +loGroupsSonLeaks=1 +loHideBorlandLeaks=1 +loFreeAllLeaks=1 +loCatchLeaksExceptions=1 +cfoReduceFileSize=1 +cfoCheckFileCorruption=0 +Count mtInformationMsgCaption=1 +mtInformationMsgCaption0="Information." +Count mtQuestionMsgCaption=1 +mtQuestionMsgCaption0="Question." +Count mtErrorMsgCaption=1 +mtErrorMsgCaption0="Error." +Count mtDialog_Caption=1 +mtDialog_Caption0="Error occurred" +Count mtDialog_ErrorMsgCaption=2 +mtDialog_ErrorMsgCaption0="An error has occurred during program execution." +mtDialog_ErrorMsgCaption1="Please read the following information for further details." +Count mtDialog_GeneralCaption=1 +mtDialog_GeneralCaption0="General" +Count mtDialog_GeneralHeader=1 +mtDialog_GeneralHeader0="General Information" +Count mtDialog_CallStackCaption=1 +mtDialog_CallStackCaption0="Call Stack" +Count mtDialog_CallStackHeader=1 +mtDialog_CallStackHeader0="Call Stack Information" +Count mtDialog_ModulesCaption=1 +mtDialog_ModulesCaption0="Modules" +Count mtDialog_ModulesHeader=1 +mtDialog_ModulesHeader0="Modules Information" +Count mtDialog_ProcessesCaption=1 +mtDialog_ProcessesCaption0="Processes" +Count mtDialog_ProcessesHeader=1 +mtDialog_ProcessesHeader0="Processes Information" +Count mtDialog_AsmCaption=1 +mtDialog_AsmCaption0="Assembler" +Count mtDialog_AsmHeader=1 +mtDialog_AsmHeader0="Assembler Information" +Count mtDialog_CPUCaption=1 +mtDialog_CPUCaption0="CPU" +Count mtDialog_CPUHeader=1 +mtDialog_CPUHeader0="CPU Information" +Count mtDialog_OKButtonCaption=1 +mtDialog_OKButtonCaption0="%26OK" +Count mtDialog_TerminateButtonCaption=1 +mtDialog_TerminateButtonCaption0="%26Terminate" +Count mtDialog_RestartButtonCaption=1 +mtDialog_RestartButtonCaption0="%26Restart" +Count mtDialog_DetailsButtonCaption=1 +mtDialog_DetailsButtonCaption0="%26Details" +Count mtDialog_CustomButtonCaption=1 +mtDialog_CustomButtonCaption0="%26Help" +Count mtDialog_SendMessage=1 +mtDialog_SendMessage0="%26Send this error via Internet" +Count mtDialog_ScreenshotMessage=1 +mtDialog_ScreenshotMessage0="%26Attach a Screenshot image" +Count mtDialog_CopyMessage=1 +mtDialog_CopyMessage0="%26Copy to Clipboard" +Count mtDialog_SupportMessage=1 +mtDialog_SupportMessage0="Go to the Support Page" +Count mtMSDialog_ErrorMsgCaption=1 +mtMSDialog_ErrorMsgCaption0="The application has encountered a problem. We are sorry for the inconvenience." +Count mtMSDialog_RestartCaption=1 +mtMSDialog_RestartCaption0="Restart application." +Count mtMSDialog_TerminateCaption=1 +mtMSDialog_TerminateCaption0="Terminate application." +Count mtMSDialog_PleaseCaption=1 +mtMSDialog_PleaseCaption0="Please tell us about this problem." +Count mtMSDialog_DescriptionCaption=1 +mtMSDialog_DescriptionCaption0="We have created an error report that you can send to us. We will treat this report as confidential and anonymous." +Count mtMSDialog_SeeDetailsCaption=1 +mtMSDialog_SeeDetailsCaption0="To see what data the error report contains," +Count mtMSDialog_SeeClickCaption=1 +mtMSDialog_SeeClickCaption0="click here." +Count mtMSDialog_HowToReproduceCaption=1 +mtMSDialog_HowToReproduceCaption0="What were you doing when the problem happended (optional)?" +Count mtMSDialog_EmailCaption=1 +mtMSDialog_EmailCaption0="Email address (optional):" +Count mtMSDialog_SendButtonCaption=1 +mtMSDialog_SendButtonCaption0="%26Send Error Report" +Count mtMSDialog_NoSendButtonCaption=1 +mtMSDialog_NoSendButtonCaption0="%26Don't Send" +Count mtLog_AppHeader=1 +mtLog_AppHeader0="Application" +Count mtLog_AppStartDate=1 +mtLog_AppStartDate0="Start Date" +Count mtLog_AppName=1 +mtLog_AppName0="Name/Description" +Count mtLog_AppVersionNumber=1 +mtLog_AppVersionNumber0="Version Number" +Count mtLog_AppParameters=1 +mtLog_AppParameters0="Parameters" +Count mtLog_AppCompilationDate=1 +mtLog_AppCompilationDate0="Compilation Date" +Count mtLog_AppUpTime=1 +mtLog_AppUpTime0="Up Time" +Count mtLog_ExcHeader=1 +mtLog_ExcHeader0="Exception" +Count mtLog_ExcDate=1 +mtLog_ExcDate0="Date" +Count mtLog_ExcAddress=1 +mtLog_ExcAddress0="Address" +Count mtLog_ExcModuleName=1 +mtLog_ExcModuleName0="Module Name" +Count mtLog_ExcModuleVersion=1 +mtLog_ExcModuleVersion0="Module Version" +Count mtLog_ExcType=1 +mtLog_ExcType0="Type" +Count mtLog_ExcMessage=1 +mtLog_ExcMessage0="Message" +Count mtLog_ExcID=1 +mtLog_ExcID0="ID" +Count mtLog_ExcCount=1 +mtLog_ExcCount0="Count" +Count mtLog_ExcStatus=1 +mtLog_ExcStatus0="Status" +Count mtLog_ExcNote=1 +mtLog_ExcNote0="Note" +Count mtLog_UserHeader=1 +mtLog_UserHeader0="User" +Count mtLog_UserID=1 +mtLog_UserID0="ID" +Count mtLog_UserName=1 +mtLog_UserName0="Name" +Count mtLog_UserEmail=1 +mtLog_UserEmail0="Email" +Count mtLog_UserCompany=1 +mtLog_UserCompany0="Company" +Count mtLog_UserPrivileges=1 +mtLog_UserPrivileges0="Privileges" +Count mtLog_ActCtrlsHeader=1 +mtLog_ActCtrlsHeader0="Active Controls" +Count mtLog_ActCtrlsFormClass=1 +mtLog_ActCtrlsFormClass0="Form Class" +Count mtLog_ActCtrlsFormText=1 +mtLog_ActCtrlsFormText0="Form Text" +Count mtLog_ActCtrlsControlClass=1 +mtLog_ActCtrlsControlClass0="Control Class" +Count mtLog_ActCtrlsControlText=1 +mtLog_ActCtrlsControlText0="Control Text" +Count mtLog_CmpHeader=1 +mtLog_CmpHeader0="Computer" +Count mtLog_CmpName=1 +mtLog_CmpName0="Name" +Count mtLog_CmpTotalMemory=1 +mtLog_CmpTotalMemory0="Total Memory" +Count mtLog_CmpFreeMemory=1 +mtLog_CmpFreeMemory0="Free Memory" +Count mtLog_CmpTotalDisk=1 +mtLog_CmpTotalDisk0="Total Disk" +Count mtLog_CmpFreeDisk=1 +mtLog_CmpFreeDisk0="Free Disk" +Count mtLog_CmpSystemUpTime=1 +mtLog_CmpSystemUpTime0="System Up Time" +Count mtLog_CmpProcessor=1 +mtLog_CmpProcessor0="Processor" +Count mtLog_CmpDisplayMode=1 +mtLog_CmpDisplayMode0="Display Mode" +Count mtLog_CmpDisplayDPI=1 +mtLog_CmpDisplayDPI0="Display DPI" +Count mtLog_CmpVideoCard=1 +mtLog_CmpVideoCard0="Video Card" +Count mtLog_CmpPrinter=1 +mtLog_CmpPrinter0="Printer" +Count mtLog_OSHeader=1 +mtLog_OSHeader0="Operating System" +Count mtLog_OSType=1 +mtLog_OSType0="Type" +Count mtLog_OSBuildN=1 +mtLog_OSBuildN0="Build #" +Count mtLog_OSUpdate=1 +mtLog_OSUpdate0="Update" +Count mtLog_OSLanguage=1 +mtLog_OSLanguage0="Language" +Count mtLog_OSCharset=1 +mtLog_OSCharset0="Charset" +Count mtLog_NetHeader=1 +mtLog_NetHeader0="Network" +Count mtLog_NetIP=1 +mtLog_NetIP0="IP Address" +Count mtLog_NetSubmask=1 +mtLog_NetSubmask0="Submask" +Count mtLog_NetGateway=1 +mtLog_NetGateway0="Gateway" +Count mtLog_NetDNS1=1 +mtLog_NetDNS10="DNS 1" +Count mtLog_NetDNS2=1 +mtLog_NetDNS20="DNS 2" +Count mtLog_NetDHCP=1 +mtLog_NetDHCP0="DHCP" +Count mtLog_CustInfoHeader=1 +mtLog_CustInfoHeader0="Custom Information" +Count mtCallStack_Address=1 +mtCallStack_Address0="Address" +Count mtCallStack_Name=1 +mtCallStack_Name0="Module" +Count mtCallStack_Unit=1 +mtCallStack_Unit0="Unit" +Count mtCallStack_Class=1 +mtCallStack_Class0="Class" +Count mtCallStack_Procedure=1 +mtCallStack_Procedure0="Procedure/Method" +Count mtCallStack_Line=1 +mtCallStack_Line0="Line" +Count mtCallStack_MainThread=1 +mtCallStack_MainThread0="Main" +Count mtCallStack_ExceptionThread=1 +mtCallStack_ExceptionThread0="Exception Thread" +Count mtCallStack_RunningThread=1 +mtCallStack_RunningThread0="Running Thread" +Count mtCallStack_CallingThread=1 +mtCallStack_CallingThread0="Calling Thread" +Count mtCallStack_ThreadID=1 +mtCallStack_ThreadID0="ID" +Count mtCallStack_ThreadPriority=1 +mtCallStack_ThreadPriority0="Priority" +Count mtCallStack_ThreadClass=1 +mtCallStack_ThreadClass0="Class" +Count mtCallStack_LeakCaption=1 +mtCallStack_LeakCaption0="Memory Leak" +Count mtCallStack_LeakData=1 +mtCallStack_LeakData0="Data" +Count mtCallStack_LeakType=1 +mtCallStack_LeakType0="Type" +Count mtCallStack_LeakSize=1 +mtCallStack_LeakSize0="Total size" +Count mtCallStack_LeakCount=1 +mtCallStack_LeakCount0="Count" +Count mtSendDialog_Caption=1 +mtSendDialog_Caption0="Send." +Count mtSendDialog_Message=1 +mtSendDialog_Message0="Message" +Count mtSendDialog_Resolving=1 +mtSendDialog_Resolving0="Resolving DNS..." +Count mtSendDialog_Login=1 +mtSendDialog_Login0="Login..." +Count mtSendDialog_Connecting=1 +mtSendDialog_Connecting0="Connecting with server..." +Count mtSendDialog_Connected=1 +mtSendDialog_Connected0="Connected with server." +Count mtSendDialog_Sending=1 +mtSendDialog_Sending0="Sending message..." +Count mtSendDialog_Sent=1 +mtSendDialog_Sent0="Message sent." +Count mtSendDialog_SelectProject=1 +mtSendDialog_SelectProject0="Select project..." +Count mtSendDialog_Searching=1 +mtSendDialog_Searching0="Searching..." +Count mtSendDialog_Modifying=1 +mtSendDialog_Modifying0="Modifying..." +Count mtSendDialog_Disconnecting=1 +mtSendDialog_Disconnecting0="Disconnecting..." +Count mtSendDialog_Disconnected=1 +mtSendDialog_Disconnected0="Disconnected." +Count mtReproduceDialog_Caption=1 +mtReproduceDialog_Caption0="Request" +Count mtReproduceDialog_Request=1 +mtReproduceDialog_Request0="Please describe the steps to reproduce the error:" +Count mtReproduceDialog_OKButtonCaption=1 +mtReproduceDialog_OKButtonCaption0="%26OK" +Count mtModules_Handle=1 +mtModules_Handle0="Handle" +Count mtModules_Name=1 +mtModules_Name0="Name" +Count mtModules_Description=1 +mtModules_Description0="Description" +Count mtModules_Version=1 +mtModules_Version0="Version" +Count mtModules_Size=1 +mtModules_Size0="Size" +Count mtModules_LastModified=1 +mtModules_LastModified0="Modified" +Count mtModules_Path=1 +mtModules_Path0="Path" +Count mtProcesses_ID=1 +mtProcesses_ID0="ID" +Count mtProcesses_Name=1 +mtProcesses_Name0="Name" +Count mtProcesses_Description=1 +mtProcesses_Description0="Description" +Count mtProcesses_Version=1 +mtProcesses_Version0="Version" +Count mtProcesses_Memory=1 +mtProcesses_Memory0="Memory" +Count mtProcesses_Priority=1 +mtProcesses_Priority0="Priority" +Count mtProcesses_Threads=1 +mtProcesses_Threads0="Threads" +Count mtProcesses_Path=1 +mtProcesses_Path0="Path" +Count mtCPU_Registers=1 +mtCPU_Registers0="Registers" +Count mtCPU_Stack=1 +mtCPU_Stack0="Stack" +Count mtCPU_MemoryDump=1 +mtCPU_MemoryDump0="Memory Dump" +Count mtSend_SuccessMsg=1 +mtSend_SuccessMsg0="The message was sent successfully." +Count mtSend_FailureMsg=1 +mtSend_FailureMsg0="Sorry, sending the message didn't work." +Count mtSend_BugClosedMsg=2 +mtSend_BugClosedMsg0="These BUG is just closed." +mtSend_BugClosedMsg1="Contact the program support to obtain an update." +Count mtSend_UnknownErrorMsg=1 +mtSend_UnknownErrorMsg0="Unknown error." +Count mtSend_InvalidLoginMsg=1 +mtSend_InvalidLoginMsg0="Invalid login request." +Count mtSend_InvalidSearchMsg=1 +mtSend_InvalidSearchMsg0="Invalid search request." +Count mtSend_InvalidSelectionMsg=1 +mtSend_InvalidSelectionMsg0="Invalid selection request." +Count mtSend_InvalidInsertMsg=1 +mtSend_InvalidInsertMsg0="Invalid insert request." +Count mtSend_InvalidModifyMsg=1 +mtSend_InvalidModifyMsg0="Invalid modify request." +Count mtFileCrackedMsg=2 +mtFileCrackedMsg0="This file is cracked." +mtFileCrackedMsg1="The application will be closed." +Count mtException_LeakMultiFree=1 +mtException_LeakMultiFree0="Multi Free memory leak." +Count mtException_LeakMemoryOverrun=1 +mtException_LeakMemoryOverrun0="Memory Overrun leak." +Count mtException_AntiFreeze=1 +mtException_AntiFreeze0="The application seems to be frozen." +Count mtInvalidEmailMsg=1 +mtInvalidEmailMsg0="Invalid email." +TextsCollection= + + diff --git a/Cliente/FactuGES.dpr b/Cliente/FactuGES.dpr index 5b4aca5..918cb8d 100644 --- a/Cliente/FactuGES.dpr +++ b/Cliente/FactuGES.dpr @@ -1,6 +1,7 @@ program FactuGES; uses + ExceptionLog, Forms, uLoginForm, uPantallaPrincipal in 'uPantallaPrincipal.pas' {fPantallaPrincipal}, diff --git a/Modulos/Albaranes de cliente/Servidor/srvAlbaranesCliente_Impl.dfm b/Modulos/Albaranes de cliente/Servidor/srvAlbaranesCliente_Impl.dfm index 65b17ee..10631a4 100644 --- a/Modulos/Albaranes de cliente/Servidor/srvAlbaranesCliente_Impl.dfm +++ b/Modulos/Albaranes de cliente/Servidor/srvAlbaranesCliente_Impl.dfm @@ -6,8 +6,8 @@ object srvAlbaranesCliente: TsrvAlbaranesCliente ConnectionName = 'IBX' ServiceSchema = schAlbaranesCliente ServiceAdapter = DABINAdapter - Left = 679 - Top = 263 + Left = 680 + Top = 306 Height = 463 Width = 347 object schAlbaranesCliente: TDASchema diff --git a/Modulos/Almacenes/Servidor/srvAlmacenes_Impl.dfm b/Modulos/Almacenes/Servidor/srvAlmacenes_Impl.dfm index d5796c4..f42df75 100644 --- a/Modulos/Almacenes/Servidor/srvAlmacenes_Impl.dfm +++ b/Modulos/Almacenes/Servidor/srvAlmacenes_Impl.dfm @@ -6,8 +6,8 @@ object srvAlmacenes: TsrvAlmacenes ConnectionName = 'IBX' ServiceSchema = schAlmacenes ServiceAdapter = DABINAdapter - Left = 330 - Top = 210 + Left = 331 + Top = 245 Height = 300 Width = 300 object schAlmacenes: TDASchema diff --git a/Modulos/Articulos/Servidor/srvArticulos_Impl.dfm b/Modulos/Articulos/Servidor/srvArticulos_Impl.dfm index d2073cb..b376ef4 100644 --- a/Modulos/Articulos/Servidor/srvArticulos_Impl.dfm +++ b/Modulos/Articulos/Servidor/srvArticulos_Impl.dfm @@ -5,8 +5,8 @@ object srvArticulos: TsrvArticulos ConnectionName = 'IBX' ServiceSchema = schArticulos ServiceAdapter = DABINAdapter - Left = 737 - Top = 235 + Left = 739 + Top = 274 Height = 300 Width = 300 object schArticulos: TDASchema diff --git a/Modulos/Asientos/Servidor/srvAsientos_Impl.dfm b/Modulos/Asientos/Servidor/srvAsientos_Impl.dfm index 174d162..e63bc3c 100644 --- a/Modulos/Asientos/Servidor/srvAsientos_Impl.dfm +++ b/Modulos/Asientos/Servidor/srvAsientos_Impl.dfm @@ -6,8 +6,8 @@ object srvAsientos: TsrvAsientos ConnectionName = 'IBX' ServiceSchema = schAsientos ServiceAdapter = DABINAdapter - Left = 840 - Top = 176 + Left = 842 + Top = 205 Height = 300 Width = 300 object schAsientos: TDASchema diff --git a/Modulos/Calendarios/Servidor/srvCitas_Impl.dfm b/Modulos/Calendarios/Servidor/srvCitas_Impl.dfm index 55688be..dc9f440 100644 --- a/Modulos/Calendarios/Servidor/srvCitas_Impl.dfm +++ b/Modulos/Calendarios/Servidor/srvCitas_Impl.dfm @@ -6,8 +6,8 @@ object srvCitas: TsrvCitas ConnectionName = 'IBX' ServiceSchema = schCitas ServiceAdapter = DABINAdapter - Left = 823 - Top = 215 + Left = 825 + Top = 250 Height = 184 Width = 245 object schCitas: TDASchema diff --git a/Modulos/Contactos/Servidor/srvContactos_Impl.dfm b/Modulos/Contactos/Servidor/srvContactos_Impl.dfm index 451b075..eed0904 100644 --- a/Modulos/Contactos/Servidor/srvContactos_Impl.dfm +++ b/Modulos/Contactos/Servidor/srvContactos_Impl.dfm @@ -7,8 +7,8 @@ object srvContactos: TsrvContactos ConnectionName = 'IBX' ServiceSchema = schContactos ServiceAdapter = DABINAdapter - Left = 1013 - Top = 326 + Left = 1015 + Top = 380 Height = 354 Width = 450 object schContactos: TDASchema diff --git a/Modulos/Cuentas/Servidor/srvCuentas_Impl.dfm b/Modulos/Cuentas/Servidor/srvCuentas_Impl.dfm index f24edf0..5ac5deb 100644 --- a/Modulos/Cuentas/Servidor/srvCuentas_Impl.dfm +++ b/Modulos/Cuentas/Servidor/srvCuentas_Impl.dfm @@ -6,8 +6,8 @@ object srvCuentas: TsrvCuentas ConnectionName = 'IBX' ServiceSchema = schCuentas ServiceAdapter = DABINAdapter - Left = 909 - Top = 187 + Left = 911 + Top = 218 Height = 300 Width = 300 object schCuentas: TDASchema diff --git a/Modulos/Facturas de cliente/Servidor/srvFacturasCliente_Impl.dfm b/Modulos/Facturas de cliente/Servidor/srvFacturasCliente_Impl.dfm index 656d211..e470646 100644 --- a/Modulos/Facturas de cliente/Servidor/srvFacturasCliente_Impl.dfm +++ b/Modulos/Facturas de cliente/Servidor/srvFacturasCliente_Impl.dfm @@ -6,8 +6,8 @@ object srvFacturasCliente: TsrvFacturasCliente ConnectionName = 'IBX' ServiceSchema = schFacturasCliente ServiceAdapter = DABINAdapter - Left = 1164 - Top = 322 + Left = 1166 + Top = 375 Height = 490 Width = 347 object schFacturasCliente: TDASchema diff --git a/Modulos/Facturas de proveedor/Servidor/srvFacturasProveedor_Impl.dfm b/Modulos/Facturas de proveedor/Servidor/srvFacturasProveedor_Impl.dfm index c5dec39..5297ce6 100644 --- a/Modulos/Facturas de proveedor/Servidor/srvFacturasProveedor_Impl.dfm +++ b/Modulos/Facturas de proveedor/Servidor/srvFacturasProveedor_Impl.dfm @@ -6,8 +6,8 @@ object srvFacturasProveedor: TsrvFacturasProveedor ConnectionName = 'IBX' ServiceSchema = schFacturasProveedor ServiceAdapter = DABINAdapter - Left = 782 - Top = 397 + Left = 784 + Top = 463 Height = 392 Width = 369 object schFacturasProveedor: TDASchema diff --git a/Modulos/Intervalos/Servidor/srvIntervalos_Impl.dfm b/Modulos/Intervalos/Servidor/srvIntervalos_Impl.dfm index 8fff3ef..c8e7d8f 100644 --- a/Modulos/Intervalos/Servidor/srvIntervalos_Impl.dfm +++ b/Modulos/Intervalos/Servidor/srvIntervalos_Impl.dfm @@ -6,8 +6,8 @@ object srvIntervalos: TsrvIntervalos ConnectionName = 'IBX' ServiceSchema = schIntervalos ServiceAdapter = DABINAdapter - Left = 729 - Top = 214 + Left = 731 + Top = 249 Height = 300 Width = 300 object schIntervalos: TDASchema diff --git a/Modulos/Montajes/Servidor/srvMontajes_Impl.dfm b/Modulos/Montajes/Servidor/srvMontajes_Impl.dfm index 135c07a..91b9a1a 100644 --- a/Modulos/Montajes/Servidor/srvMontajes_Impl.dfm +++ b/Modulos/Montajes/Servidor/srvMontajes_Impl.dfm @@ -5,8 +5,8 @@ object srvMontajes: TsrvMontajes ConnectionName = 'IBX' ServiceSchema = schMontajes ServiceAdapter = DABINAdapter - Left = 1061 - Top = 217 + Left = 1063 + Top = 253 Height = 356 Width = 300 object bpMontajes: TDABusinessProcessor diff --git a/Modulos/Pagos/Servidor/srvPagos_Impl.dfm b/Modulos/Pagos/Servidor/srvPagos_Impl.dfm index 3c47353..9150262 100644 --- a/Modulos/Pagos/Servidor/srvPagos_Impl.dfm +++ b/Modulos/Pagos/Servidor/srvPagos_Impl.dfm @@ -6,8 +6,8 @@ object srvPagos: TsrvPagos ConnectionName = 'IBX' ServiceSchema = schPagos ServiceAdapter = DABINAdapter - Left = 566 - Top = 470 + Left = 567 + Top = 548 Height = 300 Width = 300 object schPagos: TDASchema diff --git a/Modulos/Pedidos a proveedor/Servidor/srvPedidosProveedor_Impl.dfm b/Modulos/Pedidos a proveedor/Servidor/srvPedidosProveedor_Impl.dfm index 6ddb941..67a9c24 100644 --- a/Modulos/Pedidos a proveedor/Servidor/srvPedidosProveedor_Impl.dfm +++ b/Modulos/Pedidos a proveedor/Servidor/srvPedidosProveedor_Impl.dfm @@ -6,8 +6,8 @@ object srvPedidosProveedor: TsrvPedidosProveedor ConnectionName = 'IBX' ServiceSchema = schPedidosProveedor ServiceAdapter = DABINAdapter - Left = 729 - Top = 318 + Left = 731 + Top = 370 Height = 459 Width = 300 object schPedidosProveedor: TDASchema diff --git a/Modulos/Presupuestos/Cliente/Presupuestos_Intf.dof b/Modulos/Presupuestos/Cliente/Presupuestos_Intf.dof index cce71db..ce7f04b 100644 --- a/Modulos/Presupuestos/Cliente/Presupuestos_Intf.dof +++ b/Modulos/Presupuestos/Cliente/Presupuestos_Intf.dof @@ -168,12 +168,12 @@ Count=1 Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; [HistoryLists\hlSearchPath] Count=16 -Item0=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\Presupuestos\Cliente;..\..\..\Usuarios;..\..\Albaranes de cliente\Cliente;..\..\Documentos asociados;..\..\Pagos\Cliente;..\..\Intervalos\Cliente;..\..\Asientos\Cliente;..\..\Cuentas\Cliente -Item1=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\Presupuestos\Cliente;..\..\..\Usuarios;..\..\Albaranes de cliente\Cliente;..\..\Documentos asociados;..\..\Pagos\Cliente;..\..\Intervalos\Cliente;..\..\Asientos\Cliente -Item2=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\Presupuestos\Cliente;..\..\..\Usuarios;..\..\Albaranes de cliente\Cliente;..\..\Documentos asociados;..\..\Pagos\Cliente;..\..\Intervalos\Cliente -Item3=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\Presupuestos\Cliente;..\..\..\Usuarios;..\..\Albaranes de cliente\Cliente;..\..\Documentos asociados;..\..\Pagos\Cliente -Item4=..\Modulos\Presupuestos\Reglas;..\Modulos\Contactos\Reglas;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Albaranes de cliente\Reglas -Item5=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Intervalos;..\Modulos\Documentos asociados;..\Modulos\Contactos\Cliente;..\Modulos\Contactos\Reglas;..\Modulos\Presupuestos\Cliente;..\Modulos\Presupuestos\Reglas;..\Modulos\Albaranes de cliente\Cliente;..\Modulos\Albaranes de cliente\Reglas;..\Modulos\Facturas de cliente\Cliente;..\Modulos\Facturas de cliente\Reglas;..\Modulos\Pedidos a proveedor\Cliente;..\Modulos\Pedidos a proveedor\Reglas;..\Modulos\Facturas de proveedor\Cliente;..\Modulos\Facturas de proveedor\Reglas;..\Modulos\Montajes\Reglas;..\Modulos\Montajes\Cliente;..\Modulos\Articulos\Cliente;..\Modulos\Articulos\Reglas;..\Modulos\Almacenes\Reglas;..\Modulos\Almacenes\Cliente;..\Modulos\Pagos\Reglas;..\Modulos\Pagos\Cliente;..\Modulos\Cuentas\Reglas;..\Modulos\Cuentas\Cliente;..\Modulos\Asientos\Reglas;..\Modulos\Asientos\Cliente;..\Modulos\Calendarios\Cliente;..\Modulos\Calendarios\Reglas +Item0=..\Modulos\Presupuestos\Reglas;..\Modulos\Contactos\Reglas;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Albaranes de cliente\Reglas +Item1=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Intervalos;..\Modulos\Documentos asociados;..\Modulos\Contactos\Cliente;..\Modulos\Contactos\Reglas;..\Modulos\Presupuestos\Cliente;..\Modulos\Presupuestos\Reglas;..\Modulos\Albaranes de cliente\Cliente;..\Modulos\Albaranes de cliente\Reglas;..\Modulos\Facturas de cliente\Cliente;..\Modulos\Facturas de cliente\Reglas;..\Modulos\Pedidos a proveedor\Cliente;..\Modulos\Pedidos a proveedor\Reglas;..\Modulos\Facturas de proveedor\Cliente;..\Modulos\Facturas de proveedor\Reglas;..\Modulos\Montajes\Reglas;..\Modulos\Montajes\Cliente;..\Modulos\Articulos\Cliente;..\Modulos\Articulos\Reglas;..\Modulos\Almacenes\Reglas;..\Modulos\Almacenes\Cliente;..\Modulos\Pagos\Reglas;..\Modulos\Pagos\Cliente;..\Modulos\Cuentas\Reglas;..\Modulos\Cuentas\Cliente;..\Modulos\Asientos\Reglas;..\Modulos\Asientos\Cliente;..\Modulos\Calendarios\Cliente;..\Modulos\Calendarios\Reglas +Item2=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\Presupuestos\Cliente;..\..\..\Usuarios;..\..\Albaranes de cliente\Cliente;..\..\Documentos asociados;..\..\Pagos\Cliente;..\..\Intervalos\Cliente;..\..\Asientos\Cliente;..\..\Cuentas\Cliente +Item3=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\Presupuestos\Cliente;..\..\..\Usuarios;..\..\Albaranes de cliente\Cliente;..\..\Documentos asociados;..\..\Pagos\Cliente;..\..\Intervalos\Cliente;..\..\Asientos\Cliente +Item4=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\Presupuestos\Cliente;..\..\..\Usuarios;..\..\Albaranes de cliente\Cliente;..\..\Documentos asociados;..\..\Pagos\Cliente;..\..\Intervalos\Cliente +Item5=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\Presupuestos\Cliente;..\..\..\Usuarios;..\..\Albaranes de cliente\Cliente;..\..\Documentos asociados;..\..\Pagos\Cliente Item6=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\..\Usuarios;..\..\Montajes\Cliente;..\..\Documentos asociados;..\..\Contactos\Cliente;..\..\Almacenes\Cliente Item7=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\Contactos\Cliente;..\..\..\Usuarios;..\..\Documentos asociados Item8=$(DELPHI)\Lib\Debug;D:\PROYEC~1\COMPON~1\jcl\lib\D7\debug;..\..\..\Base;..\..\..\Servidor;..\..\..\Usuarios;..\..\Montajes\Cliente;..\..\Documentos asociados;..\..\Contactos\Cliente @@ -199,3 +199,486 @@ Item2=..\..\Output\Cliente [HistoryLists\hlDCPOutput] Count=1 Item0=.\ +[Exception Log] +EurekaLog Version=6006 +Activate=0 +Activate Handle=1 +Save Log File=1 +Foreground Tab=0 +Freeze Activate=0 +Freeze Timeout=0 +SMTP From=eurekalog@email.com +SMTP Host= +SMTP Port=25 +SMTP UserID= +SMTP Password= +Append to Log=0 +TerminateBtn Operation=2 +Errors Number=32 +Errors Terminate=3 +Email Address= +Email Object= +Email Send Options=0 +Output Path= +Encrypt Password= +AutoCloseDialogSecs=0 +WebSendMode=0 +SupportULR= +HTMLLayout Count=15 +HTMLLine0="%3Chtml%3E" +HTMLLine1=" %3Chead%3E" +HTMLLine2=" %3C/head%3E" +HTMLLine3=" %3Cbody TopMargin=10 LeftMargin=10%3E" +HTMLLine4=" %3Ctable width="100%%" border="0"%3E" +HTMLLine5=" %3Ctr%3E" +HTMLLine6=" %3Ctd nowrap%3E" +HTMLLine7=" %3Cfont face="Lucida Console, Courier" size="2"%3E" +HTMLLine8=" %3C%%HTML_TAG%%%3E" +HTMLLine9=" %3C/font%3E" +HTMLLine10=" %3C/td%3E" +HTMLLine11=" %3C/tr%3E" +HTMLLine12=" %3C/table%3E" +HTMLLine13=" %3C/body%3E" +HTMLLine14="%3C/html%3E" +AutoCrashOperation=2 +AutoCrashNumber=10 +AutoCrashMinutes=1 +WebURL= +WebUserID= +WebPassword= +WebPort=0 +AttachedFiles= +ProxyURL= +ProxyUser= +ProxyPassword= +ProxyPort=8080 +TrakerUser= +TrakerPassword= +TrakerAssignTo= +TrakerProject= +TrakerCategory= +TrakerTrialID= +ZipPassword= +PreBuildEvent= +PostSuccessfulBuildEvent= +PostFailureBuildEvent= +ExceptionDialogType=2 +Count=0 +EMail Message Line Count=0 +loNoDuplicateErrors=0 +loAppendReproduceText=0 +loDeleteLogAtVersionChange=0 +loAddComputerNameInLogFileName=0 +loSaveModulesAndProcessesSections=1 +loSaveAssemblerAndCPUSections=1 +soAppStartDate=1 +soAppName=1 +soAppVersionNumber=1 +soAppParameters=1 +soAppCompilationDate=1 +soAppUpTime=1 +soExcDate=1 +soExcAddress=1 +soExcModuleName=1 +soExcModuleVersion=1 +soExcType=1 +soExcMessage=1 +soExcID=1 +soExcCount=1 +soExcStatus=1 +soExcNote=1 +soUserID=1 +soUserName=1 +soUserEmail=1 +soUserPrivileges=1 +soUserCompany=1 +soActCtlsFormClass=1 +soActCtlsFormText=1 +soActCtlsControlClass=1 +soActCtlsControlText=1 +soCmpName=1 +soCmpTotalMemory=1 +soCmpFreeMemory=1 +soCmpTotalDisk=1 +soCmpFreeDisk=1 +soCmpSysUpTime=1 +soCmpProcessor=1 +soCmpDisplayMode=1 +soCmpDisplayDPI=1 +soCmpVideoCard=1 +soCmpPrinter=1 +soOSType=1 +soOSBuildN=1 +soOSUpdate=1 +soOSLanguage=1 +soOSCharset=1 +soNetIP=1 +soNetSubmask=1 +soNetGateway=1 +soNetDNS1=1 +soNetDNS2=1 +soNetDHCP=1 +soCustomData=1 +sndShowSendDialog=1 +sndShowSuccessFailureMsg=0 +sndSendEntireLog=0 +sndSendXMLLogCopy=0 +sndSendScreenshot=1 +sndUseOnlyActiveWindow=0 +sndSendLastHTMLPage=1 +sndSendInSeparatedThread=0 +sndAddDateInFileName=0 +sndAddComputerNameInFileName=0 +edoSendErrorReportChecked=1 +edoAttachScreenshotChecked=1 +edoShowCopyToClipOption=1 +edoShowDetailsButton=1 +edoShowInDetailedMode=0 +edoShowInTopMostMode=0 +edoUseEurekaLogLookAndFeel=0 +edoShowSendErrorReportOption=1 +edoShowAttachScreenshotOption=1 +edoShowCustomButton=0 +csoShowDLLs=1 +csoShowBPLs=1 +csoShowBorlandThreads=1 +csoShowWindowsThreads=1 +csoDoNotStoreProcNames=0 +boPauseBorlandThreads=0 +boDoNotPauseMainThread=0 +boPauseWindowsThreads=0 +boUseMainModuleOptions=1 +boCopyLogInCaseOfError=1 +boSaveCompressedCopyInCaseOfError=0 +boHandleSafeCallExceptions=1 +boCallRTLExceptionEvent=0 +boCatchHandledExceptions=0 +loCatchLeaks=0 +loGroupsSonLeaks=1 +loHideBorlandLeaks=1 +loFreeAllLeaks=1 +loCatchLeaksExceptions=1 +cfoReduceFileSize=1 +cfoCheckFileCorruption=0 +Count mtInformationMsgCaption=1 +mtInformationMsgCaption0="Information." +Count mtQuestionMsgCaption=1 +mtQuestionMsgCaption0="Question." +Count mtErrorMsgCaption=1 +mtErrorMsgCaption0="Error." +Count mtDialog_Caption=1 +mtDialog_Caption0="Error occurred" +Count mtDialog_ErrorMsgCaption=2 +mtDialog_ErrorMsgCaption0="An error has occurred during program execution." +mtDialog_ErrorMsgCaption1="Please read the following information for further details." +Count mtDialog_GeneralCaption=1 +mtDialog_GeneralCaption0="General" +Count mtDialog_GeneralHeader=1 +mtDialog_GeneralHeader0="General Information" +Count mtDialog_CallStackCaption=1 +mtDialog_CallStackCaption0="Call Stack" +Count mtDialog_CallStackHeader=1 +mtDialog_CallStackHeader0="Call Stack Information" +Count mtDialog_ModulesCaption=1 +mtDialog_ModulesCaption0="Modules" +Count mtDialog_ModulesHeader=1 +mtDialog_ModulesHeader0="Modules Information" +Count mtDialog_ProcessesCaption=1 +mtDialog_ProcessesCaption0="Processes" +Count mtDialog_ProcessesHeader=1 +mtDialog_ProcessesHeader0="Processes Information" +Count mtDialog_AsmCaption=1 +mtDialog_AsmCaption0="Assembler" +Count mtDialog_AsmHeader=1 +mtDialog_AsmHeader0="Assembler Information" +Count mtDialog_CPUCaption=1 +mtDialog_CPUCaption0="CPU" +Count mtDialog_CPUHeader=1 +mtDialog_CPUHeader0="CPU Information" +Count mtDialog_OKButtonCaption=1 +mtDialog_OKButtonCaption0="%26OK" +Count mtDialog_TerminateButtonCaption=1 +mtDialog_TerminateButtonCaption0="%26Terminate" +Count mtDialog_RestartButtonCaption=1 +mtDialog_RestartButtonCaption0="%26Restart" +Count mtDialog_DetailsButtonCaption=1 +mtDialog_DetailsButtonCaption0="%26Details" +Count mtDialog_CustomButtonCaption=1 +mtDialog_CustomButtonCaption0="%26Help" +Count mtDialog_SendMessage=1 +mtDialog_SendMessage0="%26Send this error via Internet" +Count mtDialog_ScreenshotMessage=1 +mtDialog_ScreenshotMessage0="%26Attach a Screenshot image" +Count mtDialog_CopyMessage=1 +mtDialog_CopyMessage0="%26Copy to Clipboard" +Count mtDialog_SupportMessage=1 +mtDialog_SupportMessage0="Go to the Support Page" +Count mtMSDialog_ErrorMsgCaption=1 +mtMSDialog_ErrorMsgCaption0="The application has encountered a problem. We are sorry for the inconvenience." +Count mtMSDialog_RestartCaption=1 +mtMSDialog_RestartCaption0="Restart application." +Count mtMSDialog_TerminateCaption=1 +mtMSDialog_TerminateCaption0="Terminate application." +Count mtMSDialog_PleaseCaption=1 +mtMSDialog_PleaseCaption0="Please tell us about this problem." +Count mtMSDialog_DescriptionCaption=1 +mtMSDialog_DescriptionCaption0="We have created an error report that you can send to us. We will treat this report as confidential and anonymous." +Count mtMSDialog_SeeDetailsCaption=1 +mtMSDialog_SeeDetailsCaption0="To see what data the error report contains," +Count mtMSDialog_SeeClickCaption=1 +mtMSDialog_SeeClickCaption0="click here." +Count mtMSDialog_HowToReproduceCaption=1 +mtMSDialog_HowToReproduceCaption0="What were you doing when the problem happended (optional)?" +Count mtMSDialog_EmailCaption=1 +mtMSDialog_EmailCaption0="Email address (optional):" +Count mtMSDialog_SendButtonCaption=1 +mtMSDialog_SendButtonCaption0="%26Send Error Report" +Count mtMSDialog_NoSendButtonCaption=1 +mtMSDialog_NoSendButtonCaption0="%26Don't Send" +Count mtLog_AppHeader=1 +mtLog_AppHeader0="Application" +Count mtLog_AppStartDate=1 +mtLog_AppStartDate0="Start Date" +Count mtLog_AppName=1 +mtLog_AppName0="Name/Description" +Count mtLog_AppVersionNumber=1 +mtLog_AppVersionNumber0="Version Number" +Count mtLog_AppParameters=1 +mtLog_AppParameters0="Parameters" +Count mtLog_AppCompilationDate=1 +mtLog_AppCompilationDate0="Compilation Date" +Count mtLog_AppUpTime=1 +mtLog_AppUpTime0="Up Time" +Count mtLog_ExcHeader=1 +mtLog_ExcHeader0="Exception" +Count mtLog_ExcDate=1 +mtLog_ExcDate0="Date" +Count mtLog_ExcAddress=1 +mtLog_ExcAddress0="Address" +Count mtLog_ExcModuleName=1 +mtLog_ExcModuleName0="Module Name" +Count mtLog_ExcModuleVersion=1 +mtLog_ExcModuleVersion0="Module Version" +Count mtLog_ExcType=1 +mtLog_ExcType0="Type" +Count mtLog_ExcMessage=1 +mtLog_ExcMessage0="Message" +Count mtLog_ExcID=1 +mtLog_ExcID0="ID" +Count mtLog_ExcCount=1 +mtLog_ExcCount0="Count" +Count mtLog_ExcStatus=1 +mtLog_ExcStatus0="Status" +Count mtLog_ExcNote=1 +mtLog_ExcNote0="Note" +Count mtLog_UserHeader=1 +mtLog_UserHeader0="User" +Count mtLog_UserID=1 +mtLog_UserID0="ID" +Count mtLog_UserName=1 +mtLog_UserName0="Name" +Count mtLog_UserEmail=1 +mtLog_UserEmail0="Email" +Count mtLog_UserCompany=1 +mtLog_UserCompany0="Company" +Count mtLog_UserPrivileges=1 +mtLog_UserPrivileges0="Privileges" +Count mtLog_ActCtrlsHeader=1 +mtLog_ActCtrlsHeader0="Active Controls" +Count mtLog_ActCtrlsFormClass=1 +mtLog_ActCtrlsFormClass0="Form Class" +Count mtLog_ActCtrlsFormText=1 +mtLog_ActCtrlsFormText0="Form Text" +Count mtLog_ActCtrlsControlClass=1 +mtLog_ActCtrlsControlClass0="Control Class" +Count mtLog_ActCtrlsControlText=1 +mtLog_ActCtrlsControlText0="Control Text" +Count mtLog_CmpHeader=1 +mtLog_CmpHeader0="Computer" +Count mtLog_CmpName=1 +mtLog_CmpName0="Name" +Count mtLog_CmpTotalMemory=1 +mtLog_CmpTotalMemory0="Total Memory" +Count mtLog_CmpFreeMemory=1 +mtLog_CmpFreeMemory0="Free Memory" +Count mtLog_CmpTotalDisk=1 +mtLog_CmpTotalDisk0="Total Disk" +Count mtLog_CmpFreeDisk=1 +mtLog_CmpFreeDisk0="Free Disk" +Count mtLog_CmpSystemUpTime=1 +mtLog_CmpSystemUpTime0="System Up Time" +Count mtLog_CmpProcessor=1 +mtLog_CmpProcessor0="Processor" +Count mtLog_CmpDisplayMode=1 +mtLog_CmpDisplayMode0="Display Mode" +Count mtLog_CmpDisplayDPI=1 +mtLog_CmpDisplayDPI0="Display DPI" +Count mtLog_CmpVideoCard=1 +mtLog_CmpVideoCard0="Video Card" +Count mtLog_CmpPrinter=1 +mtLog_CmpPrinter0="Printer" +Count mtLog_OSHeader=1 +mtLog_OSHeader0="Operating System" +Count mtLog_OSType=1 +mtLog_OSType0="Type" +Count mtLog_OSBuildN=1 +mtLog_OSBuildN0="Build #" +Count mtLog_OSUpdate=1 +mtLog_OSUpdate0="Update" +Count mtLog_OSLanguage=1 +mtLog_OSLanguage0="Language" +Count mtLog_OSCharset=1 +mtLog_OSCharset0="Charset" +Count mtLog_NetHeader=1 +mtLog_NetHeader0="Network" +Count mtLog_NetIP=1 +mtLog_NetIP0="IP Address" +Count mtLog_NetSubmask=1 +mtLog_NetSubmask0="Submask" +Count mtLog_NetGateway=1 +mtLog_NetGateway0="Gateway" +Count mtLog_NetDNS1=1 +mtLog_NetDNS10="DNS 1" +Count mtLog_NetDNS2=1 +mtLog_NetDNS20="DNS 2" +Count mtLog_NetDHCP=1 +mtLog_NetDHCP0="DHCP" +Count mtLog_CustInfoHeader=1 +mtLog_CustInfoHeader0="Custom Information" +Count mtCallStack_Address=1 +mtCallStack_Address0="Address" +Count mtCallStack_Name=1 +mtCallStack_Name0="Module" +Count mtCallStack_Unit=1 +mtCallStack_Unit0="Unit" +Count mtCallStack_Class=1 +mtCallStack_Class0="Class" +Count mtCallStack_Procedure=1 +mtCallStack_Procedure0="Procedure/Method" +Count mtCallStack_Line=1 +mtCallStack_Line0="Line" +Count mtCallStack_MainThread=1 +mtCallStack_MainThread0="Main" +Count mtCallStack_ExceptionThread=1 +mtCallStack_ExceptionThread0="Exception Thread" +Count mtCallStack_RunningThread=1 +mtCallStack_RunningThread0="Running Thread" +Count mtCallStack_CallingThread=1 +mtCallStack_CallingThread0="Calling Thread" +Count mtCallStack_ThreadID=1 +mtCallStack_ThreadID0="ID" +Count mtCallStack_ThreadPriority=1 +mtCallStack_ThreadPriority0="Priority" +Count mtCallStack_ThreadClass=1 +mtCallStack_ThreadClass0="Class" +Count mtCallStack_LeakCaption=1 +mtCallStack_LeakCaption0="Memory Leak" +Count mtCallStack_LeakData=1 +mtCallStack_LeakData0="Data" +Count mtCallStack_LeakType=1 +mtCallStack_LeakType0="Type" +Count mtCallStack_LeakSize=1 +mtCallStack_LeakSize0="Total size" +Count mtCallStack_LeakCount=1 +mtCallStack_LeakCount0="Count" +Count mtSendDialog_Caption=1 +mtSendDialog_Caption0="Send." +Count mtSendDialog_Message=1 +mtSendDialog_Message0="Message" +Count mtSendDialog_Resolving=1 +mtSendDialog_Resolving0="Resolving DNS..." +Count mtSendDialog_Login=1 +mtSendDialog_Login0="Login..." +Count mtSendDialog_Connecting=1 +mtSendDialog_Connecting0="Connecting with server..." +Count mtSendDialog_Connected=1 +mtSendDialog_Connected0="Connected with server." +Count mtSendDialog_Sending=1 +mtSendDialog_Sending0="Sending message..." +Count mtSendDialog_Sent=1 +mtSendDialog_Sent0="Message sent." +Count mtSendDialog_SelectProject=1 +mtSendDialog_SelectProject0="Select project..." +Count mtSendDialog_Searching=1 +mtSendDialog_Searching0="Searching..." +Count mtSendDialog_Modifying=1 +mtSendDialog_Modifying0="Modifying..." +Count mtSendDialog_Disconnecting=1 +mtSendDialog_Disconnecting0="Disconnecting..." +Count mtSendDialog_Disconnected=1 +mtSendDialog_Disconnected0="Disconnected." +Count mtReproduceDialog_Caption=1 +mtReproduceDialog_Caption0="Request" +Count mtReproduceDialog_Request=1 +mtReproduceDialog_Request0="Please describe the steps to reproduce the error:" +Count mtReproduceDialog_OKButtonCaption=1 +mtReproduceDialog_OKButtonCaption0="%26OK" +Count mtModules_Handle=1 +mtModules_Handle0="Handle" +Count mtModules_Name=1 +mtModules_Name0="Name" +Count mtModules_Description=1 +mtModules_Description0="Description" +Count mtModules_Version=1 +mtModules_Version0="Version" +Count mtModules_Size=1 +mtModules_Size0="Size" +Count mtModules_LastModified=1 +mtModules_LastModified0="Modified" +Count mtModules_Path=1 +mtModules_Path0="Path" +Count mtProcesses_ID=1 +mtProcesses_ID0="ID" +Count mtProcesses_Name=1 +mtProcesses_Name0="Name" +Count mtProcesses_Description=1 +mtProcesses_Description0="Description" +Count mtProcesses_Version=1 +mtProcesses_Version0="Version" +Count mtProcesses_Memory=1 +mtProcesses_Memory0="Memory" +Count mtProcesses_Priority=1 +mtProcesses_Priority0="Priority" +Count mtProcesses_Threads=1 +mtProcesses_Threads0="Threads" +Count mtProcesses_Path=1 +mtProcesses_Path0="Path" +Count mtCPU_Registers=1 +mtCPU_Registers0="Registers" +Count mtCPU_Stack=1 +mtCPU_Stack0="Stack" +Count mtCPU_MemoryDump=1 +mtCPU_MemoryDump0="Memory Dump" +Count mtSend_SuccessMsg=1 +mtSend_SuccessMsg0="The message was sent successfully." +Count mtSend_FailureMsg=1 +mtSend_FailureMsg0="Sorry, sending the message didn't work." +Count mtSend_BugClosedMsg=2 +mtSend_BugClosedMsg0="These BUG is just closed." +mtSend_BugClosedMsg1="Contact the program support to obtain an update." +Count mtSend_UnknownErrorMsg=1 +mtSend_UnknownErrorMsg0="Unknown error." +Count mtSend_InvalidLoginMsg=1 +mtSend_InvalidLoginMsg0="Invalid login request." +Count mtSend_InvalidSearchMsg=1 +mtSend_InvalidSearchMsg0="Invalid search request." +Count mtSend_InvalidSelectionMsg=1 +mtSend_InvalidSelectionMsg0="Invalid selection request." +Count mtSend_InvalidInsertMsg=1 +mtSend_InvalidInsertMsg0="Invalid insert request." +Count mtSend_InvalidModifyMsg=1 +mtSend_InvalidModifyMsg0="Invalid modify request." +Count mtFileCrackedMsg=2 +mtFileCrackedMsg0="This file is cracked." +mtFileCrackedMsg1="The application will be closed." +Count mtException_LeakMultiFree=1 +mtException_LeakMultiFree0="Multi Free memory leak." +Count mtException_LeakMemoryOverrun=1 +mtException_LeakMemoryOverrun0="Memory Overrun leak." +Count mtException_AntiFreeze=1 +mtException_AntiFreeze0="The application seems to be frozen." +Count mtInvalidEmailMsg=1 +mtInvalidEmailMsg0="Invalid email." +TextsCollection=English + + diff --git a/Modulos/Presupuestos/Cliente/Presupuestos_Intf.dpk b/Modulos/Presupuestos/Cliente/Presupuestos_Intf.dpk index 3d3591b..6a33f16 100644 --- a/Modulos/Presupuestos/Cliente/Presupuestos_Intf.dpk +++ b/Modulos/Presupuestos/Cliente/Presupuestos_Intf.dpk @@ -77,6 +77,7 @@ contains uViewDetallesPresupuesto in 'uViewDetallesPresupuesto.pas' {frViewDetallesPresupuesto: TFrame}, uBizPresupuestosCliente in '..\Reglas\uBizPresupuestosCliente.pas', uViewPresupuestoRelacionado in 'uViewPresupuestoRelacionado.pas' {frViewPresupuestoRelacionado: TFrame}, - uEditorPreviewPresupuesto in 'uEditorPreviewPresupuesto.pas' {fEditorPreviewPresupuesto: TCustomEditor}; + uEditorPreviewPresupuesto in 'uEditorPreviewPresupuesto.pas' {fEditorPreviewPresupuesto: TCustomEditor}, + schPresupuestosServer_Intf in '..\Reglas\schPresupuestosServer_Intf.pas'; end. diff --git a/Modulos/Presupuestos/Cliente/uDataModulePresupuestos.dfm b/Modulos/Presupuestos/Cliente/uDataModulePresupuestos.dfm index 750e4dc..e2c74e1 100644 --- a/Modulos/Presupuestos/Cliente/uDataModulePresupuestos.dfm +++ b/Modulos/Presupuestos/Cliente/uDataModulePresupuestos.dfm @@ -10,8 +10,8 @@ object dmPresupuestos: TdmPresupuestos ParamType = fResult DataType = rtString end> - Left = 549 - Top = 319 + Left = 550 + Top = 372 Height = 326 Width = 367 object RORemoteService: TRORemoteService @@ -370,6 +370,18 @@ object dmPresupuestos: TdmPresupuestos Lookup = False LookupCache = False end + item + Name = 'NIF_CIF' + DataType = datString + Size = 10 + BlobType = dabtUnknown + DisplayWidth = 0 + Alignment = taLeftJustify + InPrimaryKey = False + Calculated = False + Lookup = False + LookupCache = False + end item Name = 'REFERENCIA' DataType = datString diff --git a/Modulos/Presupuestos/Cliente/uEditorPresupuesto.dfm b/Modulos/Presupuestos/Cliente/uEditorPresupuesto.dfm index f1e2b60..152cd3c 100644 --- a/Modulos/Presupuestos/Cliente/uEditorPresupuesto.dfm +++ b/Modulos/Presupuestos/Cliente/uEditorPresupuesto.dfm @@ -125,9 +125,6 @@ inherited fEditorPresupuesto: TfEditorPresupuesto inherited edtlNombre: TcxDBTextEdit Properties.OnChange = frViewClientePresupuesto1edtlNombrePropertiesChange end - inherited ToolBar2: TToolBar - Width = 182 - end end end end diff --git a/Modulos/Presupuestos/Cliente/uEditorPresupuesto.pas b/Modulos/Presupuestos/Cliente/uEditorPresupuesto.pas index 6c462c0..9724adb 100644 --- a/Modulos/Presupuestos/Cliente/uEditorPresupuesto.pas +++ b/Modulos/Presupuestos/Cliente/uEditorPresupuesto.pas @@ -218,7 +218,11 @@ begin else if (FPresupuesto.SITUACION = SITUACION_ACEPTADO) and (FPresupuesto.REFERENCIA = '') then if (Application.MessageBox('¿Desea crear un montaje asociado a este presupuesto?', 'Atención', MB_YESNO) = IDYES) then + begin + inherited; dmMontajes.NuevoMontaje(Nil, FPresupuesto); + Exit; + end; inherited; end; diff --git a/Modulos/Presupuestos/Cliente/uViewPresupuesto.dfm b/Modulos/Presupuestos/Cliente/uViewPresupuesto.dfm index 388f89d..77d4d13 100644 --- a/Modulos/Presupuestos/Cliente/uViewPresupuesto.dfm +++ b/Modulos/Presupuestos/Cliente/uViewPresupuesto.dfm @@ -212,6 +212,7 @@ inherited frViewPresupuesto: TfrViewPresupuesto Width = 296 end inherited ToolBar2: TToolBar + Width = 182 ButtonWidth = 178 end inherited edtCodigoPostal: TcxDBTextEdit diff --git a/Modulos/Presupuestos/Reglas/schPresupuestosClient_Intf.pas b/Modulos/Presupuestos/Reglas/schPresupuestosClient_Intf.pas index 52f2f7e..ad8006f 100644 --- a/Modulos/Presupuestos/Reglas/schPresupuestosClient_Intf.pas +++ b/Modulos/Presupuestos/Reglas/schPresupuestosClient_Intf.pas @@ -9,12 +9,12 @@ const { Data table rules ids Feel free to change them to something more human readable but make sure they are unique in the context of your application } - RID_ListaAnosPresupuestos = '{5962C413-3DAB-454D-B36A-FD4E24DE730F}'; - RID_DetallesPresupuestos = '{25BCA0F2-589D-4000-B0E6-9182C7D37894}'; - RID_Presupuestos = '{C41805F4-A7E8-4D44-B1A9-664132994979}'; - RID_Presupuestos_RefreshDataset = '{D439CBC6-EB81-49A4-8ECC-CC48D9CECE2A}'; - RID_InformeCabeceraPresupuesto = '{CF1F99E6-E1F4-49FA-810B-63F71F884A5F}'; - RID_InformeDetallesPresupuesto = '{427D3BE3-C67C-4007-B3D3-2BDB73496BAA}'; + RID_ListaAnosPresupuestos = '{77EF6F0F-E599-4667-8576-DBAC1CCC2EAA}'; + RID_DetallesPresupuestos = '{03C708D2-DE71-478C-B6AB-462A59A1E7DF}'; + RID_Presupuestos = '{EE36E6AC-A1D6-426D-9D43-CA97BD1CFD68}'; + RID_Presupuestos_RefreshDataset = '{7C463D58-2A40-4376-B6D0-1D5BCC229F42}'; + RID_InformeCabeceraPresupuesto = '{9CDFC642-05DA-42C6-9815-F4F4024708F0}'; + RID_InformeDetallesPresupuesto = '{87F1DF38-4060-49DF-87EA-97ED384371B1}'; { Data table names } nme_ListaAnosPresupuestos = 'ListaAnosPresupuestos'; @@ -65,6 +65,7 @@ const fld_PresupuestosUSUARIO = 'USUARIO'; fld_PresupuestosCODIGOCONTACTO = 'CODIGOCONTACTO'; fld_PresupuestosNOMBRE = 'NOMBRE'; + fld_PresupuestosNIF_CIF = 'NIF_CIF'; fld_PresupuestosREFERENCIA = 'REFERENCIA'; fld_PresupuestosTIPO = 'TIPO'; fld_PresupuestosFECHAPRESUPUESTO = 'FECHAPRESUPUESTO'; @@ -91,24 +92,25 @@ const idx_PresupuestosUSUARIO = 3; idx_PresupuestosCODIGOCONTACTO = 4; idx_PresupuestosNOMBRE = 5; - idx_PresupuestosREFERENCIA = 6; - idx_PresupuestosTIPO = 7; - idx_PresupuestosFECHAPRESUPUESTO = 8; - idx_PresupuestosVIGENCIAPRESUPUESTO = 9; - idx_PresupuestosSITUACION = 10; - idx_PresupuestosFECHADECISION = 11; - idx_PresupuestosBASEIMPONIBLE = 12; - idx_PresupuestosDESCUENTO = 13; - idx_PresupuestosIMPORTEDESCUENTO = 14; - idx_PresupuestosIVA = 15; - idx_PresupuestosIMPORTEIVA = 16; - idx_PresupuestosIMPORTETOTAL = 17; - idx_PresupuestosOBSERVACIONES = 18; - idx_PresupuestosPLAZOENTREGA = 19; - idx_PresupuestosFORMAPAGO = 20; - idx_PresupuestosCODIGOALBARAN = 21; - idx_PresupuestosALBARAN = 22; - idx_PresupuestosOPCION = 23; + idx_PresupuestosNIF_CIF = 6; + idx_PresupuestosREFERENCIA = 7; + idx_PresupuestosTIPO = 8; + idx_PresupuestosFECHAPRESUPUESTO = 9; + idx_PresupuestosVIGENCIAPRESUPUESTO = 10; + idx_PresupuestosSITUACION = 11; + idx_PresupuestosFECHADECISION = 12; + idx_PresupuestosBASEIMPONIBLE = 13; + idx_PresupuestosDESCUENTO = 14; + idx_PresupuestosIMPORTEDESCUENTO = 15; + idx_PresupuestosIVA = 16; + idx_PresupuestosIMPORTEIVA = 17; + idx_PresupuestosIMPORTETOTAL = 18; + idx_PresupuestosOBSERVACIONES = 19; + idx_PresupuestosPLAZOENTREGA = 20; + idx_PresupuestosFORMAPAGO = 21; + idx_PresupuestosCODIGOALBARAN = 22; + idx_PresupuestosALBARAN = 23; + idx_PresupuestosOPCION = 24; { Presupuestos_RefreshDataset fields } fld_Presupuestos_RefreshDatasetCODIGO = 'CODIGO'; @@ -217,7 +219,7 @@ const type { IListaAnosPresupuestos } IListaAnosPresupuestos = interface(IDAStronglyTypedDataTable) - ['{B7E87944-26FF-4A49-81C3-39AD904ED7D8}'] + ['{80153E52-A0AC-48F4-B686-597D3D322919}'] { Property getters and setters } function GetANOValue: String; procedure SetANOValue(const aValue: String); @@ -246,7 +248,7 @@ type { IDetallesPresupuestos } IDetallesPresupuestos = interface(IDAStronglyTypedDataTable) - ['{58F9406A-6CF9-4DC6-A932-F3965154962E}'] + ['{1B25EB4A-91B6-4F99-9865-830E66EDD201}'] { Property getters and setters } function GetCODIGOPRESUPUESTOValue: Integer; procedure SetCODIGOPRESUPUESTOValue(const aValue: Integer); @@ -341,7 +343,7 @@ type { IPresupuestos } IPresupuestos = interface(IDAStronglyTypedDataTable) - ['{5659F9B7-0F5E-44BF-952F-BE0220081554}'] + ['{152FAE82-E4BD-47CF-82E5-88ABA9825BB1}'] { Property getters and setters } function GetCODIGOEMPRESAValue: Integer; procedure SetCODIGOEMPRESAValue(const aValue: Integer); @@ -355,6 +357,8 @@ type procedure SetCODIGOCONTACTOValue(const aValue: Integer); function GetNOMBREValue: String; procedure SetNOMBREValue(const aValue: String); + function GetNIF_CIFValue: String; + procedure SetNIF_CIFValue(const aValue: String); function GetREFERENCIAValue: String; procedure SetREFERENCIAValue(const aValue: String); function GetTIPOValue: String; @@ -400,6 +404,7 @@ type property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue; property CODIGOCONTACTO: Integer read GetCODIGOCONTACTOValue write SetCODIGOCONTACTOValue; property NOMBRE: String read GetNOMBREValue write SetNOMBREValue; + property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue; property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue; property TIPO: String read GetTIPOValue write SetTIPOValue; property FECHAPRESUPUESTO: DateTime read GetFECHAPRESUPUESTOValue write SetFECHAPRESUPUESTOValue; @@ -437,6 +442,8 @@ type procedure SetCODIGOCONTACTOValue(const aValue: Integer); virtual; function GetNOMBREValue: String; virtual; procedure SetNOMBREValue(const aValue: String); virtual; + function GetNIF_CIFValue: String; virtual; + procedure SetNIF_CIFValue(const aValue: String); virtual; function GetREFERENCIAValue: String; virtual; procedure SetREFERENCIAValue(const aValue: String); virtual; function GetTIPOValue: String; virtual; @@ -481,6 +488,7 @@ type property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue; property CODIGOCONTACTO: Integer read GetCODIGOCONTACTOValue write SetCODIGOCONTACTOValue; property NOMBRE: String read GetNOMBREValue write SetNOMBREValue; + property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue; property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue; property TIPO: String read GetTIPOValue write SetTIPOValue; property FECHAPRESUPUESTO: DateTime read GetFECHAPRESUPUESTOValue write SetFECHAPRESUPUESTOValue; @@ -508,7 +516,7 @@ type { IPresupuestos_RefreshDataset } IPresupuestos_RefreshDataset = interface(IDAStronglyTypedDataTable) - ['{0A043DC9-EC36-49B8-B7E6-1A2CE247027F}'] + ['{8A7F6D01-B4D4-436B-8BF5-C62F316AE407}'] { Property getters and setters } function GetCODIGOValue: Integer; procedure SetCODIGOValue(const aValue: Integer); @@ -561,7 +569,7 @@ type { IInformeCabeceraPresupuesto } IInformeCabeceraPresupuesto = interface(IDAStronglyTypedDataTable) - ['{7012F18F-7444-4649-9305-16548ABC900B}'] + ['{386D3790-2EE5-443E-8C0D-D71B5BB54BC6}'] { Property getters and setters } function GetCODIGOEMPRESAValue: Integer; procedure SetCODIGOEMPRESAValue(const aValue: Integer); @@ -776,7 +784,7 @@ type { IInformeDetallesPresupuesto } IInformeDetallesPresupuesto = interface(IDAStronglyTypedDataTable) - ['{29DE425C-3C96-4736-9574-FFA7D8A279AB}'] + ['{4E63D170-8D9D-43B2-ADD5-90B7CD993A81}'] { Property getters and setters } function GetCODIGOPRESUPUESTOValue: Integer; procedure SetCODIGOPRESUPUESTOValue(const aValue: Integer); @@ -1080,6 +1088,16 @@ begin DataTable.Fields[idx_PresupuestosNOMBRE].AsString := aValue; end; +function TPresupuestosDataTableRules.GetNIF_CIFValue: String; +begin + result := DataTable.Fields[idx_PresupuestosNIF_CIF].AsString; +end; + +procedure TPresupuestosDataTableRules.SetNIF_CIFValue(const aValue: String); +begin + DataTable.Fields[idx_PresupuestosNIF_CIF].AsString := aValue; +end; + function TPresupuestosDataTableRules.GetREFERENCIAValue: String; begin result := DataTable.Fields[idx_PresupuestosREFERENCIA].AsString; diff --git a/Modulos/Presupuestos/Reglas/schPresupuestosServer_Intf.pas b/Modulos/Presupuestos/Reglas/schPresupuestosServer_Intf.pas index d2d24f0..dad0d5b 100644 --- a/Modulos/Presupuestos/Reglas/schPresupuestosServer_Intf.pas +++ b/Modulos/Presupuestos/Reglas/schPresupuestosServer_Intf.pas @@ -9,17 +9,17 @@ const { Delta rules ids Feel free to change them to something more human readable but make sure they are unique in the context of your application } - RID_ListaAnosPresupuestosDelta = '{8D976F59-15D9-43F4-80BA-D2521FD3E7B3}'; - RID_DetallesPresupuestosDelta = '{4D049889-6828-4AC0-A146-65C6C3CABA37}'; - RID_PresupuestosDelta = '{28799865-76E0-4A02-BBA9-47E008A6CB54}'; - RID_Presupuestos_RefreshDatasetDelta = '{529CF287-BF4A-4985-B6C6-483744890AF4}'; - RID_InformeCabeceraPresupuestoDelta = '{75FB8BC9-9CEB-4C14-AB18-B0439CB4609C}'; - RID_InformeDetallesPresupuestoDelta = '{71D7C955-A039-4F4B-BBC9-E805CB0DE329}'; + RID_ListaAnosPresupuestosDelta = '{FC74BF4F-DBCB-40A7-9939-935F32F3ADC0}'; + RID_DetallesPresupuestosDelta = '{C37B1251-B984-4029-846F-2B30A25BAC11}'; + RID_PresupuestosDelta = '{33560B0F-ADCB-4A5F-94D2-AED74BBAC7A6}'; + RID_Presupuestos_RefreshDatasetDelta = '{B40C828C-F495-4BE7-85C2-4670FF7C4B03}'; + RID_InformeCabeceraPresupuestoDelta = '{6285260E-3B0E-4DB0-A8A6-DDE3FF84220C}'; + RID_InformeDetallesPresupuestoDelta = '{06FFD0BC-7D7D-457B-B402-6792784FEE19}'; type { IListaAnosPresupuestosDelta } IListaAnosPresupuestosDelta = interface(IListaAnosPresupuestos) - ['{8D976F59-15D9-43F4-80BA-D2521FD3E7B3}'] + ['{FC74BF4F-DBCB-40A7-9939-935F32F3ADC0}'] { Property getters and setters } function GetOldANOValue : String; @@ -48,7 +48,7 @@ type { IDetallesPresupuestosDelta } IDetallesPresupuestosDelta = interface(IDetallesPresupuestos) - ['{4D049889-6828-4AC0-A146-65C6C3CABA37}'] + ['{C37B1251-B984-4029-846F-2B30A25BAC11}'] { Property getters and setters } function GetOldCODIGOPRESUPUESTOValue : Integer; function GetOldNUMCONCEPTOValue : Integer; @@ -154,7 +154,7 @@ type { IPresupuestosDelta } IPresupuestosDelta = interface(IPresupuestos) - ['{28799865-76E0-4A02-BBA9-47E008A6CB54}'] + ['{33560B0F-ADCB-4A5F-94D2-AED74BBAC7A6}'] { Property getters and setters } function GetOldCODIGOEMPRESAValue : Integer; function GetOldCODIGOValue : Integer; @@ -162,6 +162,7 @@ type function GetOldUSUARIOValue : String; function GetOldCODIGOCONTACTOValue : Integer; function GetOldNOMBREValue : String; + function GetOldNIF_CIFValue : String; function GetOldREFERENCIAValue : String; function GetOldTIPOValue : String; function GetOldFECHAPRESUPUESTOValue : DateTime; @@ -188,6 +189,7 @@ type property OldUSUARIO : String read GetOldUSUARIOValue; property OldCODIGOCONTACTO : Integer read GetOldCODIGOCONTACTOValue; property OldNOMBRE : String read GetOldNOMBREValue; + property OldNIF_CIF : String read GetOldNIF_CIFValue; property OldREFERENCIA : String read GetOldREFERENCIAValue; property OldTIPO : String read GetOldTIPOValue; property OldFECHAPRESUPUESTO : DateTime read GetOldFECHAPRESUPUESTOValue; @@ -231,6 +233,9 @@ type function GetNOMBREValue: String; virtual; function GetOldNOMBREValue: String; virtual; procedure SetNOMBREValue(const aValue: String); virtual; + function GetNIF_CIFValue: String; virtual; + function GetOldNIF_CIFValue: String; virtual; + procedure SetNIF_CIFValue(const aValue: String); virtual; function GetREFERENCIAValue: String; virtual; function GetOldREFERENCIAValue: String; virtual; procedure SetREFERENCIAValue(const aValue: String); virtual; @@ -299,6 +304,8 @@ type property OldCODIGOCONTACTO : Integer read GetOldCODIGOCONTACTOValue; property NOMBRE : String read GetNOMBREValue write SetNOMBREValue; property OldNOMBRE : String read GetOldNOMBREValue; + property NIF_CIF : String read GetNIF_CIFValue write SetNIF_CIFValue; + property OldNIF_CIF : String read GetOldNIF_CIFValue; property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue; property OldREFERENCIA : String read GetOldREFERENCIAValue; property TIPO : String read GetTIPOValue write SetTIPOValue; @@ -344,7 +351,7 @@ type { IPresupuestos_RefreshDatasetDelta } IPresupuestos_RefreshDatasetDelta = interface(IPresupuestos_RefreshDataset) - ['{529CF287-BF4A-4985-B6C6-483744890AF4}'] + ['{B40C828C-F495-4BE7-85C2-4670FF7C4B03}'] { Property getters and setters } function GetOldCODIGOValue : Integer; function GetOldNOMBREValue : String; @@ -401,7 +408,7 @@ type { IInformeCabeceraPresupuestoDelta } IInformeCabeceraPresupuestoDelta = interface(IInformeCabeceraPresupuesto) - ['{75FB8BC9-9CEB-4C14-AB18-B0439CB4609C}'] + ['{6285260E-3B0E-4DB0-A8A6-DDE3FF84220C}'] { Property getters and setters } function GetOldCODIGOEMPRESAValue : Integer; function GetOldCODIGOValue : Integer; @@ -647,7 +654,7 @@ type { IInformeDetallesPresupuestoDelta } IInformeDetallesPresupuestoDelta = interface(IInformeDetallesPresupuesto) - ['{71D7C955-A039-4F4B-BBC9-E805CB0DE329}'] + ['{06FFD0BC-7D7D-457B-B402-6792784FEE19}'] { Property getters and setters } function GetOldCODIGOPRESUPUESTOValue : Integer; function GetOldNUMCONCEPTOValue : Integer; @@ -1055,6 +1062,21 @@ begin BusinessProcessor.CurrentChange.NewValueByName[fld_PresupuestosNOMBRE] := aValue; end; +function TPresupuestosBusinessProcessorRules.GetNIF_CIFValue: String; +begin + result := BusinessProcessor.CurrentChange.NewValueByName[fld_PresupuestosNIF_CIF]; +end; + +function TPresupuestosBusinessProcessorRules.GetOldNIF_CIFValue: String; +begin + result := BusinessProcessor.CurrentChange.OldValueByName[fld_PresupuestosNIF_CIF]; +end; + +procedure TPresupuestosBusinessProcessorRules.SetNIF_CIFValue(const aValue: String); +begin + BusinessProcessor.CurrentChange.NewValueByName[fld_PresupuestosNIF_CIF] := aValue; +end; + function TPresupuestosBusinessProcessorRules.GetREFERENCIAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PresupuestosREFERENCIA]; diff --git a/Modulos/Presupuestos/Reglas/uBizPresupuestosCliente.pas b/Modulos/Presupuestos/Reglas/uBizPresupuestosCliente.pas index e1f2eba..4e177fa 100644 --- a/Modulos/Presupuestos/Reglas/uBizPresupuestosCliente.pas +++ b/Modulos/Presupuestos/Reglas/uBizPresupuestosCliente.pas @@ -237,6 +237,7 @@ begin TIPO := TIPO_COCINA; CODIGO := dmPresupuestos.GetNextAutoinc; OPCION := 'OPCIÓN 1'; + Self.DataTable.FieldByName('OBSERVACIONES').AsString := 'No está incluido ningún trabajo de electricidad y fontanería. Se presupuesta aparte.'; end; procedure TBizPresupuestos.Preview; diff --git a/Modulos/Presupuestos/Servidor/srvPresupuestos_Impl.dfm b/Modulos/Presupuestos/Servidor/srvPresupuestos_Impl.dfm index 1928791..2a7b118 100644 --- a/Modulos/Presupuestos/Servidor/srvPresupuestos_Impl.dfm +++ b/Modulos/Presupuestos/Servidor/srvPresupuestos_Impl.dfm @@ -6,8 +6,8 @@ object srvPresupuestos: TsrvPresupuestos ConnectionName = 'IBX' ServiceSchema = schPresupuestos ServiceAdapter = DABINAdapter - Left = 1193 - Top = 377 + Left = 1195 + Top = 439 Height = 359 Width = 328 object schPresupuestos: TDASchema @@ -259,8 +259,8 @@ object srvPresupuestos: TsrvPresupuestos ','#10' TIPO, FECHAPRESUPUESTO, VIGENCIAPRESUPUESTO, SITUACION,' + ' FECHADECISION,'#10' BASEIMPONIBLE, DESCUENTO, IMPORTEDESCUENT' + 'O, IVA, IMPORTEIVA,'#10' IMPORTETOTAL, OBSERVACIONES, PLAZOENT' + - 'REGA, FORMAPAGO, OPCION,'#10' NOMBRE, REFERENCIA,'#10' CODIG' + - 'OALBARAN, ALBARAN'#10#10'FROM V_PRESUPUESTOS' + 'REGA, FORMAPAGO, OPCION,'#10' NOMBRE, NIF_CIF, REFERENCIA,'#10' ' + + ' CODIGOALBARAN, ALBARAN'#10#10'FROM V_PRESUPUESTOS' StatementType = stSQL ColumnMappings = < item @@ -347,6 +347,10 @@ object srvPresupuestos: TsrvPresupuestos DatasetField = 'NOMBRE' TableField = 'NOMBRE' end + item + DatasetField = 'NIF_CIF' + TableField = 'NIF_CIF' + end item DatasetField = 'CODIGOALBARAN' TableField = 'CODIGOALBARAN' @@ -426,6 +430,18 @@ object srvPresupuestos: TsrvPresupuestos Lookup = False LookupCache = False end + item + Name = 'NIF_CIF' + DataType = datString + Size = 10 + BlobType = dabtUnknown + DisplayWidth = 0 + Alignment = taLeftJustify + InPrimaryKey = False + Calculated = False + Lookup = False + LookupCache = False + end item Name = 'REFERENCIA' DataType = datString @@ -1853,26 +1869,14 @@ object srvPresupuestos: TsrvPresupuestos ReportOptions.CreateDate = 37871.995398692100000000 ReportOptions.Description.Strings = ( 'Demonstrates how to create simple list report.') - ReportOptions.LastChange = 40251.793684884260000000 + ReportOptions.LastChange = 42887.730737881950000000 ReportOptions.VersionBuild = '1' ReportOptions.VersionMajor = '12' ReportOptions.VersionMinor = '13' ReportOptions.VersionRelease = '1' ScriptLanguage = 'PascalScript' ScriptText.Strings = ( - 'procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);' - 'begin' - ' DatosCliente.Lines.Clear;' - ' DatosCliente.Lines.Add();' - '' - ' if ( <> '#39#39')' - ' or ( <> '#39#39') then' - - ' DatosCliente.Lines.Add( + );' - 'end;' - '' - 'procedure BandaDetallesOnBeforePrint(Sender: TfrxComponent);' + 'procedure Band4OnBeforePrint(Sender: TfrxComponent);' 'begin' ' case of' ' '#39'C'#39': begin' @@ -1894,53 +1898,68 @@ object srvPresupuestos: TsrvPresupuestos ' MemoCampo4.Style := '#39'Concepto titulo'#39';' ' end;' ' end;' + '' + ' MemoCampo12.Height := 0;' + ' MemoCampo2.Height := 0;' + ' MemoCampo3.Height := 0;' + ' MemoCampo4.Height := 0;' 'end;' '' 'procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);' 'begin' - '// Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportS' + - 'ummary1.Height + 20;' + ' Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSum' + + 'mary1.Height - 1;' 'end;' '' - 'procedure Band3OnBeforePrint(Sender: TfrxComponent);' + 'procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);' + 'var' + ' cadenaAux: String;' 'begin' + ' DatosCliente.Lines.Clear;' + ' DatosCliente.Lines.Add();' '' - ' if ( = ) then' - ' begin' - ' shape6.Visible := True;' - ' memo14.Visible := True;' - ' memo35.Visible := True;' - ' memo36.Visible := True;' - ' memo37.Visible := True;' - ' memo38.Visible := True;' - ' memo39.Visible := True;' - ' memo40.Visible := True;' - ' memo41.Visible := True;' - ' memo42.Visible := True;' - ' memo43.Visible := True;' - ' memo44.Visible := True;' - ' memo45.Visible := True;' - ' end' - ' else' - ' begin' - ' shape6.Visible := False;' - ' shape6.Visible := False;' - ' memo14.Visible := False;' - ' memo35.Visible := False;' - ' memo36.Visible := False;' - ' memo37.Visible := False;' - ' memo38.Visible := False;' - ' memo39.Visible := False;' - ' memo40.Visible := False;' - ' memo41.Visible := False;' - ' memo42.Visible := False;' - ' memo43.Visible := False;' - ' memo44.Visible := False;' - ' memo45.Visible := False;' - ' end;' + ' if ( <> '#39#39')' + ' or ( <> '#39#39') then' + + ' DatosCliente.Lines.Add( + );' + '' + ' CadenaAux := '#39#39';' + ' if <> '#39#39' then' + ' if CadenaAux = '#39#39' then' + + ' CadenaAux := CadenaAux + '#39'Telf:'#39' + ' + ' else' + + ' CadenaAux := CadenaAux + '#39' / '#39' + ;' + '' + ' if <> '#39#39' then' + ' if CadenaAux = '#39#39' then' + + ' CadenaAux := CadenaAux + '#39'Telf:'#39' + ' + ' else' + + ' CadenaAux := CadenaAux + '#39' / '#39' + ;' + '' + ' if <> '#39#39' then' + ' if CadenaAux = '#39#39' then' + + ' CadenaAux := CadenaAux + '#39'Telf:'#39' + ' + ' else' + + ' CadenaAux := CadenaAux + '#39' / '#39' + ' + + ';' + '' + ' DatosCliente.Lines.Add(CadenaAux);' 'end;' '' + '' 'procedure MemoCampo3OnBeforePrint(Sender: TfrxComponent);' 'begin' ' case of' diff --git a/Output/Servidor/Informes/InfPresupuesto.fr3 b/Output/Servidor/Informes/InfPresupuesto.fr3 index 19ddf86..bb5fe99 100644 --- a/Output/Servidor/Informes/InfPresupuesto.fr3 +++ b/Output/Servidor/Informes/InfPresupuesto.fr3 @@ -1,5 +1,5 @@ - + @@ -14,8 +14,8 @@ - - + + @@ -32,6 +32,7 @@ + diff --git a/Servidor/FactuGES_Server.cfg b/Servidor/FactuGES_Server.cfg index 82ab66f..ac40dc2 100644 --- a/Servidor/FactuGES_Server.cfg +++ b/Servidor/FactuGES_Server.cfg @@ -39,6 +39,7 @@ -O"..\Modulos\Presupuestos\Reglas;..\Modulos\Contactos\Reglas;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Albaranes de cliente\Reglas" -I"..\Modulos\Presupuestos\Reglas;..\Modulos\Contactos\Reglas;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Albaranes de cliente\Reglas" -R"..\Modulos\Presupuestos\Reglas;..\Modulos\Contactos\Reglas;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Albaranes de cliente\Reglas" +-DEUREKALOG;EUREKALOG_VER6 -w-UNSAFE_TYPE -w-UNSAFE_CODE -w-UNSAFE_CAST diff --git a/Servidor/FactuGES_Server.dof b/Servidor/FactuGES_Server.dof index 2fcba75..16cdd3e 100644 --- a/Servidor/FactuGES_Server.dof +++ b/Servidor/FactuGES_Server.dof @@ -96,7 +96,7 @@ PackageDLLOutputDir= PackageDCPOutputDir= SearchPath=..\Modulos\Presupuestos\Reglas;..\Modulos\Contactos\Reglas;..\Base;..\Configuracion;..\Usuarios;..\Modulos\Albaranes de cliente\Reglas Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;CEToolsPkgd7;FR7;FRIBX7;fqb70;frx7;frxADO7;frxBDE7;frxDB7;frxDBX7;frxe7;frxIBX7;fs7;fsADO7;fsBDE7;fsDB7;fsIBX7;DataAbstract_Core_D7;DataAbstract_IDE_D7 -Conditionals= +Conditionals=EUREKALOG;EUREKALOG_VER6 DebugSourceDirs= UsePackages=0 [Parameters] @@ -214,3 +214,486 @@ Item2=..\..\Output\Cliente [HistoryLists\hlDCPOutput] Count=1 Item0=.\ +[Exception Log] +EurekaLog Version=6006 +Activate=1 +Activate Handle=1 +Save Log File=1 +Foreground Tab=0 +Freeze Activate=0 +Freeze Timeout=1 +SMTP From=eurekalog@email.com +SMTP Host= +SMTP Port=25 +SMTP UserID= +SMTP Password= +Append to Log=0 +TerminateBtn Operation=2 +Errors Number=32 +Errors Terminate=3 +Email Address= +Email Object= +Email Send Options=0 +Output Path= +Encrypt Password= +AutoCloseDialogSecs=0 +WebSendMode=0 +SupportULR= +HTMLLayout Count=15 +HTMLLine0="%3Chtml%3E" +HTMLLine1=" %3Chead%3E" +HTMLLine2=" %3C/head%3E" +HTMLLine3=" %3Cbody TopMargin=10 LeftMargin=10%3E" +HTMLLine4=" %3Ctable width="100%%" border="0"%3E" +HTMLLine5=" %3Ctr%3E" +HTMLLine6=" %3Ctd nowrap%3E" +HTMLLine7=" %3Cfont face="Lucida Console, Courier" size="2"%3E" +HTMLLine8=" %3C%%HTML_TAG%%%3E" +HTMLLine9=" %3C/font%3E" +HTMLLine10=" %3C/td%3E" +HTMLLine11=" %3C/tr%3E" +HTMLLine12=" %3C/table%3E" +HTMLLine13=" %3C/body%3E" +HTMLLine14="%3C/html%3E" +AutoCrashOperation=2 +AutoCrashNumber=10 +AutoCrashMinutes=1 +WebURL= +WebUserID= +WebPassword= +WebPort=0 +AttachedFiles= +ProxyURL= +ProxyUser= +ProxyPassword= +ProxyPort=8080 +TrakerUser= +TrakerPassword= +TrakerAssignTo= +TrakerProject= +TrakerCategory= +TrakerTrialID= +ZipPassword= +PreBuildEvent= +PostSuccessfulBuildEvent= +PostFailureBuildEvent= +ExceptionDialogType=2 +Count=0 +EMail Message Line Count=0 +loNoDuplicateErrors=0 +loAppendReproduceText=0 +loDeleteLogAtVersionChange=0 +loAddComputerNameInLogFileName=0 +loSaveModulesAndProcessesSections=1 +loSaveAssemblerAndCPUSections=1 +soAppStartDate=1 +soAppName=1 +soAppVersionNumber=1 +soAppParameters=1 +soAppCompilationDate=1 +soAppUpTime=1 +soExcDate=1 +soExcAddress=1 +soExcModuleName=1 +soExcModuleVersion=1 +soExcType=1 +soExcMessage=1 +soExcID=1 +soExcCount=1 +soExcStatus=1 +soExcNote=1 +soUserID=1 +soUserName=1 +soUserEmail=1 +soUserPrivileges=1 +soUserCompany=1 +soActCtlsFormClass=1 +soActCtlsFormText=1 +soActCtlsControlClass=1 +soActCtlsControlText=1 +soCmpName=1 +soCmpTotalMemory=1 +soCmpFreeMemory=1 +soCmpTotalDisk=1 +soCmpFreeDisk=1 +soCmpSysUpTime=1 +soCmpProcessor=1 +soCmpDisplayMode=1 +soCmpDisplayDPI=1 +soCmpVideoCard=1 +soCmpPrinter=1 +soOSType=1 +soOSBuildN=1 +soOSUpdate=1 +soOSLanguage=1 +soOSCharset=1 +soNetIP=1 +soNetSubmask=1 +soNetGateway=1 +soNetDNS1=1 +soNetDNS2=1 +soNetDHCP=1 +soCustomData=1 +sndShowSendDialog=1 +sndShowSuccessFailureMsg=0 +sndSendEntireLog=0 +sndSendXMLLogCopy=0 +sndSendScreenshot=1 +sndUseOnlyActiveWindow=0 +sndSendLastHTMLPage=1 +sndSendInSeparatedThread=0 +sndAddDateInFileName=0 +sndAddComputerNameInFileName=0 +edoSendErrorReportChecked=1 +edoAttachScreenshotChecked=1 +edoShowCopyToClipOption=1 +edoShowDetailsButton=1 +edoShowInDetailedMode=0 +edoShowInTopMostMode=0 +edoUseEurekaLogLookAndFeel=0 +edoShowSendErrorReportOption=1 +edoShowAttachScreenshotOption=1 +edoShowCustomButton=0 +csoShowDLLs=1 +csoShowBPLs=1 +csoShowBorlandThreads=1 +csoShowWindowsThreads=1 +csoDoNotStoreProcNames=0 +boPauseBorlandThreads=0 +boDoNotPauseMainThread=0 +boPauseWindowsThreads=0 +boUseMainModuleOptions=1 +boCopyLogInCaseOfError=1 +boSaveCompressedCopyInCaseOfError=0 +boHandleSafeCallExceptions=1 +boCallRTLExceptionEvent=0 +boCatchHandledExceptions=0 +loCatchLeaks=0 +loGroupsSonLeaks=1 +loHideBorlandLeaks=1 +loFreeAllLeaks=1 +loCatchLeaksExceptions=1 +cfoReduceFileSize=1 +cfoCheckFileCorruption=0 +Count mtInformationMsgCaption=1 +mtInformationMsgCaption0="Information." +Count mtQuestionMsgCaption=1 +mtQuestionMsgCaption0="Question." +Count mtErrorMsgCaption=1 +mtErrorMsgCaption0="Error." +Count mtDialog_Caption=1 +mtDialog_Caption0="Error occurred" +Count mtDialog_ErrorMsgCaption=2 +mtDialog_ErrorMsgCaption0="An error has occurred during program execution." +mtDialog_ErrorMsgCaption1="Please read the following information for further details." +Count mtDialog_GeneralCaption=1 +mtDialog_GeneralCaption0="General" +Count mtDialog_GeneralHeader=1 +mtDialog_GeneralHeader0="General Information" +Count mtDialog_CallStackCaption=1 +mtDialog_CallStackCaption0="Call Stack" +Count mtDialog_CallStackHeader=1 +mtDialog_CallStackHeader0="Call Stack Information" +Count mtDialog_ModulesCaption=1 +mtDialog_ModulesCaption0="Modules" +Count mtDialog_ModulesHeader=1 +mtDialog_ModulesHeader0="Modules Information" +Count mtDialog_ProcessesCaption=1 +mtDialog_ProcessesCaption0="Processes" +Count mtDialog_ProcessesHeader=1 +mtDialog_ProcessesHeader0="Processes Information" +Count mtDialog_AsmCaption=1 +mtDialog_AsmCaption0="Assembler" +Count mtDialog_AsmHeader=1 +mtDialog_AsmHeader0="Assembler Information" +Count mtDialog_CPUCaption=1 +mtDialog_CPUCaption0="CPU" +Count mtDialog_CPUHeader=1 +mtDialog_CPUHeader0="CPU Information" +Count mtDialog_OKButtonCaption=1 +mtDialog_OKButtonCaption0="%26OK" +Count mtDialog_TerminateButtonCaption=1 +mtDialog_TerminateButtonCaption0="%26Terminate" +Count mtDialog_RestartButtonCaption=1 +mtDialog_RestartButtonCaption0="%26Restart" +Count mtDialog_DetailsButtonCaption=1 +mtDialog_DetailsButtonCaption0="%26Details" +Count mtDialog_CustomButtonCaption=1 +mtDialog_CustomButtonCaption0="%26Help" +Count mtDialog_SendMessage=1 +mtDialog_SendMessage0="%26Send this error via Internet" +Count mtDialog_ScreenshotMessage=1 +mtDialog_ScreenshotMessage0="%26Attach a Screenshot image" +Count mtDialog_CopyMessage=1 +mtDialog_CopyMessage0="%26Copy to Clipboard" +Count mtDialog_SupportMessage=1 +mtDialog_SupportMessage0="Go to the Support Page" +Count mtMSDialog_ErrorMsgCaption=1 +mtMSDialog_ErrorMsgCaption0="The application has encountered a problem. We are sorry for the inconvenience." +Count mtMSDialog_RestartCaption=1 +mtMSDialog_RestartCaption0="Restart application." +Count mtMSDialog_TerminateCaption=1 +mtMSDialog_TerminateCaption0="Terminate application." +Count mtMSDialog_PleaseCaption=1 +mtMSDialog_PleaseCaption0="Please tell us about this problem." +Count mtMSDialog_DescriptionCaption=1 +mtMSDialog_DescriptionCaption0="We have created an error report that you can send to us. We will treat this report as confidential and anonymous." +Count mtMSDialog_SeeDetailsCaption=1 +mtMSDialog_SeeDetailsCaption0="To see what data the error report contains," +Count mtMSDialog_SeeClickCaption=1 +mtMSDialog_SeeClickCaption0="click here." +Count mtMSDialog_HowToReproduceCaption=1 +mtMSDialog_HowToReproduceCaption0="What were you doing when the problem happended (optional)?" +Count mtMSDialog_EmailCaption=1 +mtMSDialog_EmailCaption0="Email address (optional):" +Count mtMSDialog_SendButtonCaption=1 +mtMSDialog_SendButtonCaption0="%26Send Error Report" +Count mtMSDialog_NoSendButtonCaption=1 +mtMSDialog_NoSendButtonCaption0="%26Don't Send" +Count mtLog_AppHeader=1 +mtLog_AppHeader0="Application" +Count mtLog_AppStartDate=1 +mtLog_AppStartDate0="Start Date" +Count mtLog_AppName=1 +mtLog_AppName0="Name/Description" +Count mtLog_AppVersionNumber=1 +mtLog_AppVersionNumber0="Version Number" +Count mtLog_AppParameters=1 +mtLog_AppParameters0="Parameters" +Count mtLog_AppCompilationDate=1 +mtLog_AppCompilationDate0="Compilation Date" +Count mtLog_AppUpTime=1 +mtLog_AppUpTime0="Up Time" +Count mtLog_ExcHeader=1 +mtLog_ExcHeader0="Exception" +Count mtLog_ExcDate=1 +mtLog_ExcDate0="Date" +Count mtLog_ExcAddress=1 +mtLog_ExcAddress0="Address" +Count mtLog_ExcModuleName=1 +mtLog_ExcModuleName0="Module Name" +Count mtLog_ExcModuleVersion=1 +mtLog_ExcModuleVersion0="Module Version" +Count mtLog_ExcType=1 +mtLog_ExcType0="Type" +Count mtLog_ExcMessage=1 +mtLog_ExcMessage0="Message" +Count mtLog_ExcID=1 +mtLog_ExcID0="ID" +Count mtLog_ExcCount=1 +mtLog_ExcCount0="Count" +Count mtLog_ExcStatus=1 +mtLog_ExcStatus0="Status" +Count mtLog_ExcNote=1 +mtLog_ExcNote0="Note" +Count mtLog_UserHeader=1 +mtLog_UserHeader0="User" +Count mtLog_UserID=1 +mtLog_UserID0="ID" +Count mtLog_UserName=1 +mtLog_UserName0="Name" +Count mtLog_UserEmail=1 +mtLog_UserEmail0="Email" +Count mtLog_UserCompany=1 +mtLog_UserCompany0="Company" +Count mtLog_UserPrivileges=1 +mtLog_UserPrivileges0="Privileges" +Count mtLog_ActCtrlsHeader=1 +mtLog_ActCtrlsHeader0="Active Controls" +Count mtLog_ActCtrlsFormClass=1 +mtLog_ActCtrlsFormClass0="Form Class" +Count mtLog_ActCtrlsFormText=1 +mtLog_ActCtrlsFormText0="Form Text" +Count mtLog_ActCtrlsControlClass=1 +mtLog_ActCtrlsControlClass0="Control Class" +Count mtLog_ActCtrlsControlText=1 +mtLog_ActCtrlsControlText0="Control Text" +Count mtLog_CmpHeader=1 +mtLog_CmpHeader0="Computer" +Count mtLog_CmpName=1 +mtLog_CmpName0="Name" +Count mtLog_CmpTotalMemory=1 +mtLog_CmpTotalMemory0="Total Memory" +Count mtLog_CmpFreeMemory=1 +mtLog_CmpFreeMemory0="Free Memory" +Count mtLog_CmpTotalDisk=1 +mtLog_CmpTotalDisk0="Total Disk" +Count mtLog_CmpFreeDisk=1 +mtLog_CmpFreeDisk0="Free Disk" +Count mtLog_CmpSystemUpTime=1 +mtLog_CmpSystemUpTime0="System Up Time" +Count mtLog_CmpProcessor=1 +mtLog_CmpProcessor0="Processor" +Count mtLog_CmpDisplayMode=1 +mtLog_CmpDisplayMode0="Display Mode" +Count mtLog_CmpDisplayDPI=1 +mtLog_CmpDisplayDPI0="Display DPI" +Count mtLog_CmpVideoCard=1 +mtLog_CmpVideoCard0="Video Card" +Count mtLog_CmpPrinter=1 +mtLog_CmpPrinter0="Printer" +Count mtLog_OSHeader=1 +mtLog_OSHeader0="Operating System" +Count mtLog_OSType=1 +mtLog_OSType0="Type" +Count mtLog_OSBuildN=1 +mtLog_OSBuildN0="Build #" +Count mtLog_OSUpdate=1 +mtLog_OSUpdate0="Update" +Count mtLog_OSLanguage=1 +mtLog_OSLanguage0="Language" +Count mtLog_OSCharset=1 +mtLog_OSCharset0="Charset" +Count mtLog_NetHeader=1 +mtLog_NetHeader0="Network" +Count mtLog_NetIP=1 +mtLog_NetIP0="IP Address" +Count mtLog_NetSubmask=1 +mtLog_NetSubmask0="Submask" +Count mtLog_NetGateway=1 +mtLog_NetGateway0="Gateway" +Count mtLog_NetDNS1=1 +mtLog_NetDNS10="DNS 1" +Count mtLog_NetDNS2=1 +mtLog_NetDNS20="DNS 2" +Count mtLog_NetDHCP=1 +mtLog_NetDHCP0="DHCP" +Count mtLog_CustInfoHeader=1 +mtLog_CustInfoHeader0="Custom Information" +Count mtCallStack_Address=1 +mtCallStack_Address0="Address" +Count mtCallStack_Name=1 +mtCallStack_Name0="Module" +Count mtCallStack_Unit=1 +mtCallStack_Unit0="Unit" +Count mtCallStack_Class=1 +mtCallStack_Class0="Class" +Count mtCallStack_Procedure=1 +mtCallStack_Procedure0="Procedure/Method" +Count mtCallStack_Line=1 +mtCallStack_Line0="Line" +Count mtCallStack_MainThread=1 +mtCallStack_MainThread0="Main" +Count mtCallStack_ExceptionThread=1 +mtCallStack_ExceptionThread0="Exception Thread" +Count mtCallStack_RunningThread=1 +mtCallStack_RunningThread0="Running Thread" +Count mtCallStack_CallingThread=1 +mtCallStack_CallingThread0="Calling Thread" +Count mtCallStack_ThreadID=1 +mtCallStack_ThreadID0="ID" +Count mtCallStack_ThreadPriority=1 +mtCallStack_ThreadPriority0="Priority" +Count mtCallStack_ThreadClass=1 +mtCallStack_ThreadClass0="Class" +Count mtCallStack_LeakCaption=1 +mtCallStack_LeakCaption0="Memory Leak" +Count mtCallStack_LeakData=1 +mtCallStack_LeakData0="Data" +Count mtCallStack_LeakType=1 +mtCallStack_LeakType0="Type" +Count mtCallStack_LeakSize=1 +mtCallStack_LeakSize0="Total size" +Count mtCallStack_LeakCount=1 +mtCallStack_LeakCount0="Count" +Count mtSendDialog_Caption=1 +mtSendDialog_Caption0="Send." +Count mtSendDialog_Message=1 +mtSendDialog_Message0="Message" +Count mtSendDialog_Resolving=1 +mtSendDialog_Resolving0="Resolving DNS..." +Count mtSendDialog_Login=1 +mtSendDialog_Login0="Login..." +Count mtSendDialog_Connecting=1 +mtSendDialog_Connecting0="Connecting with server..." +Count mtSendDialog_Connected=1 +mtSendDialog_Connected0="Connected with server." +Count mtSendDialog_Sending=1 +mtSendDialog_Sending0="Sending message..." +Count mtSendDialog_Sent=1 +mtSendDialog_Sent0="Message sent." +Count mtSendDialog_SelectProject=1 +mtSendDialog_SelectProject0="Select project..." +Count mtSendDialog_Searching=1 +mtSendDialog_Searching0="Searching..." +Count mtSendDialog_Modifying=1 +mtSendDialog_Modifying0="Modifying..." +Count mtSendDialog_Disconnecting=1 +mtSendDialog_Disconnecting0="Disconnecting..." +Count mtSendDialog_Disconnected=1 +mtSendDialog_Disconnected0="Disconnected." +Count mtReproduceDialog_Caption=1 +mtReproduceDialog_Caption0="Request" +Count mtReproduceDialog_Request=1 +mtReproduceDialog_Request0="Please describe the steps to reproduce the error:" +Count mtReproduceDialog_OKButtonCaption=1 +mtReproduceDialog_OKButtonCaption0="%26OK" +Count mtModules_Handle=1 +mtModules_Handle0="Handle" +Count mtModules_Name=1 +mtModules_Name0="Name" +Count mtModules_Description=1 +mtModules_Description0="Description" +Count mtModules_Version=1 +mtModules_Version0="Version" +Count mtModules_Size=1 +mtModules_Size0="Size" +Count mtModules_LastModified=1 +mtModules_LastModified0="Modified" +Count mtModules_Path=1 +mtModules_Path0="Path" +Count mtProcesses_ID=1 +mtProcesses_ID0="ID" +Count mtProcesses_Name=1 +mtProcesses_Name0="Name" +Count mtProcesses_Description=1 +mtProcesses_Description0="Description" +Count mtProcesses_Version=1 +mtProcesses_Version0="Version" +Count mtProcesses_Memory=1 +mtProcesses_Memory0="Memory" +Count mtProcesses_Priority=1 +mtProcesses_Priority0="Priority" +Count mtProcesses_Threads=1 +mtProcesses_Threads0="Threads" +Count mtProcesses_Path=1 +mtProcesses_Path0="Path" +Count mtCPU_Registers=1 +mtCPU_Registers0="Registers" +Count mtCPU_Stack=1 +mtCPU_Stack0="Stack" +Count mtCPU_MemoryDump=1 +mtCPU_MemoryDump0="Memory Dump" +Count mtSend_SuccessMsg=1 +mtSend_SuccessMsg0="The message was sent successfully." +Count mtSend_FailureMsg=1 +mtSend_FailureMsg0="Sorry, sending the message didn't work." +Count mtSend_BugClosedMsg=2 +mtSend_BugClosedMsg0="These BUG is just closed." +mtSend_BugClosedMsg1="Contact the program support to obtain an update." +Count mtSend_UnknownErrorMsg=1 +mtSend_UnknownErrorMsg0="Unknown error." +Count mtSend_InvalidLoginMsg=1 +mtSend_InvalidLoginMsg0="Invalid login request." +Count mtSend_InvalidSearchMsg=1 +mtSend_InvalidSearchMsg0="Invalid search request." +Count mtSend_InvalidSelectionMsg=1 +mtSend_InvalidSelectionMsg0="Invalid selection request." +Count mtSend_InvalidInsertMsg=1 +mtSend_InvalidInsertMsg0="Invalid insert request." +Count mtSend_InvalidModifyMsg=1 +mtSend_InvalidModifyMsg0="Invalid modify request." +Count mtFileCrackedMsg=2 +mtFileCrackedMsg0="This file is cracked." +mtFileCrackedMsg1="The application will be closed." +Count mtException_LeakMultiFree=1 +mtException_LeakMultiFree0="Multi Free memory leak." +Count mtException_LeakMemoryOverrun=1 +mtException_LeakMemoryOverrun0="Memory Overrun leak." +Count mtException_AntiFreeze=1 +mtException_AntiFreeze0="The application seems to be frozen." +Count mtInvalidEmailMsg=1 +mtInvalidEmailMsg0="Invalid email." +TextsCollection= + + diff --git a/Servidor/FactuGES_Server.dpr b/Servidor/FactuGES_Server.dpr index 6bd0057..af25383 100644 --- a/Servidor/FactuGES_Server.dpr +++ b/Servidor/FactuGES_Server.dpr @@ -3,6 +3,8 @@ program FactuGES_Server; {#ROGEN:FactuGES.rodl} // RemObjects: Careful, do not remove! uses + + ExceptionLog, uROComInit, Forms, fServerForm in 'fServerForm.pas' {ServerForm}, diff --git a/Servidor/srvComisiones_Impl.dfm b/Servidor/srvComisiones_Impl.dfm index 96863ac..a9dcfba 100644 --- a/Servidor/srvComisiones_Impl.dfm +++ b/Servidor/srvComisiones_Impl.dfm @@ -5,8 +5,8 @@ object srvComisiones: TsrvComisiones AcquireConnection = True ServiceSchema = schComisiones ServiceAdapter = DABINAdapter - Left = 1110 - Top = 203 + Left = 1112 + Top = 237 Height = 300 Width = 300 object schComisiones: TDASchema diff --git a/Servidor/srvConfiguracion_Impl.dfm b/Servidor/srvConfiguracion_Impl.dfm index ad2c329..a16b813 100644 --- a/Servidor/srvConfiguracion_Impl.dfm +++ b/Servidor/srvConfiguracion_Impl.dfm @@ -6,8 +6,8 @@ object srvConfiguracion: TsrvConfiguracion ConnectionName = 'IBX' ServiceSchema = schConfiguracion ServiceAdapter = DABINAdapter - Left = 1157 - Top = 115 + Left = 1159 + Top = 134 Height = 161 Width = 300 object schConfiguracion: TDASchema