Histórico da Página
Pós gravação de uma solicitacão de serviço via Portal SS
Informações | ||
---|---|---|
| ||
|
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 | DNG-357 | ||||||||||||
País(es): | Todos | ||||||||||||
Banco(s) de Dados: | Todos | ||||||||||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
Descrição: | Ponto de entrada acionado após a gravação de Solicitação de Serviço através do Portal S.S. | ||||||||
Localização: | Portal de SS | ||||||||
Eventos: | Inclusão de SS (MNTI0052) | ||||||||
Programa Fonte: | MNTI5006.PRW | ||||||||
Função: | I05CDGRAV() | ||||||||
Parâmetros: |
|
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#include 'protheus.ch'
//-------------------------------------------------------------------
/*/{Protheus.doc} MNTI5006
Salva informações dos campos que o usuário adicionou em tela.
/*/
//-------------------------------------------------------------------
User Function MNTI5006()
Local aArea := GetArea()
Local cCodeSS := PARAMIXB[1]
dbSelectArea('TQB')
dbSetOrder(1)
If dbseek( xFilial( 'TQB' ) + cCodeSS )
RecLock('TQB', .F.)
TQB->TQB_TESTE := HttpSession->TQB_TESTE
TQB->( MsUnlock() )
Endif
RestArea(aArea)
Return |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas