Histórico da Página
Ponto de entrada que permite realizar comparativo de modificação de insumos.
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Manufatura | ||||
Módulo: | SIGAMNT - Manutenção de Ativos e Gestão de Frotas | ||||
Rotina: |
| ||||
Chamados Relacionados | MNG-3504 | ||||
País(es): | Todos | ||||
Banco(s) de Dados: | Todos | ||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
Descrição: | Ponto de entrada que permite realizar comparativo de modificação de insumos. | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Localização: | SIGAMNT: Atualizações/Controle de Oficina/Plano de Manutenção/Liberação de O.S. | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Eventos: | Liberação de O.S. (MNTA490) | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Programa Fonte: | MNTA490.prx | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Função: | MNTA490INS() | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Parâmetros: |
Bloco de código | Bloco de código definindo ação do botão
Visibilidade do botão | ParamIXB[2] | Array contendo os insumos antes o processo de alteração. Array
|
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#Include 'Protheus.ch' User Function MNTA4903() Local aGetIns := ParamIXB[1] Local aGetInSal := ParamIXB[2] Local nX := 0 Local nInsAnt := 0 Local nInsAtu := 0 //Conta quantos insumos tinha antes da alteração For nX := 1 To Len( aGetInSal ) If !Empty( aGetIns[nx, 1] ) nInsAnt++ EndIf Next nX //Conta quantos insumos tinha após a alteração For nX := 1 To Len( aGetIns ) If !Empty( aGetInSal[nx, 1] ) nInsAtu++ EndIf Next nX MsgInfo( 'Quantidade de insumos antes da alteração ' + cValtoChar( nInsAnt ) + CHR( 10 ) +; 'Quantidade de insumos depois da alteração ' + cValtoChar( nInsAtu ) ) Return |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas