F716CTBL - Configuração para consulta de outras tabelas na rotina Aplicações e empréstimos - FINA716

01. DADOS GERAIS

02. DESCRIÇÃO

Ponto de entrada F716CTBL permite definir configurações para, a partir de um campo com X3_F3 preenchido, abrir uma consulta e retornar um ou mais campos da tabela definida no X3_F3 desse campo.

Utilizado na rotina de Aplicações e empréstimos - FINA716.

03. PARAMETRO

Não se aplica

04. EXEMPLO DE UTILIZAÇÃO

Para que o campo seja apresentado como campo de consulta o mesmo deve ter o X3_F3 preenchido com a tabela referente a consulta.

Exemplo: 

Campos customizados criados na tabela SEH - Controle Aplicação/Empréstimo

O ponto de entrada deve retornar um Array contendo as configurações da tabela para consulta conforme as posições abaixo:

1. Tabela que será utilizada na consulta - Obrigatório
2. Título da consulta - Obrigatório
3. Campo de retorno - Obrigatório
4. Campo da tabela que será utilizado como descrição para tela - Obrigatório
5. Campos que serão utilizados como coluna para consulta - Obrigatório
6. Campos que compõem o índice a ser utilizado - Obrigatório
7. Array contendo os campos de/para para utilização quando possuir mais de um campo de retorno - Opcional - Utilizar apenas para consultas que retornam/preenchem mais de um campo.

Exemplo de utilização para retorno de apenas um campo:

#Include "Protheus.ch"
 
User Function F716CTBL()
    Local aFIT := {} as Array
    Local aTabelas := {} as Array
     
    AAdd(aFIT, "FIT") // [1] Tabela da consulta
    AAdd(aFIT, "Indices Financeiros Exemplo")  // [2] Título da consulta
    AAdd(aFIT, "FIT_CODIND") // [3] Campo de retorno
    AAdd(aFIT, "FIT_DESC") // [4] Campo de descrição
    AAdd(aFIT, "FIT_CODIND,FIT_DESC,FIT_PERIOD,FIT_BACEN") // [5] Colunas da consulta
    AAdd(aFIT, "FIT_FILIAL,FIT_CODIND") // [6] Campos referente ao índice da tabela utilizado
    
    AAdd(aTabelas, aFIT)
Return aTabelas

Consulta que será apresentada no campo EH_INDICE:

Campo preenchido:

Exemplo de utilização para campos que possuem mais de um campo de retorno:

#Include "Protheus.ch"
 
User Function F716CTBL()
    Local aFIT := {} as Array
    Local aTriggersFIT := {} as Array
    Local aTabelas := {} as Array
     
    AAdd(aFIT, "FIT") // [1] Tabela da consulta
    AAdd(aFIT, "Indices Financeiros Exemplo")  // [2] Título da consulta
    AAdd(aFIT, "FIT_CODIND") // [3] Campo de retorno
    AAdd(aFIT, "FIT_DESC") // [4] Campo de descrição
    AAdd(aFIT, "FIT_CODIND,FIT_DESC,FIT_PERIOD,FIT_BACEN,FIT_BLOQ") // [5] Colunas da consulta
    AAdd(aFIT, "FIT_FILIAL,FIT_CODIND") // [6] Campos referente ao índice da tabela utilizado

    // OPCIONAL [7] campos de partida e destino para preenchimento --> deve ser informado inclusive o campo "chamador" (que possui o X3_F3 preenchido)
    AAdd(aTriggersFIT, {"FIT_CODIND", "EH_INDICE"})
    AAdd(aTriggersFIT, {"FIT_BLOQ","EH_BLOQ"})
    AAdd(aFIT, aTriggersFIT)
    
    AAdd(aTabelas, aFIT)
Return aTabelas

Consulta que será apresentada no campo EH_INDICE:

Campos preenchidos EH_INDICE e EH_BLOQ conforme retorno da consulta:

05. PONTO DE ATENÇÃO

• É necessário que os campos utilizados no valor (Posição 3) e descrição (Posição 4) e gatilhos (Posição 7 - opcional) estejam presentes nas colunas tabela (Posição 5).
• Para o uso de mais de um campo de retorno é necessário informar os campos de/para do campo utilizado como valor conforme exemplos acima.