01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:

Função:

MNTC1251()

País:Brasil


02. DESCRIÇÃO

Descrição:

Ponto de entrada executado na rotina de Consulta de OS (MNTC040) que permite adicionar filtro personalizado no browser

Localização:

SIGAMNT: Consultas/Controle de Pneus/Gerencial/Gerencial de Pneus
Programa Fonte:MNTC125.prx

Função:

MNTC1251

Parâmetros:

NomeTipoDescrição
ParamIXB[1]ObjetoPainel dos campos da consulta
ParamIXB[2]ObjetoPainel do Controle de recapes
ParamIXB[3]CaracterCódigo do Pneu a ser consultado

Retorno:

NomeTipoDescriçãoObrigatório
aMaxLargurArray

aMaxLargur[1] - Define os objetos do Painel de campos.
                   [1][1] - Posição limite da coluna onde os objetos específicos terminaram de ser montados.
                   [1][2] - Objetos específicos montados.

aMaxLargur[2] - Define os objetos do Painel de Controle de Recapes.
                   [2][1] - Posição limite da coluna onde os objetos específicos terminaram de ser montados.
                   [2][2]- Objetos específicos montados.

                   

X

03. DEMAIS INFORMAÇÕES

#INCLUDE    "Protheus.ch"
#INCLUDE    "RWMake.ch"
 
User Function MNTC1251()
     
    // Variável do retorno
    Local aMaxLargur := {}
     
    // Variáveis auxiliares
    Local oObjCampos := ParamIXB[1]
    Local oObjRecape := ParamIXB[2]
    Local cReadVarPn := ParamIXB[3]
     
    Local oTmpFnt  := TFont():New(, , 14, , .T.)
     
    Local aTmpGets := {}
    Local nLen := 0
     
    //----------
    // Executa
    //----------
    aAdd(aTmpGets, Nil)
    nLen := Len(aTmpGets)
    @ 001,143 SAY aTmpGets[nLen] VAR OemToAnsi("Meu Texto") FONT oTmpFnt SIZE 020,008 COLOR CLR_HBLUE OF oObjRecape PIXEL
     
    // Retorno: {Coluna Máxima, Array de Objetos criados (Gets, Says)}
    aAdd(aMaxLargur, {0, {}}) // Painél dos Campos
    aAdd(aMaxLargur, {163, aTmpGets})// Painél do Controle de Recapes
     
Return aMaxLargur


04. ASSUNTOS RELACIONADOS