Histórico da Página
PERMITE ALTERAR O PRODUTO DO TIPO TERCEIRO NA SOLICITAÇÃO DE COMPRAS
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||
Segmento: | Manufatura | ||||||||
Módulo: | SIGAMNT - Manutenção de Ativos e Gestão de Frotas | ||||||||
Rotina: |
| ||||||||
Issues Relacionadas | 11.80: MNG-4953 | ||||||||
País(es): | Todos | ||||||||
Banco(s) de Dados: | Todos | ||||||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
Descrição: | Ponto de Entrada que permite alterar o insumo do tipo terceiro previsto na ordem de serviço corretiva antes da geração da solicitação de compras relacionada. Em suma, permite-se que o "produto" seja alterado antes da geração da SC. | ||||||||
Localização: | SIGAMNT: Atualizações/Controle de Oficina/Ordem de Serviço/Corretiva | ||||||||
Eventos: | Cadastro de OS Corretiva (MNTA420) Funções Genéricas de O.S. (MNTUTIL_OS) | ||||||||
Programa Fonte: | MNTUTIL_OS.PRW | ||||||||
Função: | PRODMNT1() | ||||||||
Retorno: |
|
| Bloco de código | ||
|---|---|---|
| ||
Exemplo:
#Include 'PROTHEUS.ch'
User Function PRODMNT1()
Local aProdutos := PARAMIXB[1]
Local nX
If IsInCallStack("NGFINAL") .Or. IsInCallStack("a340TER") .Or. IsInCallStack("NG420ALTE")
If !Empty(aProdutos) .And. aProdutos[1] == "TERCEIROS"
For nX := 1 To Len(aProdutos)
aProdutos[nX] := "NILPROD"
Next nX
EndIf
EndIf
Return aProdutos |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas