01. DADOS GERAIS
Produto: | Solucoes_totvs |
---|
Solucao | TOTVS Prestadores de Serviços Terceirização |
---|
|
Solucoes_totvs_parceirosexptotvs |
---|
|
|
---|
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 |
---|
02. SITUAÇÃO/REQUISITO
Identificado Identificada a necessidade de realizar alterações em campos customizados na utilização da tabela de preço.
03. SOLUÇÃO
Foi aberto o ponto de entrada A998CPOUSR que será executado após a atualização do campos campo TFF_PRCVEN, abrindo a possibilidade de realizar a atualização de campos customizados.
O ponto de entrada vai receber receberá 2 (dois) parâmetros, que é : o modelo de dados da tabela TFF, ; e o objeto da tabela de precificação, possibilitando assim possibilitando alterar os valores da tabela TFF , e pegar considerando os valores da tabela de precificação.
...
Bloco de código |
---|
language | cpp |
---|
title | Ponto de Entrada |
---|
linenumbers | true |
---|
|
#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 duas linhas personalizadas que se 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.
Aviso |
---|
|
Os campos TFF_VLPRPA e TFF_VLRCTS são campos customizados e devem existir na base de dados. |

Aviso |
---|
|
Esse ponto de entrada não é executado quando o parâmetro MV_ORCPRC está ativado. |
04. DEMAIS INFORMAÇÕES
Não há
05. ASSUNTOS RELACIONADOS
...