Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 3

changes.mady.by.user Alexandre dos Santos

Gravado em

comparado com

Nova versão 4

changes.mady.by.user Alexandre dos Santos

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:

MNTA410 - O.S. Preventiva

MNTA420 - O.S. Corretiva

02. DESCRIÇÃO

chamado após a gravação dos insumos de uma Ordem de Serviço para trabalhar com campos específicos do usuário

Descrição:

Ponto
de
entrada
acionado após gravação de cada insumo da ordem de serviço. Permite a alterar campos específicos na tabela de insumos.
Parâmetros:
NomeTipoDescrição
PARAMIXB[1]integer

Ultima linha de insumos que foi gravada.

PARAMIXB[2]array

Detalhes do insumo gravado.

PARAMIXB[3]array

Cabeçalho com os campos de insumos.

...

Bloco de código
languagesql
titleExemplo: P.E. MNTA420R
linenumberstrue
#include 'protheus.ch'

User Function MNTA4202MNTA420R()
    
    Local aF3 nLinAt    := ParamIXB[1]
    Local cTipInsaInsum := ParamIXB[2]
    Local nPosF3aCabec  := 0
    

    If ( nPosF3ParamIXB[3]

	Local nPosTp := aScan( aF3, { |x| x[1] == GDFieldPos( 'TL_CODIGOTIPOREG', }aCabec ) ) > 0

        If cTipIns == 'P'

            aF3[nPosF3,2] :aInsum[nLinAt,nPosTp] == 'SB1KITM'

		MsgInfo( 'Ponto de entrada     EndIfMNTA420R' )

    EndIf

Return aF3


04. ASSUNTOS RELACIONADOS

  • Não se aplica.

...