Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Serviços
Módulo:Gestão de Serviços
Função:TECA190D - Mesa Operacional
Ticket:Não há.
Requisito/Story/Issue (informe o requisito relacionado) :DSERSGS-7934


02. SITUAÇÃO/REQUISITO

Necessidade de inclusão de nova(s) coluna(s) no Grid de Manutenção de Agendas

03. SOLUÇÃO

Implementação do Ponto de Entrada  At190DLd que é executado após o carregamento das colunas padrões na linha do Grid de Manutenção de Agendas

Este ponto de entrada recebe os seguinte parâmetros:

ParâmetroDescrição
oModelModelo da rotina TECA190D
oGridLocGrid de Agendas Projetadas por Local.
Importante: Este grid esta posicionado na linha corrente que acabou de ser inserida.
cCodTecCódigo do Atendente ao qual se refere a agenda
aColunas

Array contendo as colunas do Grid (capturado pelo aHeader) na segunte estrutura

aColunas[n, 01] - Nome do campo do Grid

aColunas[n, 02] - Valor do Campo do Grid


Este ponto de Entrada não tem retorno


Exemplo de Utilização


#Include "Protheus.ch"
User Function At190DLd()
Local oModel  := NIL
Local oGridABB := NIL
Local cCodTec := ""
Local aLinha := {}
Local dDataIni := Ctod("")
Local dDataFim  := Ctod("")
Local nC := 0


If Len(PARAMIXB) >= 4 
    oModel  := PARAMIXB[1]
    oGridABB := PARAMIXB[2]
    cCodTec := PARAMIXB[3]
    aLinha := aClone(PARAMIXB[4])

    //Captura a Data Inicial e Final
    dDataIni := oModel:GetModel('DTSMASTER'):GetValue("DTS_DTINI")
    dDataFim := oModel:GetModel('DTSMASTER'):GetValue("DTS_DTFIM")

    //Lê todos os campos do Grid Corrente, mesmos os vazios
    ConOut("Atendente[" + cCodteC + "] - Período [" + DtoC(dDataIni) + "~" + DtoC(dDataFim) + " Linha:" + Str(oGridABB:GetLine()))
    For nC := 1 to Len(aLinha)
        ConOut("Campo: " + aLinha[nC, 01] + " - Valor: "+ cValToChar(aLinha[nC, 02] ) )
        
    Next nC
    oGridABB:LoadValue("ABB_TESTE", "Teste"+StrZero(oGridABB:GetLine(),5)) //Campo personalizado definido no p.e. AT19DCPO
EndIf

Return 


04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS

  • Não há.