15132522 DMANMAT02-39665 DT Ponto de entrada CN120CPO sem equivalência

01. DADOS GERAIS

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á

05. ASSUNTOS RELACIONADOS

• GCT0084_Nova_Medição_CNTA121
• C121LCXN - Carregar dados adicionais nas planilhas da medição(CXN)