Histórico da Página
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. Peças | ||||||
Eventos: | //ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ //³Valida se a Ordem de Servico esta aberta.³ //ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ if iif(lOm020Ast,ExecBlock("OM020AST",.F.,.F.,{VO1->VO1_STATUS}),VO1->VO1_STATUS) # "A" Help(" ",1,"OSNABERTA") DbSelectArea("VO1") DbSetOrder(1) // Eval(bFiltraBrw) Return EndIf | ||||||
Programa Fonte: | OFIOM020.PRW | ||||||
Função: | OFIOM020() | ||||||
Parâmetros: |
| ||||||
Retorno: |
|
Exemplo:
Include totvs.ch
#include "Protheus.ch"
User function OM020AST()
Local cStatus := ""
cStatus := ParamIXB[1]
Return(cStatus)