Histórico da Página
01. DADOS GERAIS
Produto: |
| ||||
---|---|---|---|---|---|
Linha de Produto: |
| ||||
Segmento: |
| ||||
Módulo: | Terceirização (SIGATEC) | ||||
Função: | SIGACFG | ||||
País: | Brasil | ||||
Ticket: | Não há | ||||
Requisito/Story/Issue (informe o requisito relacionado) : | DSERSGS-13145 |
02. SITUAÇÃO/REQUISITO
Inclusão de Campos facilitadores CNA e TFL. Em alguns casos quando há necessidade de realizar alguma revisão no contrato estes campos facilitam a localização do registro conforme necessidade do cliente.
03. SOLUÇÃO
Siga a documentação abaixo sobre como criar os campos facilitadores.
...
Foi criado um campo VIRTUAL para receber o Local de Atendimento (CNA_LOCAL) que exibirá o conteúdo do campo TFL_LOCAL
| Tipo : Caractere | Propriedade : Visualizar
5-) Incluir uma User Function no campo Inic. Padrao conforme exemplo abaixo:
Conteúdo:
U_TECTFLCN(CNA->CNA_FILIAL,CNA->CNA_CONTRA,CNA->CNA_REVISA,CNA->CNA_NUMERO,'TFL_LOCAL')
Para exibição do dado foi utilizada a função POSICIONE()
uma User function conforme modelo abaixo:
Bloco de código | ||
---|---|---|
| ||
#INCLUDE "PROTHEUS.CH"
User Function TECTFLCN(cFil,cContrato,cRevis,cPlanilha,cCampo)
Local cQry := ""
Local cRetorno := ""
Local cAliasTFL := GetNextAlias()
cQry := " SELECT "+cCampo+" AS CAMPO "
cQry += " FROM "+RetSqlName("TFL")+" TFL "
cQry += " WHERE TFL_CONTRT = '"+cContrato+"'
cQry += " AND TFL_CONREV = '"+cRevis+"'
cQry += " AND TFL_PLAN = '"+cPlanilha+"'
cQry += " AND TFL_FILIAL = '"+cFil+"'
cQry += " AND TFL.D_E_L_E_T_ = '' "
cQry := ChangeQuery(cQry)
dbUseArea(.T.,"TOPCONN",TcGenQry(,,cQry),cAliasTFL,.T.,.T.)
cRetorno := (cAliasTFL)->CAMPO
(cAliasTFL)->(dbCloseArea())
Return cRetorno |
5 -) Após o preenchimento do campos clique Salvar.
...
8 - Verifique que foi criado o campo e replicado a informação da TFL (Local de Atendimento)
Aviso | ||
---|---|---|
| ||
Para que o processo funcione corretamente, é necessário que a user function esteja compilada no ambiente. A User Function só vai ter efeito para campos que são criados no banco de dados, campos que são virtuais como a descrição do local devem ter outro tratamento, por exemplo utilizando um Posicione. |
04. DEMAIS INFORMAÇÕES
Gestão dos Contratos - TECA870 - Gestão de Serviços - P12