TprxCmpCABECERA - Historial de revisiones

Luciano Carou: /* function RemitoCombustible_ValidarExistencia(var aErrMsg: String; aAutImp: Boolean): Boolean */

2025-05-19T15:11:52Z

function RemitoCombustible_ValidarExistencia(var aErrMsg: String; aAutImp: Boolean): Boolean

← Revisión anterior		Revisión del 17:11 19 may 2025
Línea 494:		Línea 494:

	===function RemitoCombustible_ValidarExistencia(var aErrMsg: String; aAutImp: Boolean): Boolean===		===function RemitoCombustible_ValidarExistencia(var aErrMsg: String; aAutImp: Boolean): Boolean===
	Función especial solo para remitos de combustible.		Función especial de validación solo para remitos de combustible.

	=Implementación, funciones relacionadas con la totalización del comprobante=		=Implementación, funciones relacionadas con la totalización del comprobante=

Luciano Carou: /* function TomarUltimoNumeroEnUso(aPermiteFechaAnterior: Boolean; var aFechaAnterior: TDateTime): Integer */

2025-05-19T15:10:48Z

function TomarUltimoNumeroEnUso(aPermiteFechaAnterior: Boolean; var aFechaAnterior: TDateTime): Integer

← Revisión anterior		Revisión del 17:10 19 may 2025
Línea 414:		Línea 414:

	===function TomarUltimoNumeroEnUso(aPermiteFechaAnterior: Boolean; var aFechaAnterior: TDateTime): Integer===		===function TomarUltimoNumeroEnUso(aPermiteFechaAnterior: Boolean; var aFechaAnterior: TDateTime): Integer===
	Esta función ~~contribuye~~ a la función '''AsignarNumero''' obteniendo el número más alto asignado a un comprobante que usa el mismo talonario que el comprobante que estamos procesando.		Esta función asiste a la función '''AsignarNumero''' obteniendo el número más alto asignado a un comprobante que usa el mismo talonario que el comprobante que estamos procesando.

	Primero ejecuta un SQL para saber qué comprobantes usan el mismo [[COMPROBANTES/TALONARIOS\|TALONARIO]]:		Primero ejecuta un SQL para saber qué comprobantes usan el mismo [[COMPROBANTES/TALONARIOS\|TALONARIO]]:

Luciano Carou: /* function UpdateBatchXtd(AffectRecords: TAffectRecords = arAll): Boolean */

2025-05-19T15:10:21Z

function UpdateBatchXtd(AffectRecords: TAffectRecords = arAll): Boolean

← Revisión anterior		Revisión del 17:10 19 may 2025
Línea 409:		Línea 409:
	===function UpdateBatchXtd(AffectRecords: TAffectRecords = arAll): Boolean===		===function UpdateBatchXtd(AffectRecords: TAffectRecords = arAll): Boolean===
	Esta función vuelca los cambios hechos a la cabecera del comprobante (y sus posibles detalles) a la base de datos.		Esta función vuelca los cambios hechos a la cabecera del comprobante (y sus posibles detalles) a la base de datos.
	*Antes que nada llama a su inherited.		*Antes que nada llama a su inherited para grabar la cabecera del comprobante y sus detalles
	*Si el código del comprobante todavía tiene los signos de interrogación propios de un comprobante en inserción, llama a la función '''AsignarNumero'''para asignarle el código correcto.		*Si el código del comprobante todavía tiene los signos de interrogación propios de un comprobante en inserción, llama a la función '''AsignarNumero'''para asignarle el código correcto.
	*Si el estado del comprobante sigue siendo '''Nuevo''' le indica al resto de la función que debe procesarse como un comprobante nuevo.		*Si el estado del comprobante sigue siendo '''Nuevo''' le indica al resto de la función que debe procesarse como un comprobante nuevo.

Luciano Carou: /* function ModoAnulacion: String */

2025-05-19T15:08:59Z

function ModoAnulacion: String

← Revisión anterior		Revisión del 17:08 19 may 2025
Línea 363:		Línea 363:

	===function ModoAnulacion: String===		===function ModoAnulacion: String===
	Trae el modo de anulación de la tabla desde [[COMPROBANTES/TIPOS]].		Trae el modo de anulación de la tabla desde [[COMPROBANTES/TIPOS]].

			El modo de anulación puede ser:
			*Lógico: el campo ESTADO del comprobante se setea a ANULADO.
			*Físico: se elimina el comprobante directamente.

			En ambos casos el comprobante deja de grabar tablas relacionadas con sus triggers.

	===function ModoImpresion_Automatica: Boolean===		===function ModoImpresion_Automatica: Boolean===

Luciano Carou: /* Propiedades de nombres de campos */

2025-05-19T15:05:05Z

Propiedades de nombres de campos

← Revisión anterior		Revisión del 17:05 19 may 2025
Línea 256:		Línea 256:

	<blockquote>		<blockquote>
	La clase TcmpCABECERA_pragma_XTD_implemented inicializa las propiedades según los campos defindos en [[cmpCABECERA_pragma_XTD]] y usa nombres de campo en mayúsculas y ~~cono prefijo~~ la letra '''F'''..		La clase TcmpCABECERA_pragma_XTD_implemented inicializa las propiedades según los campos defindos en [[cmpCABECERA_pragma_XTD]] y usa nombres de campo en mayúsculas y la letra '''F''' como prefijo.

	La clase TprxCmpCABECERA inicializa las propiedades según los campos definidos en la clase [[cmpCABECERA]] usa campos en minúsculas sin la '''F'''.		La clase TprxCmpCABECERA inicializa las propiedades según los campos definidos en la clase [[cmpCABECERA]] y usa campos en minúsculas sin la '''F'''.
	</blockquote>		</blockquote>

Luciano Carou: /* Implementación */

2025-05-19T15:03:47Z

Implementación

← Revisión anterior		Revisión del 17:03 19 may 2025
Línea 385:		Línea 385:

	En caso de que la función valide correctamente eventualmente llamará a la función '''function TprxCmpCABECERA.ReabrirComprobante: Boolean''' para hacerlo.		En caso de que la función valide correctamente eventualmente llamará a la función '''function TprxCmpCABECERA.ReabrirComprobante: Boolean''' para hacerlo.

			===procedure TprxCmpCABECERA.OnEnterFieldXtd(Sender: TObject; aFieldName: String; aFieldValue: Variant)===
			Función llamada durante la edición de un comprobante cuando el foco ingresa al control de edición de un campo. Esta función en particular no implemente código, pero si llama a su inherited.

			===function TprxCmpCABECERA.OnExitFieldXtd(Sender: TObject; aFieldName: String; aFieldValue: Variant; aErrMsg: String): Boolean===
			Función llamada durante la edición de un comprobante cuando el foco deja el control de edición de un campo.

			Implementa funcionalidad:
			*En el campo '''Tipo''' carga algunas propiedades respecto de ese [[COMPROBANTES/TIPOS\|Tipo de comprobante]] en particular.
			*Cuando completa la '''moneda''' y la '''fecha de valuación''' busca la cotización en la tabla [[MONEDAS/COTIZACIONES]] y la asigna al campo correspondiente.
			*En el campo '''referencia''' (normalmente referencia al comprobante del proveedor) hace las validaciones que correspondan al comprobante, por ejemplo: validar que esa referencia no se haya registrado antes.

			===procedure DefaultValuesAssign===
			Asigna los valores por defecto cuando estamos insertando un comprobante.

			=Implementación, funcionalidad relacionada con el grabado / eliminado del comprobante=
			===function UpdateBatchXtd(AffectRecords: TAffectRecords = arAll): Boolean===
			Esta función vuelca los cambios hechos a la cabecera del comprobante (y sus posibles detalles) a la base de datos.
			*Antes que nada llama a su inherited.
			*Si el código del comprobante todavía tiene los signos de interrogación propios de un comprobante en inserción, llama a la función '''AsignarNumero'''para asignarle el código correcto.
			*Si el estado del comprobante sigue siendo '''Nuevo''' le indica al resto de la función que debe procesarse como un comprobante nuevo.

			===function TomarUltimoNumeroEnUso(aPermiteFechaAnterior: Boolean; var aFechaAnterior: TDateTime): Integer===
			Esta función contribuye a la función '''AsignarNumero''' obteniendo el número más alto asignado a un comprobante que usa el mismo talonario que el comprobante que estamos procesando.

			Primero ejecuta un SQL para saber qué comprobantes usan el mismo [[COMPROBANTES/TALONARIOS\|TALONARIO]]:
			<pre>
			SELECT DISTINCT
			COMPROBANTETIPO.FFAMILIA
			, FTIPO = COMPROBANTETIPO.FCODIGO
			, COMPROBANTEFAMILIA_TABLA.FTABLA
			, COMPROBANTEFAMILIA_TABLA.FCAMPO_TOTAL
			, COMPROBANTEFAMILIA_TABLA.FCAMPO_FECHA
			, COMPROBANTEFAMILIA.FGUIONSEPARADOR
			, NUMERAACUMULADOR.FUSALETRA
			FROM
			COMPROBANTETIPO
			, COMPROBANTEFAMILIA
			, COMPROBANTEFAMILIA_TABLA
			, NUMERAACUMULADOR
			WHERE
			COMPROBANTETIPO.FACUMULADOR =
			(
			SELECT NUMERADOR.FACUMULADOR FROM COMPROBANTETIPO NUMERADOR WHERE
			NUMERADOR.FFAMILIA = @FAMILIA
			AND NUMERADOR.FCODIGO = @TIPO
			)
			AND COMPROBANTEFAMILIA.FCODIGO = COMPROBANTETIPO.FFAMILIA
			AND COMPROBANTEFAMILIA_TABLA.FFAMILIA = COMPROBANTETIPO.FFAMILIA
			AND EXISTS
			(
			SELECT T.* FROM information_schema.TABLES T WHERE
			T.TABLE_TYPE LIKE @NOMBRE TABLA
			AND T.TABLE_NAME = COMPROBANTEFAMILIA_TABLA.FTABLA
			)
			AND NUMERAACUMULADOR.FCODIGO = COMPROBANTETIPO.FACUMULADOR
			ORDER BY
			COMPROBANTETIPO.FFAMILIA
			, COMPROBANTEFAMILIA_TABLA.FTABLA
			, COMPROBANTETIPO.FCODIGO
			</pre>

			Con este resultado busca el número mayor asignado a cada uno de estos comprobantes obteniendo con esto el número más alto asignado a un comprobante de este talonario.

			===function AsignarNumero: Boolean===
			Asigna el número que corresponde al nuevo comprobante y hace los updates necesarios.

			Usa la función '''TomarUltimoNumeroEnUso''' (justo anterior a ésta):
			*Si el talonario no es manual entonces ya tiene el número de comprobante a asignar.
			*Si el talonario es manual abre una ventana para que el usuario ingrese el código de comprobante a emitir, esa pantalla sugerirá el número y el usuario debe confirmarlo o ingresar el correcto.

			Hace un UPDATE sobre la tabla del comprobante para cambiar el código original con el nuevo. Por ejemplo, '???202505191148001' por '''FCF-0001-012345678'''.

			===function AsignarEstado(aComprobante: String; aEstado: String): Boolean===
			Además de asignar el nuevo código, hay que asignar el estado al comprobante según lo que el usuario eligió al grabar el comprobante, eso se hace en esta función.

			También hace el UPDATE sobre la tabla para modificar ese estado.

			===function EliminarComprobanteXtd(Sender: TObject): Boolean===
			Elimina un comprobante, si es las comprobaciones previas dieron bien.

			===function TprxCmpCABECERA.ImprimirComprobanteXtd: Boolean===
			Imprime un comprobante según los reportes instalados.

			===function AsignarComprobante_Registrado: Boolean===
			Función asociada al [[:Category:WORKFLOW\|WORKFLOW]] que permite reasignar un comprobante a otro usuario. Quien reasigna normalmente debe ser quien lo tiene asignado, y solo podrá reasignar a otro usuario que tenga los mismos permisos.

			===function EstadoAprobacion: String===
			Función genérica que retorna el estado de un comprobante en el [[:Category:WORKFLOW\|WORKFLOW]].

			=Implementación, funciones relacionadas con la referencia=
			Normalmente la referencia se refiere al ingreso al comprobante del número de comprobante de un proveedor, hay funciones específicas.

			===function Referencia_Habilita: Boolean===
			Según el tipo de comprobante habilita o no los campos relacionados con la referencia.

			===function TprxCmpCABECERA.Referencia_ValidarFormato(aFieldName: String; aValue: String; var aErrMsg: String): Boolean===
			Valida el formato de la referencia.

			===function Referencia_ValidarExistencia(var aErrMsg: String; aAutImp: Boolean): Boolean===
			Valida que la referencia no exista más de una vez para el mismo proveedor.

			===function RemitoCombustible_ValidarExistencia(var aErrMsg: String; aAutImp: Boolean): Boolean===
			Función especial solo para remitos de combustible.

			=Implementación, funciones relacionadas con la totalización del comprobante=
			===function Subtotal: Double===
			Calcula el subtotal del comprobante.

			===procedure Totalizar(aMode: String)===
			Totaliza el comprobante.

Luciano Carou: /* function TprxCmpCABECERA.ReabrirComprobanteVerificar: Boolean */

2025-05-19T14:27:55Z

function TprxCmpCABECERA.ReabrirComprobanteVerificar: Boolean

← Revisión anterior		Revisión del 16:27 19 may 2025
Línea 381:		Línea 381:
	===function TprxCmpCABECERA.ReabrirComprobanteVerificar: Boolean===		===function TprxCmpCABECERA.ReabrirComprobanteVerificar: Boolean===
	Verifica si el comprobante puede ser reabierto (ver [[:Category:COMPROBANTES#Estados de un comprobante\|Estados de un comprobante]]).		Verifica si el comprobante puede ser reabierto (ver [[:Category:COMPROBANTES#Estados de un comprobante\|Estados de un comprobante]]).
			*Verificamos las condiciones del auxiliar [[TpAUX_CLASE_POST_CONDICION_unit]].
			*Verificamos si el usuario tiene permiso para reabrir ese tipo de comprobante (usa la vista cmpPUNTOSEMISION_USUARIOS_VISTA).

			En caso de que la función valide correctamente eventualmente llamará a la función '''function TprxCmpCABECERA.ReabrirComprobante: Boolean''' para hacerlo.

Luciano Carou: /* function TprxCmpCABECERA.ReabrirComprobanteVerificar: Boolean */

2025-05-19T14:25:46Z

function TprxCmpCABECERA.ReabrirComprobanteVerificar: Boolean

← Revisión anterior		Revisión del 16:25 19 may 2025
Línea 380:		Línea 380:

	===function TprxCmpCABECERA.ReabrirComprobanteVerificar: Boolean===		===function TprxCmpCABECERA.ReabrirComprobanteVerificar: Boolean===
	Verifica si el comprobante puede ser reabierto (ver [[:Category:COMPROBANTES#Estados de un comprobante]]).		Verifica si el comprobante puede ser reabierto (ver [[:Category:COMPROBANTES#Estados de un comprobante\|Estados de un comprobante]]).

Luciano Carou: /* Implementación */

2025-05-19T14:25:16Z

Implementación

← Revisión anterior		Revisión del 16:25 19 may 2025
Línea 378:		Línea 378:
	*Verifica si el usuario tiene permiso para eliminar.		*Verifica si el usuario tiene permiso para eliminar.
	*Verifica con el auxiliar [[TpAUX_CLASE_POST_CONDICION_unit]].		*Verifica con el auxiliar [[TpAUX_CLASE_POST_CONDICION_unit]].

			===function TprxCmpCABECERA.ReabrirComprobanteVerificar: Boolean===
			Verifica si el comprobante puede ser reabierto (ver [[:Category:COMPROBANTES#Estados de un comprobante]]).

Luciano Carou: /* function PuedeEliminar(var aMsg: String): Boolean */

2025-05-19T14:23:49Z

function PuedeEliminar(var aMsg: String): Boolean

← Revisión anterior		Revisión del 16:23 19 may 2025
Línea 377:		Línea 377:
	Verifica si el comprobante activo puede ser eliminado:		Verifica si el comprobante activo puede ser eliminado:
	*Verifica si el usuario tiene permiso para eliminar.		*Verifica si el usuario tiene permiso para eliminar.
	*Verifica con el auxiliar [[~~pAUX_CLASE_POST_CONDICION_unit~~]].		*Verifica con el auxiliar [[TpAUX_CLASE_POST_CONDICION_unit]].