| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | Terceirização(SIGATEC) |
| Função: | TECA998.PRW |
| País: | Brasil |
| Ticket: | Não há |
| Requisito/Story/Issue (informe o requisito relacionado) : | DSERSGS-13946 |
Identificado a necessidade de realizar alterações em campos customizados na utilização da tabela de preço.
Foi aberto o ponto de entrada A998CPOUSR que será executado após a atualização do campos TFF_PRCVEN, abrindo a possibilidade de realizar a atualização de campos customizados.
O ponto de entrada vai receber 2(dois) parâmetros, que é o modelo de dados da tabela TFF, e o objeto da tabela de precificação, assim possibilitando alterar valores da tabela TFF, e pegar os valores da tabela de precificação.
#INCLUDE 'protheus.ch'
#INCLUDE 'parmtype.ch'
#INCLUDE "FWMVCDEF.CH"
User Function A998CPOUSR()
Local oMdlRH := PARAMIXB[1] //Modelo de dados da TFF
Local oFwSheet := PARAMIXB[2] //Objeto da planilha de preço
Local cCpoUsr := ""
Local cCpoUsr1 := ""
MsgAlert("passou no meu ponto de entrada", "A998CPOUSR")
If oFWSheet:CellExists("TOT_CUSTOM") //verifico se a minha célula existe na planilha de preço
cCpoUsr := oFwSheet:GetCellValue("TOT_CUSTOM") //Pego o valor da minha célula customizada
oMdlRH:SetValue("TFF_VLPRPA",ROUND(cCpoUsr, TamSX3("TFF_VLPRPA")[2])) //Grava o valor no meu campo customizado
EndIf
If oFWSheet:CellExists("TOT_CUSTOM1") //verifico se a minha célula existe na planilha de preço
cCpoUsr1 := oFwSheet:GetCellValue("TOT_CUSTOM1") //Pego o valor da minha célula customizada
oMdlRH:SetValue("TFF_VLRCTS",ROUND(cCpoUsr1, TamSX3("TFF_VLRCTS")[2])) //Grava o valor no meu campo customizado
EndIf
Return |
No exemplo abaixo, criamos uma tabela de precificação que tem 2 colunas personalizadas que chamam TOT_CUSTOM e TOT_CUSTOM1
No exemplo, vamos aplicar os valores que estão no TOT_CUSTOM e TOT_CUSTOM1 nos campos TFF_VLPRPA e TFF_VLRCTS.
Os campos TFF_VLPRPA e TFF_VLRCTS são campos customizados e devem existir na base de dados. |
Esse ponto de entrada não é executado quando o parâmetro MV_ORCPRC está ativado. |
Não há