Árvore de páginas

Ponto de Entrada

Descrição:

Ponto de entrada que permite aplicar um De/Para no Status da OS. OBS: O sistema continuará efetuando as validações com os Status padrão.

Localização:

Atualizações \ Mov Oficina \ Req. Serviços/Apont

Eventos:

if iif(lOm030Ast,ExecBlock("OM030AST",.F.,.F.,{VO1->VO1_STATUS}),VO1->VO1_STATUS) # "A"


Help(" ",1,"OSNABERTA")


DbSelectArea("VO1")

DbSetOrder(1)


Return


EndIf

Programa Fonte:

OFIOM030.PRW

Função:

OFIOM030()

Parâmetros:
NomeTipoDescrição

cStatus

Caracter

ParamIXB[1] - Status da Ordem de Serviço(VO1_STATUS)

Retorno:
NomeTipoDescrição
cStatusCaracter

Status da Ordem de Serviço(VO1_STATUS)


Exemplo:

Include totvs.ch

#include "Protheus.ch"


User function OM030AST()

Local cStatus := ""


cStatus := ParamIXB[1]


Return(cStatus)