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 dos campos apresentados em tela. @author Eduardo Mussi @since 07/08/2018 @version P12 /*/ //------------------------------------------------------------------- User Function MNTA295E() Local aObj := ParamIXB Local cBemSS := 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[3]:VarPut( cCentroC ) aObj[4]:VarPut( cCentroT ) aObj[3]:bWhen := {|| .F. } aObj[4]:bWhen := {|| .F. } aObj[19]:VarPut( Posicione( 'CTT', 1, xFilial( 'CTT' ) + cCentroTcCentroC, 'CTT_DESC01' ) ) aObj[20]:VarPut( Posicione( 'SHB', 1, xFilial( 'SHB' ) + cCentroCcCentroT, 'HB_NOME' ) ) Return aObj |