Histórico da Página

User Function ATFA036

	Local aParam := PARAMIXB // Vector Vetorcon comlos osparámetros parâmetrosrecibidos recebidospor peloslos pontospuntos de entrada dade la rotinarutina de baixabaja de ativoactivo manual.
	Local lRet := .T. // VariávelVariable de retornodevolución de doslos pontospuntos de entrada de dala rotinarutina de baixabaja de ativoactivo manual.
	Local oObj := aParam1 // Objeto dodel Modelo de Dadosdatos de dala rotinarutina de baixabaja de ativosactivos emen lote.
	Local cIdPonto := aParam2 // Identificador dodel pontopunto de entrada que se activará serápor chamadomedio atravésde dala funçãofunción ATFA036 de dala rotinarutina de baixabaja de ativoactivo manual.
	Local cIdModel := IIf( oObj<> NIL, oObj:GetId(), aParam3 ) // Identificador dodel Modelo de Dadosdatos de dala rotinarutina de baixabaja dodel AtivoActivo (ATFA036)
	Local cClasse := IIf( oObj<> NIL, oObj:ClassName(), '' ) // Nombre Nomede dala classeclase utilizada en nala rotinarutina (FWFORMFIELD - FormulárioFormulario, FWFORMGRID - Grid)
	Local nOperation := 0

	/*
	VerificaçãoVerifica sesi oel modelo de dadosdatos está ativoactivo para utilização dos dados da rotina la utilización de los datos de la rutina de baixabaja de ativoactivo antes de dala ejecución execuçãode doslos procedimentosprocedimientos dodel pontopunto de entrada.	
	*/

	If oObj != Nil .AND. oObj:IsActive()
		/*
			Modo de edición Ediçãoen nala Rotinarutina (4-BaixaBaja, 5-CancelamentoAnulación)
		*/
		nOperation := oObj:GetOperation()
		/*
			VerificaçãoVerifica sesi oel Identificador dodel Pontopunto de Entradaentrada ées dodel ProcessadoProcesado antes da Exibição da Telade la exhibición de la pantalla de Baixasbajas
		*/
		
		If cIdPonto == "FORMPRE"
			/*
				GravaçãoGrabación de dala Baixabaja
			*/
			If nOperation == MODEL_OPERATION_UPDATE
				Help("" ,1, "FORMPRE",,"PontoPunto de entrada Entradaejecutado en Executadola nocarga carregamentode dala exibiçãoexhibición dodel formulárioformulario para gravaçãograbación dodel registro de baixabaja de ativoactivo." ,1,0)
				lRet := .F.
				/*
					Gravação do Cancelamento da Baixa
				*/
			ElseIf nOperation == MODEL_OPERATION_DELETE
				Help("" ,1, "FORMPRE",,"PontoPunto de Entrada Executado no carregamento da exibição do formulárioentrada ejecutado en la carga de la exhibición del formulario para gravaçãograbación dodel registro de cancelamentoanulación de baixabaja de ativoactivo." ,1,0)
				lRet := .F.
			EndIf
		EndIf
	EndIf
	
Return lRet

• Se observa que la utilización del PE y los impactos de este en el sistema son de responsabilidad del cliente.
• Los ejemplos utilizados en esta documentación solamente son para fines de demostración, cada cliente debe verificar qué comportamiento desea realizar de acuerdo con el alcance del punto
• Observa-se que a utilização do PE e os impactos dele no sistema são de responsabilidade do cliente.
• Os exemplos utilizados nessa documentação são apenas para fins de demonstração, cada cliente deve verificar qual comportamento deseja realizar de acordo com o escopo do ponto de entrada.