Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user MARCELO DOS SANTOS PICKLER

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user MARCELO DOS SANTOS PICKLER

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Produto:

Solucoes_totvs_parceirosexptotvs
SolucaoParcsExpsTOTVSTOTVS Manutenção de Ativos

Linha de Produto:

Linhas_totvs
LinhaLinha Protheus

Segmento:

Segmentos_totvs
SegmentoManufatura

Módulo:

Modulos_totvs_manufatura
ModulosTOTVSManufaturaTOTVS Manufatura (Linha Protheus) - Manutenção de ativos (SIGAMNT)

Função:MNTA400MNTA415
País:Brasil


02. DESCRIÇÃO

Descrição:

Ponto de entrada executado na rotina de Retorno Simplificado (MNTA415) que permite trabalhar com campos específicos após a finalização da Ordem de Serviço

Localização:

SIGAMNT: Atualizações/Controle de Oficina/Retorno de O.S./Simplificado

Programa Fonte:

MNTA415.prx

Função:

MNT41501()

Retorno:

Nome

Tipo

Descrição

Obrigatório

 lRet

Lógico

Se verdadeiro ( .T. ) realiza a alteração em campos específicos

X

03. DEMAIS INFORMAÇÕES

Bloco de código
languagevb
themeFadeToGrey
titleExemplo MNT41501
linenumberstrue
#INCLUDE 'PROTHEUS.CH'

User Function MNT41501()

	Local lRet := .F.

	dbSelectArea('STL')
	dbSetOrder(1)
	If MsgYesNo('Deseja alterar a quantidade do insumo?', 'Atenção')
		lRet := .T.
		Reclock('STL', .F.)
		STL->TL_QUANTID := 3
		STL->( MsUnlock() )
		MsgInfo('A quantidade foi alterada', 'Atenção')
	Endif

Return lRet

...