Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Permite salvar informações dos campos inseridos pelo usuário na tela de inclusão de

Pós gravação de uma solicitacão de serviço via Portal SS

Informações
titleAtenção!
  • Este ponto de entrada está disponível a partir da versão 12.1.17 - Set/2018.Este ponto de entrada é dependente dos demais pontos de entrada citados em "Pontos de Entrada Envolvidos".

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Manufatura

Módulo:

SIGAMNT - Manutenção de Ativos e Gestão de Frotas

Rotina:

Rotina

Nome Técnico

MNTI0052

Portal SS - Tela de inclusão de SS

Ponto(s) de Entrada Envolvido(s)

Descrição

MNTCAMUS

MNTI5201

Permite incluir inserir campos na tela inclusão de SS, quando aberto pelo portal SS

MNTI5SXB

Monta tela consulta padrão (F3).

MNTPORSS

Possibilita validar campos inclusos pelo usuário, montar consulta padrão e manipular o cabeçalho da tela de consulta padrão.

MNTI5006

MNTSAVSSSalva informações dos campos adicionados inseridos em tela pelo usuário.

Issues Relacionadas

DNG-357

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Possibilita ao usuário salvar as informações dos campos inclusos na tela de inclusão de SSPonto 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:MNTSAVSS.prw

MNTI5006.PRW

Função:

I05CDGRAV()

Parâmetros:
NomeTipoDescriçãoObrigatório
PARAMIXB[1]CaracterCódigo da Solicitação de Serviço inclusaSim

 

Bloco de código
languagesql
titleMNTI5006.PRW
linenumberstrueExemplo
#include 'protheus.ch'

//-------------------------------------------------------------------
/*/{Protheus.doc} MNTSAVSSMNTI5006
Salva informações dos campos que o usuário adicionou em tela.
/*/
//-------------------------------------------------------------------
User Function MNTSAVSSMNTI5006()

    Local aArea   := GetArea()
    Local cCodeSS := PARAMIXB[1]

    dbSelectArea('TQB')
    dbSetOrder(1)
    If dbseek( xFilial( 'TQB' ) + cCodeSS )

 	   // Salva informações do campo adicionado no portal da SS pelo usuário
    RecLock('TQB', .F.)
    	TQB->TQB_TESTE  := HttpSession->TQB_TESTE
    TQB->TQB_ORIGEM := HttpSession->TQB_ORIGEM
    	TQB->( MsUnlock() )
	Endif
    RestArea(aArea)

Return