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.
...
5-) Incluir uma User Function no campo Inic. Padrao conforme exemplo abaixo:
Conteúdo:
U_EXICNATFLTECTFLCN(CNA->CNA_FILIAL,CNA->CNA_CONTRA,CNA->CNA_REVISA,CNA->CNA_NUMERO,'TFL_LOCAL')
Para exibição do dado foi utilizada 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.
...
| 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
05. ASSUNTOS RELACIONADOS
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas