Árvore de páginas

Ponto de entrada que omite a tela de Finalização O.S. na rotina de Retorno Simplificado (MNTA415)

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Manufatura

Módulo:

SIGAMNT - Manutenção de Ativos e Gestão de Frotas

Rotina:

Rotina

Nome Técnico

MNTA415

Retorno Simplificado


Rotina(s) envolvida(s)

Nome Técnico

MNT415A

Ponto de Entrada

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos


Ponto de Entrada

Descrição:

Ponto de entrada executado na rotina de Retorno Simplificado (MNT415) ao clicar na opção de Finalizar O.S. para omitir a tela de finalização de O.S.

Programa Fonte:

MNTA415.prx
Localização:SIGAMNT: Atualizações/Controle de Oficina/Retorno de OS/Simplificado

Função:

MNT415A()
Parâmetros:
NomeTipoDescrição
ParamIXB[1]ArrayArray contendo dezoito posições com informações referentes a O.S., sendo elas:
ParamIXB[2]Lógico1. Ordem;
2. Dt. Parada Inicio;
3. Dt. Parada Fim;
4. Hora Parada Inicio;
5. Hora Parada Fim;
6. Contador 1;
7. Hora Cont. 1;
8. Contador 2;
9. Hora Cont. 2;
10. Dt. Real Final;
11. Tem Contador 1;
12. Tem Contador 2;
13. Bem Contador;
14. Plano da Manutenção;
15. Código da irregularidade;
16. Data Mnt. Real Ini.;
17. Hora Mnt. Real Ini.;
18. Hora Mnt. Real Fim.

Retorno:

NomeTipoDescriçãoObrigatório
aRetArrayArray de duas posições contendo o primeiro e o segundo parâmetro, respectivamente, na primeira e segunda posiçãoX
Exemplo do Ponto de Entrada MNT415A()
#Include 'Protheus.ch'

User Function MNT415A()
	
	Local aNoCad := aClone(ParamIXB[1])
	Local lShow := ParamIXB[2]
	Local aRet := {}

	aNoCad[1][15] := "002"
	lShow := .F.
	
	/* Posicoes do Array
	1. Ordem,
	2. Dt. Parada Inicio
	3. Dt. Parada Fim
	4. Hora Parada Inicio
	5. Hora Parada Fim
	6. Contador 1
	7. Hora Cont. 1
	8. Contador 2
	9. Hora Cont. 2
	10. Dt. Real Final
	11. Tem Contador 1
	12. Tem Contador 2
	13. Bem Contador
	14. Plano da Manutenção
	15. Código da irregularidade
	16. Data Mnt. Real Ini.
	17. Hora Mnt. Real Ini.
	18. Hora Mnt. Real Fim */

	aRet := {aClone(aNoCad[1]), lShow}

Return aRet