diff --git a/Source/Modulos/Contratos de cliente/Views/uViewDetallesContratoCliente.pas b/Source/Modulos/Contratos de cliente/Views/uViewDetallesContratoCliente.pas index 6c80e19d..5cf42b7c 100644 --- a/Source/Modulos/Contratos de cliente/Views/uViewDetallesContratoCliente.pas +++ b/Source/Modulos/Contratos de cliente/Views/uViewDetallesContratoCliente.pas @@ -174,7 +174,7 @@ end; procedure TfrViewDetallesContratoCliente.actCapituloCocinaExecute(Sender: TObject); begin - AnadirCapitulo(TIPO_CAPITULO_C_VACIO, 'MUEBLES DE COCINA '); + AnadirCapitulo(TIPO_CAPITULO_C, 'MUEBLES DE COCINA '); AnadirCapitulo(TIPO_CAPITULO_V, 'IMPORTES ', True); AnadirCapitulo(TIPO_CAPITULO_V, 'AUMENTO POR '); end;