PE AF251TIP

01. DATOS GENERALES

02. DESCRIPCIÓN

El punto de entrada AF251TIP se utiliza para realizar la validación del campo N3_TIPO durante el proceso de adquisición por transferencia. Este permite al cliente definir reglas personalizadas para garantizar que el tipo de adquisición especificado esté de acuerdo con las políticas y prácticas de la empresa.

Con AF251TIP, es posible validar el tipo del bien transferido, garantizando que las operaciones de adquisición sean consistentes y sigan los criterios establecidos. Esto proporciona mayor control y precisión en las adquisiciones por transferencia de activos, garantizando la integridad de los registros y la conformidad con las reglas internas de la empresa.

03. OTRAS INFORMACIONES

aTiposC := ExecBlock('AF251TIP', .F., .F., { aTiposC } )

#INCLUDE "Protheus.ch"

User Function AF251TIP()

	Local aTiposC := ParamIxb[1]
	Local nX
	Default aTiposC := {"01"}
	
	//Muestra mensaje con tipo existente en el array
	For nX := 1 to Len(aTiposC)
		If nX == 1
			cTipo := aTiposC[nX]
		Else
			cTipo += " / " + aTiposC[nX]
		EndIf
	Next nX
	
	Alert("Tipo de activo seleccionado: " + cTipo)
	
	//Incluye nuevos tipos
	If aScan(aTiposC,{aX aX == "21"}) == 0
		aAdd(aTiposC , "21" )
	EndIf

Return aTiposC

04. ASUNTOS RELACIONADOS

• No se aplica.