Ponto-de-Entrada: OM010BLOQ - Validações nas linhas da Abertura de Ordens de Serviços Manual
| Abrangências: | Microsiga Protheus 10 , Microsiga Protheus 11 |
| Versões: | Microsiga Protheus 10 , Microsiga Protheus 11 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Idiomas: | Português (Brasil) |
Descrição:
Ponto de entrada na rotina Abertura de Ordens de Serviços Manual (OFIOM010), executado em cada linha da GetDados.Finalidade: Validar as linhas da GetDados.
Eventos
Return(lRet)
User Function OM010BLOQ()
Local lRet := .t. // Retorno do PE
MsgStop("Ponto de Entrada OM010BLOQ chamado com sucesso")
Programa Fonte
OFIOM010.PRW
Sintaxe
OM010BLOQ - Validações nas linhas da Abertura de Ordens de Serviços Manual ( [ ] ) --> lRet
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| Array of Record |
Retorno
-
lRet(logico)
- Retorno do PE
Observações
Function FS_OM010LOK(lValid)
Local nObrig:=0 , nRecno:=0 , cQuebraAgr := "", cQuebraSeq := ""
Local cFatPar := "", cLojPar := ""
Local cProVei := "", cLojVei := "", cSeqInc := ""
Default lValid:=(TMP->(RecCount()) > 1)
If ExistBlock("OM010BLOQ")
If !ExecBlock("OM010BLOQ",.f.,.f.)
return (.f.)
Endif
EndIf
Variáveis
| Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
| Array of Record | Global | Não |