Linha Microsiga Protheus

Árvore de páginas

ADICIONA NOVO CAMPO PARA O CONTROLE DE PORTARIA

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Manufatura

Módulo:

SIGAMNT - Manutenção de Ativos e Gestão de Frotas

Rotina:

Rotina

Nome Técnico

MNTA985

Controle de Portaria

Issues Relacionados

MNG-3208

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Ponto de Entrada que possibilita adicionar novo campo ao Controle de Portaria.

Localização:

SIGAMNT: Atualizações/Controle de Oficina/Controle de Portaria/Portaria

Eventos:

Controle de Portaria (MNTA985)

Programa Fonte:

MNTA985.PRX

Função:

MNTA985B()

Retorno:

(Nulo)

Observação: O Nome do campo criado no Dicionário deverá ser o mesmo informado no (cTRBES)->NOMEDOCAMPO.

Exemplo
#include "Protheus.ch"

User Function MNTA985B()

    @ 004,010 Say "Entradas e Saídas" Pixel Of oPnlLgnd22 FONT oFont12B Color CLR_WHITE //"Entradas e Saídas" 
        DbSelectArea(cTRBES)
        DbSetOrder(02)
        DbGoTop()

     @ 0,0 Listbox oListES Fields If((cTRBES)->TIPO == "1","Entrada","Saída"),;
                Transform((cTRBES)->POS1,"@E 999,999,999"),;
                (cTRBES)->DTMOV ,;
                (cTRBES)->HRMOV ,;
                (cTRBES)->DESTINO ,;
                (cTRBES)->OBS ,;
                (cTRBES)->MOTORI ,;
                (cTRBES)->NOME ,;
                (cTRBES)->TTI_NCAMPO ;//Novo Campo Criado.
    FieldSizes 35,40,40,30,55,110,55,110;
    Size 387,130 Pixel Of oPanel22;
    HEADERS "Tipo",;
                "Contador",;
                "Data",;
                "Hora",;
                "Destino",;
                "Observação",;
                "Motorista",;
                "Nome",;
                "Novo Campo"

Return