Histórico da Página
Informações | ||
---|---|---|
| ||
|
Manipula campos da tela de geração de OS a partir da distribuição de SS.
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 Relacionadas | 12.1.17. | ||||||||
País(es): | Todos. | ||||||||
Banco(s) de Dados: | Todos. | ||||||||
Sistema(s) Operacional(is): | Todos. |
Ponto de Entrada
Descrição: | Ponto de Entrada que permite alteração das propriedades dos campos apresentados na tela de geração de O.S. a partir da distribuição de S.S. | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Localização: | SIGAMNT: Atualizações/Controle de Oificina/Solicitação de Serviço/Distribuição de S.S. | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Eventos: | Distribuição de S.S. (MNTA295). | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Programa Fonte: | MNTA295.prx | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Função: | MNTA295GOS() | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Parâmetros: |
* O campo Prioridade (TJ_PRIORID) será um objeto TGet caso não possua itens (X3_CBOX), caso contrário um objeto TComboBox será utilizado. | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Retorno |
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Observações |
|
Exemplo:
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#include 'Protheus.ch' //------------------------------------------------------------------- /*/{Protheus.doc} MNTA295E Manipula propriedades dodos campos apresentados em tela. @author Eduardo Mussi @since 07/08/2018 @version P12 /*/ //------------------------------------------------------------------- User Function MNTA295E() Local aObj := ParamIXB //Local cBemSS Deixa o campo sempre aberto e para cada alteração do combobox apresenta a mensagem inserida no bloco de código aObj[8]:bWhen := {|| .T. } aObj[8]:bValid := {|| MsgInfo("Validação do campo Situação","Atenção") }:= aObj[1]:cText // Retorna conteúdo do campo "Bem/Localiz." Local cCentroC := Posicione( 'ST9', 1, xFilial( 'ST9' ) + cBemSS, 'T9_CCUSTO' ) Local cCentroT := Posicione( 'ST9', 1, xFilial( 'ST9' ) + cBemSS, 'T9_CENTRAB' ) // Adicionar o valor no campo. aObj[23]:VarPut( Posicione("ST9", 1, xFilial("ST9"), "T9_CCUSTO")cCentroC ) aObj[4]:VarPut( cCentroT ) aObj[3]:bWhen := {|| .F. } aObj[4]:bWhen := // ComboBox de situação se inicia do index 2, ou seja, como O.S. Pendente{|| .F. } aObj[19]:VarPut( Posicione( 'CTT', 1, xFilial( 'CTT' ) + cCentroC, 'CTT_DESC01' ) ) aObj[820]:Select( 2VarPut( Posicione( 'SHB', 1, xFilial( 'SHB' ) + cCentroT, 'HB_NOME' ) ) Return aObj |