Histórico da Página
Incluir novas opções de relatório
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 inserir opções no relatórios de O.S. a partir das rotinas supracitadas. | ||||||||||||||||||||||||
Localização: | SIGAMNT: Atualizações/Controle de Oificina/Solicitação/Atendimento SIGAMNT: Atualizações/Controle de Oificina/Retorno de O.S./Retorno SIGAMNT: Atualizações/Controle de Oificina/Ordem de Serviço/Corretiva SIGAMNT: Atualizações/Controle de Oificina/Retorno de O.S./Retorno Mod.2 SIGAMNT: Atualizações/Controle de Oificina/Árvore/Árvore SIGAMNT: Atualizações/Controle de Oificina/Controle de Portaria/Portaria | ||||||||||||||||||||||||
Eventos: | Atendimento (MNTA291) | ||||||||||||||||||||||||
Programa Fonte: | MNTUTIL_OS.PRW | ||||||||||||||||||||||||
Função: | IMP675OS() | ||||||||||||||||||||||||
Retorno: |
|
Exemplo:
Bloco de código | ||||
---|---|---|---|---|
| ||||
#Include 'Protheus.ch'
//-------------------------------------------------------------------
/*/{Protheus.doc} IMP675OS
Inclui opções de relatório
@author Eduardo Mussi
@since 30/06/2018
@version P12
/*/
//-------------------------------------------------------------------
User Function IMP675OS()
Local aOpcRot := {}
aAdd(aOpcRot, { "Opção usuário", "U_fOpcUser", { .F., "Ocorreu um Erro" } } )
Return aOpcRot
//-------------------------------------------------------------------
/*/{Protheus.doc} IMP675OS
Impressão de mensagem
@author Eduardo Mussi
@since 01/07/2018
@version P12
@param aParam[1], Lógico, Indica se apresenta mensagem
@param aParam[2], Caractér, Mensagem de erro
/*/
//-------------------------------------------------------------------
Function U_fOpcUser(aParam)
Local lTest := aParam[1]
Local cMsgErro := aParam[2]
If lTest
MsgInfo(cMsgErro, 'Atenção')
EndIf
Return |