Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Manufatura | ||||
Módulo: | Manutenção de Ativos | ||||
Rotina: |
| ||||
País(es): | Informe o(s) Pais(es). | ||||
Banco(s) de Dados: | Informe o(s) Banco(s) de Dados utilizado(s). | ||||
Sistema(s) Operacional(is): | Informe o(s) sistema(s) operacional(is) utilizados. |
Descrição: | Ponto de entrada para permitir que na alteração de OS seja possível vizualizar e alterar Ordens de Serviço que possuem insumos reportados. | ||||||||
Localização: | SIGAMNT: Atualizações\Controle de Oficina\Plano Manutenção\Alteracao de O.S. | ||||||||
Eventos: | Alteração de OS | ||||||||
Programa Fonte: | MNTA265.prx | ||||||||
Função: | MNTA2652() | ||||||||
Retorno: |
|
Exemplo:
#INCLUDE 'Protheus.ch'
User Function MNTA2652()
Local lRet := .F.
//Parâmetros
cOrdem := PARAMIXB[1] // Ordem de Serviço
cPlano := PARAMIXB[2] // Plano de Manutenção.
If MsgYesNo("A OS " + cOrdem + " já possui insumo reportado." + Chr(13) + ;
"Deseja incluir a mesma na lista?","ATENCAO")
lRet := .T.
EndIf
Return lRet