| Produto: | TOTVS Backoffice |
|---|---|
| Linha de Produto: | Linha Protheus |
| Segmento: | Backoffice |
| Módulo: | Gestão de Contratos |
| Função: | CNTA121 - Medições |
| Ponto de Entrada: | C121LCXN |
| Descrição: | Possibilita carregar dados adicionais à CXN(Planilhas da Medição) durante sua carga | |||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| Eventos: | Executado uma vez para cada planilha do contrato(CNA) passível de medição | |||||||||
| Programa Fonte: | CNTA120.PRW | |||||||||
| Função: | CN120Compet | |||||||||
| Parâmetros: |
| |||||||||
| Retorno: |
|
#include "PROTHEUS.CH"
#INCLUDE "FWMVCDEF.CH"
#INCLUDE "RWMAKE.CH"
#INCLUDE "TBICONN.CH"
/*/{Protheus.doc} C121LCXN
Possibilita carregar dados adicionais à CXN(Planilhas da Medição) durante sua carga
@since 04/10/2022
@param oModelCXN , objeto , instância de FwFormGrid do submodelo CXN
@param cAliasQry , caractere , alias com o resultado da query
@return Nil
/*/User Function C121LCXN()
Local oModelCXN := PARAMIXB[1]
Local cAliasQry := PARAMIXB[2]
//Nesse exemplo se pressupõe que usuário criou campos customizados no dicionário(SX3), porém seria possível adicionar campos virtuais utilizando os p.e C121MCPO e C121VCPO
if oModelCXN:HasField("CXN_CPOUSR") .And. (cAliasQry)->(FieldPos("CNA_CPOUSR") > 0)
oModelCXN:LoadValue("CXN_CPOUSR", (cAliasQry)->CNA_CPOUSR)
endif
Return Nil