...
Producto: |
|---|
...
| Produto: | |||
|---|---|---|---|
| Solucoes_totvs_cross | SolucaoCross | TOTVS Backoffice | |
| Linha Línea de Produtoproducto: | | Linhas_totvs | | Linha | Linha
Segmento: | | Segmentos_totvs | | Segmento |
Módulo: | modulos_cross_segmentosModulosCrossSegmentos | ||
| Função Función: | FA183RES |
...
Ponto El punto de entrada FA183RES é chamado antes da gravação das tabelas durante o processo de apropriação de aplicações que possuem cota.
Através do PE é possível definir se o processo de apropriação será efetuado ou não, bem como realizar gravações complementares com base na tabela SEH - Controle de Aplicação/Empréstimo.
Tabelas posicionadas:
No momento da chamada do ponto de entrada será posicionada a tabela SEH (Controle Aplicação/Empréstimo)
Retorno do ponto de entrada:
O ponto de entrada deve retornar uma variável do tipo Logico:
se activa antes de la grabación de las tablas durante el proceso de atribución de aplicaciones que tienen cuota.
Por medio del PE es posible definir si el proceso de atribución se efectuará o no, así como realizar grabaciones complementarias con base en la tabla SEH - Control de Inversión/Préstamo.
Tablas marcadas:
En el momento en el que se activa el punto de entrada, se marcará la tabla SEH (Control Inversión/Préstamo)
Devolución del punto de entrada:
El punto de entrada debe devolver una variable del tipo Lógico:
| Aviso | ||
|---|---|---|
| ||
|
...
Não No se aplica
04. EXEMPLO EJEMPLO DE UTILIZAÇÃOUTILIZACIÓN
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#INCLUDE "totvs.ch"
/*/{Protheus.doc} User Function FA183RES
Permite efetuarefectuar gravaçõesgrabaciones ey/ouo validaçõesvalidaciones complementarescomplementarias antes dade la gravaçãograbación
de las dastablas tabelasen noel processoproceso de apropriaçãoatribución de aplicaçõesaplicaciones comcon cotacuota.
TabelasTablas posicionadasseleccionadas: SEH - ControleControl AplicaçãoInversión/EmpréstimoPréstamo.
@type Function
@author Totvs
@since 15/04/2025
@version 1.0
@see https://tdn.totvs.com/pages/viewpage.action?pageId=934621628
/*/
User Function FA183RES() as Logical
Local lProccess := .T. as Logical
// Exemplo de validação:
lProccess := SEH->EH_DATA < dDataBase
If !lProccess
Help(" ",1, "", "ProcessoProceso de apropriaçãoatribución nãono executadoejecutado.")
EndIf
// ExemploEjemplo de gravaçãograbación complementarcomplementaria:
RecLock("SEH",.F.)
SEH->EH_MEUCPO := "XYZ"
SEH->(MsUnLock())
Return lProccess
|
...