Arreglo comando de update de datos_cliente

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@382 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
roberto 2009-01-08 19:22:12 +00:00
parent 70453f9661
commit 6735bee6b0

View File

@ -786,16 +786,8 @@ object srvContactos: TsrvContactos
TableField = 'PROCEDENCIA_CLIENTE'
end
item
DatasetField = 'VENCIMIENTO_FACTURAS_1'
TableField = 'VENCIMIENTO_FACTURAS_1'
end
item
DatasetField = 'VENCIMIENTO_FACTURAS_2'
TableField = 'VENCIMIENTO_FACTURAS_2'
end
item
DatasetField = 'VENCIMIENTO_FACTURAS_3'
TableField = 'VENCIMIENTO_FACTURAS_3'
DatasetField = 'VENCIMIENTO_FACTURAS'
TableField = 'VENCIMIENTO_FACTURAS'
end>
end>
Name = 'Clientes'
@ -960,6 +952,10 @@ object srvContactos: TsrvContactos
Size = 255
DictionaryEntry = 'Clientes_NOMBRE_COMERCIAL'
end
item
Name = 'VENCIMIENTO_FACTURAS'
DataType = datInteger
end
item
Name = 'BLOQUEADO'
DataType = datSmallInt
@ -1017,18 +1013,6 @@ object srvContactos: TsrvContactos
DataType = datString
Size = 255
DictionaryEntry = 'Clientes_PROCEDENCIA_CLIENTE'
end
item
Name = 'VENCIMIENTO_FACTURAS_1'
DataType = datInteger
end
item
Name = 'VENCIMIENTO_FACTURAS_2'
DataType = datInteger
end
item
Name = 'VENCIMIENTO_FACTURAS_3'
DataType = datInteger
end>
end
item
@ -2925,10 +2909,6 @@ object srvContactos: TsrvContactos
Name = 'NOMBRE_COMERCIAL'
Value = ''
end
item
Name = 'VENCIMIENTO_FACTURAS'
Value = ''
end
item
Name = 'BLOQUEADO'
Value = ''
@ -2989,16 +2969,15 @@ object srvContactos: TsrvContactos
'UPDATE CLIENTES_DATOS'#10' SET '#10' ID_CLIENTE = :ID_CLIENTE, '#10' ' +
'GRUPO_CLIENTE = :GRUPO_CLIENTE,'#10' MOTIVO_BLOQUEO = :MOTIVO_BLO' +
'QUEO,'#10' RECARGO_EQUIVALENCIA = :RECARGO_EQUIVALENCIA,'#10' NOMB' +
'RE_COMERCIAL = :NOMBRE_COMERCIAL,'#10' VENCIMIENTO_FACTURAS = :VE' +
'NCIMIENTO_FACTURAS,'#10' BLOQUEADO = :BLOQUEADO,'#10' REGIMEN_IVA ' +
'= :REGIMEN_IVA,'#10' ID_TIPO_IVA = :ID_TIPO_IVA,'#10' ID_FORMA_PAG' +
'O = :ID_FORMA_PAGO,'#10' TIENDA_WEB = :TIENDA_WEB,'#10' CODIGO_ASI' +
'GNADO = :CODIGO_ASIGNADO,'#10' IGNORAR_CONTABILIDAD = :IGNORAR_CO' +
'NTABILIDAD,'#10' TIENE_SUBCUENTA = :TIENE_SUBCUENTA,'#10' PROCEDEN' +
'CIA_CLIENTE = :PROCEDENCIA_CLIENTE,'#10' VENCIMIENTO_FACTURAS_1 =' +
' :VENCIMIENTO_FACTURAS_1,'#10' VENCIMIENTO_FACTURAS_2 = :VENCIMIE' +
'NTO_FACTURAS_2,'#10' VENCIMIENTO_FACTURAS_3 = :VENCIMIENTO_FACTUR' +
'AS_3'#10' WHERE'#10' (ID_CLIENTE = :OLD_ID_CLIENTE)'#10
'RE_COMERCIAL = :NOMBRE_COMERCIAL,'#10' BLOQUEADO = :BLOQUEADO,'#10' ' +
' REGIMEN_IVA = :REGIMEN_IVA,'#10' ID_TIPO_IVA = :ID_TIPO_IVA,'#10' ' +
' ID_FORMA_PAGO = :ID_FORMA_PAGO,'#10' TIENDA_WEB = :TIENDA_WEB,'#10 +
' CODIGO_ASIGNADO = :CODIGO_ASIGNADO,'#10' IGNORAR_CONTABILIDAD' +
' = :IGNORAR_CONTABILIDAD,'#10' TIENE_SUBCUENTA = :TIENE_SUBCUENTA' +
','#10' PROCEDENCIA_CLIENTE = :PROCEDENCIA_CLIENTE,'#10' VENCIMIENT' +
'O_FACTURAS_1 = :VENCIMIENTO_FACTURAS_1,'#10' VENCIMIENTO_FACTURAS' +
'_2 = :VENCIMIENTO_FACTURAS_2,'#10' VENCIMIENTO_FACTURAS_3 = :VENC' +
'IMIENTO_FACTURAS_3'#10' WHERE'#10' (ID_CLIENTE = :OLD_ID_CLIENTE)'#10
StatementType = stSQL
ColumnMappings = <>
end>