Histórico da Página
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: |
| ||||
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.
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#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 |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas