01. DADOS GERAIS
Produto: | TOTVS Backoffice |
---|---|
Linha de Produto: | Linha Protheus |
Segmento: | Backoffice |
Módulo: | Gestão de Contratos |
Função: | CNTA121 - Medições |
Ticket: | 15132522 |
Issue: | DMANMAT02-39665 |
02. SITUAÇÃO/REQUISITO
Na antiga rotina de medições(CNTA120) havia um tela de seleção das planilhas que era customizável através do ponto de entrada CN120CPO, porém com sua descontinuação não havia uma maneira de realizar a mesma operação na nova rotina(CNTA121).
03. SOLUÇÃO
Na nova medição(CNTA121) não há mais uma tela de seleção das planilhas, todas elas são carregadas para aba Planilhas que contêm a tabela CXN(Planilhas da Medição) para seleção, porém durante a carga dos dados ainda é executada a consulta SQL à tabela CNA(Planilhas do Contrato) que era executada anteriormente no CNTA120, dessa forma o ponto de entrada CN120CPO continua tendo um propósito, contudo para que os dados da consulta(query) sejam carregadas para CXN é necessário a implementação do novo ponto de entrada C121LCXN. Com a utilização desse novo ponto de entrada é possível utilizar os dados retornados na consulta para exibição no modelo da CXN.
#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] if oModelCXN:HasField("CXN_CPOUSR") .And. (cAliasQry)->(FieldPos("CNA_CPOUSR") > 0) oModelCXN:LoadValue("CXN_CPOUSR", (cAliasQry)->CNA_CPOUSR) //Utiliza o campo da query para realizar carga na CXN endif Return Nil User Function CN120CPO() Local aResult := {} if CNA->(FieldPos("CNA_CPOUSR") > 0) aAdd(aResult,"CNA_CPOUSR") //Campo de usuário adicionado a query endif Return aResult
04. DEMAIS INFORMAÇÕES
- Não há