Á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 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

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

MNTI5SXB

Monta tela consulta padrão (F3).

MNTPORSS

Possibilita validar campos inseridos pelo usuário, montar consulta padrão e manipular o cabeçalho da tela de consulta padrão.
MNTSAVSSSalva informações dos campos 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 inseridos na tela de inclusão de SS.

Localização:

Portal de SS.

Eventos:

Inclusão de SS(MNTI0052)

Programa Fonte:

MNTSAVSS.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
titleExemplo
#include 'protheus.ch'

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

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

    dbSelectArea('TQB')
    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() )

    RestArea(aArea)

Return