object dmTraspasos: TdmTraspasos OldCreateOrder = True OnCreate = DAClientDataModuleCreate Height = 297 Width = 620 object RORemoteService: TRORemoteService Message = dmBase.ROMessage Channel = dmBase.ROChannel ServiceName = 'srvTraspasos' Left = 40 Top = 32 end object tbl_Traspasos: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'TIPO' DataType = datString Size = 1 Required = True DisplayLabel = 'Tipo' ReadOnly = True DictionaryEntry = 'Traspasos_TIPO' end item Name = 'FECHA' DataType = datDateTime DisplayLabel = 'Fecha' ReadOnly = True DictionaryEntry = 'Traspasos_FECHA' end item Name = 'CENTRO' DataType = datString Size = 17 DisplayLabel = 'Centro' ReadOnly = True DictionaryEntry = 'Traspasos_CENTRO' end item Name = 'FILIAL' DataType = datString Size = 25 DisplayLabel = 'Filial' ReadOnly = True DictionaryEntry = 'Traspasos_FILIAL' end item Name = 'CENTRO2' DataType = datString Size = 17 DisplayLabel = 'Centro2' ReadOnly = True DictionaryEntry = 'Traspasos_CENTRO2' end item Name = 'FILIAL2' DataType = datString Size = 25 DisplayLabel = 'Filial2' ReadOnly = True DictionaryEntry = 'Traspasos_FILIAL2' end item Name = 'APROBADO' DataType = datString Size = 1 DisplayLabel = 'Aprobado' DictionaryEntry = 'Traspasos_APROBADO' end item Name = 'ESTADO_TRASPASO' DataType = datString Size = 20 DisplayLabel = 'Estado' DictionaryEntry = 'Traspasos_ESTADO_TRASPASO' end item Name = 'OBSERVACIONES' DataType = datString Size = 255 DisplayLabel = 'Observaciones' DictionaryEntry = 'Traspasos_OBSERVACIONES' end item Name = 'CONTABILIZAR' DataType = datString Size = 1 DisplayLabel = 'Contabilizar' DictionaryEntry = 'Traspasos_CONTABILIZAR' end item Name = 'FECHACAMBIO' DataType = datDateTime DisplayLabel = 'Fecha cambio' ReadOnly = True DictionaryEntry = 'Traspasos_FECHACAMBIO' end item Name = 'CODIGO' DataType = datString Size = 12 DisplayLabel = 'C'#243'digo' ReadOnly = True DictionaryEntry = 'Traspasos_CODIGO' end item Name = 'PRODUCTO' DataType = datString Size = 40 Required = True DisplayLabel = 'Producto' ReadOnly = True DictionaryEntry = 'Traspasos_PRODUCTO' end item Name = 'COLOR' DataType = datString Size = 10 DisplayLabel = 'Color' ReadOnly = True DictionaryEntry = 'Traspasos_COLOR' end item Name = 'T38' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T38' end item Name = 'T40' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T40' end item Name = 'T42' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T42' end item Name = 'T44' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T44' end item Name = 'T46' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T46' end item Name = 'T48' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T48' end item Name = 'TOTAL' DataType = datFloat DisplayLabel = 'Total' ReadOnly = True DictionaryEntry = 'Traspasos_TOTAL' end item Name = 'TR38' DataType = datFloat DictionaryEntry = 'Traspasos_TR38' end item Name = 'TR40' DataType = datFloat DictionaryEntry = 'Traspasos_TR40' end item Name = 'TR42' DataType = datFloat DictionaryEntry = 'Traspasos_TR42' end item Name = 'TR44' DataType = datFloat DictionaryEntry = 'Traspasos_TR44' end item Name = 'TR46' DataType = datFloat DictionaryEntry = 'Traspasos_TR46' end item Name = 'TR48' DataType = datFloat DictionaryEntry = 'Traspasos_TR48' end item Name = 'TOTAL_RECT' DataType = datFloat DisplayLabel = 'Total' ServerAutoRefresh = True DictionaryEntry = 'Traspasos_TOTAL_RECT' end> Params = <> MasterMappingMode = mmDataRequest StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = DARemoteDataAdapter DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'Traspasos' IndexDefs = <> Left = 136 Top = 32 end object ds_Traspasos: TDADataSource DataSet = tbl_Traspasos.Dataset DataTable = tbl_Traspasos Left = 136 Top = 88 end object tbl_TraspasosAprobados: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'TIPO' DataType = datString Size = 1 Required = True DisplayLabel = 'Tipo' ReadOnly = True DictionaryEntry = 'Traspasos_TIPO' end item Name = 'FECHA' DataType = datDateTime DisplayLabel = 'Fecha' ReadOnly = True DictionaryEntry = 'Traspasos_FECHA' end item Name = 'CENTRO' DataType = datString Size = 17 DisplayLabel = 'Centro' ReadOnly = True DictionaryEntry = 'Traspasos_CENTRO' end item Name = 'FILIAL' DataType = datString Size = 25 DisplayLabel = 'Filial' ReadOnly = True DictionaryEntry = 'Traspasos_FILIAL' end item Name = 'CENTRO2' DataType = datString Size = 17 DisplayLabel = 'Centro2' ReadOnly = True DictionaryEntry = 'Traspasos_CENTRO2' end item Name = 'FILIAL2' DataType = datString Size = 25 DisplayLabel = 'Filial2' ReadOnly = True DictionaryEntry = 'Traspasos_FILIAL2' end item Name = 'APROBADO' DataType = datString Size = 1 DisplayLabel = 'Aprobado' DictionaryEntry = 'Traspasos_APROBADO' end item Name = 'ESTADO_TRASPASO' DataType = datString Size = 20 DisplayLabel = 'Estado' DictionaryEntry = 'Traspasos_ESTADO_TRASPASO' end item Name = 'OBSERVACIONES' DataType = datString Size = 255 DisplayLabel = 'Observaciones' DictionaryEntry = 'Traspasos_OBSERVACIONES' end item Name = 'CONTABILIZAR' DataType = datString Size = 1 DisplayLabel = 'Contabilizar' DictionaryEntry = 'Traspasos_CONTABILIZAR' end item Name = 'FECHACAMBIO' DataType = datDateTime DisplayLabel = 'Fecha cambio' ReadOnly = True DictionaryEntry = 'Traspasos_FECHACAMBIO' end item Name = 'CODIGO' DataType = datString Size = 12 DisplayLabel = 'C'#243'digo' ReadOnly = True DictionaryEntry = 'Traspasos_CODIGO' end item Name = 'PRODUCTO' DataType = datString Size = 40 Required = True DisplayLabel = 'Producto' ReadOnly = True DictionaryEntry = 'Traspasos_PRODUCTO' end item Name = 'COLOR' DataType = datString Size = 10 DisplayLabel = 'Color' ReadOnly = True DictionaryEntry = 'Traspasos_COLOR' end item Name = 'T38' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T38' end item Name = 'T40' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T40' end item Name = 'T42' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T42' end item Name = 'T44' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T44' end item Name = 'T46' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T46' end item Name = 'T48' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T48' end item Name = 'TOTAL' DataType = datFloat DisplayLabel = 'Total' ReadOnly = True DictionaryEntry = 'Traspasos_TOTAL' end item Name = 'TR38' DataType = datFloat DictionaryEntry = 'Traspasos_TR38' end item Name = 'TR40' DataType = datFloat DictionaryEntry = 'Traspasos_TR40' end item Name = 'TR42' DataType = datFloat DictionaryEntry = 'Traspasos_TR42' end item Name = 'TR44' DataType = datFloat DictionaryEntry = 'Traspasos_TR44' end item Name = 'TR46' DataType = datFloat DictionaryEntry = 'Traspasos_TR46' end item Name = 'TR48' DataType = datFloat DictionaryEntry = 'Traspasos_TR48' end item Name = 'TOTAL_RECT' DataType = datFloat DisplayLabel = 'Total' ServerAutoRefresh = True DictionaryEntry = 'Traspasos_TOTAL_RECT' end> Params = <> MasterMappingMode = mmDataRequest StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = DARemoteDataAdapter DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'TraspasosAprobados' IndexDefs = <> Left = 272 Top = 32 end object ds_TraspasosAprobados: TDADataSource DataSet = tbl_TraspasosAprobados.Dataset DataTable = tbl_TraspasosAprobados Left = 272 Top = 88 end object tbl_TraspasosPendientes: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'TIPO' DataType = datString Size = 1 Required = True DisplayLabel = 'Tipo' ReadOnly = True DictionaryEntry = 'Traspasos_TIPO' end item Name = 'FECHA' DataType = datDateTime DisplayLabel = 'Fecha' ReadOnly = True DictionaryEntry = 'Traspasos_FECHA' end item Name = 'CENTRO' DataType = datString Size = 17 DisplayLabel = 'Centro' ReadOnly = True DictionaryEntry = 'Traspasos_CENTRO' end item Name = 'FILIAL' DataType = datString Size = 25 DisplayLabel = 'Filial' ReadOnly = True DictionaryEntry = 'Traspasos_FILIAL' end item Name = 'CENTRO2' DataType = datString Size = 17 DisplayLabel = 'Centro2' ReadOnly = True DictionaryEntry = 'Traspasos_CENTRO2' end item Name = 'FILIAL2' DataType = datString Size = 25 DisplayLabel = 'Filial2' ReadOnly = True DictionaryEntry = 'Traspasos_FILIAL2' end item Name = 'APROBADO' DataType = datString Size = 1 DisplayLabel = 'Aprobado' DictionaryEntry = 'Traspasos_APROBADO' end item Name = 'ESTADO_TRASPASO' DataType = datString Size = 20 DisplayLabel = 'Estado' DictionaryEntry = 'Traspasos_ESTADO_TRASPASO' end item Name = 'OBSERVACIONES' DataType = datString Size = 255 DisplayLabel = 'Observaciones' DictionaryEntry = 'Traspasos_OBSERVACIONES' end item Name = 'CONTABILIZAR' DataType = datString Size = 1 DisplayLabel = 'Contabilizar' DictionaryEntry = 'Traspasos_CONTABILIZAR' end item Name = 'FECHACAMBIO' DataType = datDateTime DisplayLabel = 'Fecha cambio' ReadOnly = True DictionaryEntry = 'Traspasos_FECHACAMBIO' end item Name = 'CODIGO' DataType = datString Size = 12 DisplayLabel = 'C'#243'digo' ReadOnly = True DictionaryEntry = 'Traspasos_CODIGO' end item Name = 'PRODUCTO' DataType = datString Size = 40 Required = True DisplayLabel = 'Producto' ReadOnly = True DictionaryEntry = 'Traspasos_PRODUCTO' end item Name = 'COLOR' DataType = datString Size = 10 DisplayLabel = 'Color' ReadOnly = True DictionaryEntry = 'Traspasos_COLOR' end item Name = 'T38' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T38' end item Name = 'T40' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T40' end item Name = 'T42' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T42' end item Name = 'T44' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T44' end item Name = 'T46' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T46' end item Name = 'T48' DataType = datFloat ReadOnly = True DictionaryEntry = 'Traspasos_T48' end item Name = 'TOTAL' DataType = datFloat DisplayLabel = 'Total' ReadOnly = True DictionaryEntry = 'Traspasos_TOTAL' end item Name = 'TR38' DataType = datFloat DictionaryEntry = 'Traspasos_TR38' end item Name = 'TR40' DataType = datFloat DictionaryEntry = 'Traspasos_TR40' end item Name = 'TR42' DataType = datFloat DictionaryEntry = 'Traspasos_TR42' end item Name = 'TR44' DataType = datFloat DictionaryEntry = 'Traspasos_TR44' end item Name = 'TR46' DataType = datFloat DictionaryEntry = 'Traspasos_TR46' end item Name = 'TR48' DataType = datFloat DictionaryEntry = 'Traspasos_TR48' end item Name = 'TOTAL_RECT' DataType = datFloat DisplayLabel = 'Total' ServerAutoRefresh = True DictionaryEntry = 'Traspasos_TOTAL_RECT' end> Params = <> MasterMappingMode = mmDataRequest StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = DARemoteDataAdapter DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'TraspasosPendientes' IndexDefs = <> Left = 408 Top = 32 end object ds_TraspasosPendientes: TDADataSource DataSet = tbl_TraspasosPendientes.Dataset DataTable = tbl_TraspasosPendientes Left = 408 Top = 88 end object DARemoteDataAdapter: TDARemoteDataAdapter GetSchemaCall.RemoteService = RORemoteService GetSchemaCall.MethodName = 'GetSchemaAsXML' GetSchemaCall.Params = < item Name = 'Result' DataType = rtString Flag = fResult end> GetSchemaCall.Default = False GetSchemaCall.IncomingSchemaParameter = 'Result' GetSchemaCall.OutgoingFilterParameter = 'aFilter' GetDataCall.RemoteService = RORemoteService GetDataCall.MethodName = 'GetDatasetDataEx' GetDataCall.Params = < item Name = 'Result' DataType = rtBinary Flag = fResult Value = Null end item Name = 'DatasetName' DataType = rtString Flag = fIn end item Name = 'Params' DataType = rtUserDefined Flag = fIn TypeName = 'TDADatasetParamArray' Value = Null end item Name = 'UserFilter' DataType = rtString Flag = fIn Value = Null end item Name = 'IncludeSchema' DataType = rtBoolean Flag = fIn end item Name = 'MaxRecords' DataType = rtInteger Flag = fIn end> GetDataCall.Default = False GetDataCall.OutgoingTableNamesParameter = 'DatasetName' GetDataCall.OutgoingTableRequestInfosParameter = 'aTableRequestInfoArray' GetDataCall.IncomingDataParameter = 'Result' GetDataCall.OutgoingParamsParameter = 'Params' GetDataCall.OutgoingIncludeSchemaParameter = 'IncludeSchema' GetDataCall.OutgoingMaxRecordsParameter = 'MaxRecords' UpdateDataCall.RemoteService = RORemoteService UpdateDataCall.MethodName = 'UpdateData' UpdateDataCall.Params = < item Name = 'Delta' DataType = rtBinary Flag = fIn end item Name = 'Result' DataType = rtBinary Flag = fResult end> UpdateDataCall.Default = False UpdateDataCall.OutgoingDeltaParameter = 'Delta' UpdateDataCall.IncomingDeltaParameter = 'Result' GetScriptsCall.RemoteService = RORemoteService GetScriptsCall.MethodName = 'GetDatasetScripts' GetScriptsCall.Params = < item Name = 'DatasetNames' DataType = rtString Flag = fIn end item Name = 'Result' DataType = rtString Flag = fResult end> GetScriptsCall.Default = False GetScriptsCall.OutgoingTableNamesParameter = 'DatasetNames' GetScriptsCall.IncomingScriptParameter = 'Result' RemoteService = RORemoteService DataStreamer = dmBase.DABINAdapter Left = 40 Top = 96 end end