TpAUX CAMPO ASIGNACION unit - Historial de revisiones

Luciano Carou: /* Usos */

2025-05-22T15:52:42Z

Usos

← Revisión anterior		Revisión del 17:52 22 may 2025
Línea 97:		Línea 97:

	=Usos=		=Usos=
			El auxiliar se usa en:
	*[[TprxADODataSetEdit].OnEnterFieldXtd.		*[[TprxADODataSetEdit].OnEnterFieldXtd.
	*[[Tfva_campos_items]].DefaultValuesAssign.		*[[Tfva_campos_items]].DefaultValuesAssign.

Luciano Carou: /* Modo de uso */

2025-05-22T15:52:27Z

Modo de uso

← Revisión anterior		Revisión del 17:52 22 may 2025
Línea 95:		Línea 95:
	prxADOClientDM.pAUX_CAMPO_ASIGNACION_unit.Procesar(TpAUX_CAMPO_ASIGNACION_ONENTER);		prxADOClientDM.pAUX_CAMPO_ASIGNACION_unit.Procesar(TpAUX_CAMPO_ASIGNACION_ONENTER);
	</pre>		</pre>

			=Usos=
			*[[TprxADODataSetEdit].OnEnterFieldXtd.
			*[[Tfva_campos_items]].DefaultValuesAssign.

Luciano Carou: /* Modo de uso */

2025-05-22T15:51:47Z

Modo de uso

← Revisión anterior		Revisión del 17:51 22 may 2025
Línea 78:		Línea 78:

	=Modo de uso=		=Modo de uso=
	~~Habitualmente el~~ auxiliar se usa de la siguiente manera:		El auxiliar se usa de la siguiente manera:
	<pre>		<pre>
	prxADOClientDM.~~pAUX_CLASE_POST_CONDICION_unit~~.DataSet := Self;		prxADOClientDM.pAUX_CAMPO_ASIGNACION_unit.DataSet := Self;
	prxADOClientDM.~~pAUX_CLASE_POST_CONDICION_unit~~.Clase := ~~Self~~.~~ppTableName~~;		prxADOClientDM.pAUX_CAMPO_ASIGNACION_unit.Clase := ppTableName;
			prxADOClientDM.pAUX_CAMPO_ASIGNACION_unit.Campo := aFieldName;
			prxADOClientDM.pAUX_CAMPO_ASIGNACION_unit.Procesar(TpAUX_CAMPO_ASIGNACION_ONENTER);
	</pre>		</pre>

Línea 87:		Línea 89:
	*'''Dataset''' que se asigna al mismo componente que está llamando al auxiliar.		*'''Dataset''' que se asigna al mismo componente que está llamando al auxiliar.
	*'''Clase''' se inicializa al nombre de la tabla del componente que está llamando al auxiliar.		*'''Clase''' se inicializa al nombre de la tabla del componente que está llamando al auxiliar.
			*'''Campo''' se inicializa al nombre del campo cuyo valor queremos asignar.

	Posteriormente se llama directamente a la función Execute que validará las condiciones de posteo.		Posteriormente se llama directamente a la función Execute que validará las condiciones de posteo.
	<pre>		<pre>
	prxADOClientDM.~~pAUX_CLASE_POST_CONDICION_unit~~.~~Execute~~(~~TpAUX_CLASE_POST_CONDICION_INSERCION, vMsg, vStop);vStop~~);		prxADOClientDM.pAUX_CAMPO_ASIGNACION_unit.Procesar(TpAUX_CAMPO_ASIGNACION_ONENTER);
	</pre>		</pre>

Luciano Carou en 15:44 22 may 2025

2025-05-22T15:44:54Z

← Revisión anterior		Revisión del 17:44 22 may 2025
Línea 76:		Línea 76:
	===function Exec_FieldAssignEstadistica(aCampo: String; aSQL: TStringList): Variant===		===function Exec_FieldAssignEstadistica(aCampo: String; aSQL: TStringList): Variant===
	Asigna un valor estadístico.		Asigna un valor estadístico.

			=Modo de uso=
			Habitualmente el auxiliar se usa de la siguiente manera:
			<pre>
			prxADOClientDM.pAUX_CLASE_POST_CONDICION_unit.DataSet := Self;
			prxADOClientDM.pAUX_CLASE_POST_CONDICION_unit.Clase := Self.ppTableName;
			</pre>

			Primero asignamos las propiedades:
			*'''Dataset''' que se asigna al mismo componente que está llamando al auxiliar.
			*'''Clase''' se inicializa al nombre de la tabla del componente que está llamando al auxiliar.

			Posteriormente se llama directamente a la función Execute que validará las condiciones de posteo.
			<pre>
			prxADOClientDM.pAUX_CLASE_POST_CONDICION_unit.Execute(TpAUX_CLASE_POST_CONDICION_INSERCION, vMsg, vStop);vStop);
			</pre>

Luciano Carou: /* Implementación */

2025-05-22T15:44:30Z

Implementación

← Revisión anterior		Revisión del 17:44 22 may 2025
Línea 65:		Línea 65:

	=Implementación=		=Implementación=
			===function Procesar(aEvento: String; aOnPost: Boolean = False): Boolean===
			Procesa las asignaciones correspondientes al campo como detonador, si encuentra un valor lo asigna al campo:
			<pre>
			TprxADODataSetEdit(DataSet).AssignValueToField(Items[I], vValor);
			</pre>

			===function Exec_FieldAssignPorcentaje100(aCampo: String; aSQL: TStringList): Double===
			Arma y ejecuta la sentencia de asignación por diferencia.

			===function Exec_FieldAssignEstadistica(aCampo: String; aSQL: TStringList): Variant===
			Asigna un valor estadístico.

Luciano Carou en 15:41 22 may 2025

2025-05-22T15:41:36Z

← Revisión anterior		Revisión del 17:41 22 may 2025
Línea 63:		Línea 63:
	end;		end;
	</pre>		</pre>

			=Implementación=

Luciano Carou: /* Declaración */

2025-05-22T15:41:17Z

Declaración

← Revisión anterior		Revisión del 17:41 22 may 2025
Línea 11:		Línea 11:
	=Declaración=		=Declaración=
	<pre>		<pre>
			const
			TpAUX_CAMPO_ASIGNACION_ONENTER = 'ONENTER';
			TpAUX_CAMPO_ASIGNACION_ONEXIT = 'ONEXIT';

	type		type
	TpAUX_CAMPO_ASIGNACION_unit = class(TComponent)		TpAUX_CAMPO_ASIGNACION_unit = class(TComponent)

Luciano Carou: /* Identidad */

2025-05-22T15:40:07Z

Identidad

← Revisión anterior		Revisión del 17:40 22 may 2025
Línea 4:		Línea 4:
	=[[QUEESESTO/IDENTIDAD\|Identidad]]=		=[[QUEESESTO/IDENTIDAD\|Identidad]]=
	[[Category:MANUAL/PROGRAMADOR]]		[[Category:MANUAL/PROGRAMADOR]]
	[[Category:AUXILIARES]]		[[Category:PRG AUXILIARES]]
	*Ancestro: [[TComponent]]		*Ancestro: [[TComponent]]
	*Carpeta: C:\DevelopPrx\pPRAGMA		*Carpeta: C:\DevelopPrx\pPRAGMA

Luciano Carou: /* Declaración */

2025-05-18T23:10:06Z

Declaración

@@ Línea 11: / Línea 11: @@
 =Declaración=
 <pre>
 </pre>

Luciano Carou: Página creada con «=Descripción= El objeto '''TpAUX_CAMPO_ASIGNACION_unit''' (Asignación de valores) procesa los auxiliares de tipo '''ASIGNACION''', ver detalles en DEV AUXILIARES/ASIGNACION. =Identidad= Category:MANUAL/PROGRAMADOR Category:AUXILIARES *Ancestro: TComponent *Carpeta: C:\DevelopPrx\pPRAGMA *Archivo: pAUX_CAMPO_ASIGNACION_unit.pas =Declaración=

2025-05-18T22:47:52Z

Página creada con «=Descripción= El objeto '''TpAUX_CAMPO_ASIGNACION_unit''' (Asignación de valores) procesa los auxiliares de tipo '''ASIGNACION''', ver detalles en DEV AUXILIARES/ASIGNACION. =Identidad= Category:MANUAL/PROGRAMADOR Category:AUXILIARES *Ancestro: TComponent *Carpeta: C:\DevelopPrx\pPRAGMA *Archivo: pAUX_CAMPO_ASIGNACION_unit.pas =Declaración= <pre> </pre>»

Página nueva

=Descripción=
El objeto '''TpAUX_CAMPO_ASIGNACION_unit''' (Asignación de valores) procesa los auxiliares de tipo '''ASIGNACION''', ver detalles en [[DEV AUXILIARES/ASIGNACION]].

=[[QUEESESTO/IDENTIDAD|Identidad]]=
[[Category:MANUAL/PROGRAMADOR]]
[[Category:AUXILIARES]]
*Ancestro: [[TComponent]]
*Carpeta: C:\DevelopPrx\pPRAGMA
*Archivo: pAUX_CAMPO_ASIGNACION_unit.pas

=Declaración=
<pre>
</pre>