Ponto de Entrada
Descrição: | Ponto de Entrada na rotina de Conferência de Solicitações de Peças Oficina via Coletor, executado no momento da seleção da Solicitação/OS quando o registro já estiver bloqueado por outro usuário. | |||||||||
Localização: | SIGAACD - Automação Coleta de Dados \ Conferencia de Oficina (OFIA220) | |||||||||
Eventos: | ... DbSelectArea("VM3") If !SimpleLock() // No coletor utilizar SimpleLock ao inves de SoftLock // VtAlert(STR0004,STR0002) // Solicitacao de Pecas encontra-se Bloqueada por outro usuario! / Atencao // If ExistBlock("OA220BLQ") ExecBlock("OA220BLQ",.f.,.f.,{ VM3->VM3_CODIGO , VM3->VM3_NUMOSV }) // Dispara PE se tiver Bloqueado por outro usuario EndIf // Else ... | |||||||||
Programa Fonte: | OFIA220.PRW | |||||||||
Função: | OA2200011_TELA1() | |||||||||
Parâmetros: |
| |||||||||
Retorno: | Não há. |
Exemplo:
Include totvs.ch
// Ponto de Entrada na rotina de Conferência de Solicitações de Peças Oficina
// via Coletor, executado no momento da seleção da Solicitação/OS quando o
// registro já estiver bloqueado por outro usuário
User Function OA220BLQ()
Local cVM3 := ParamIXB[1] // VM3->VM3_CODIGO ( Código da Confencia )
Local cOS := ParamIXB[2] // VM3->VM3_NUMOSV ( Nro. da OS )
VtAlert("Ponto de entrada OA220BLQ executado com sucesso!")
Return