Histórico da Página
Ponto de Entrada
Descrição: | Ponto de Entrada na rotina de Conferência de Volume de Entrada via Coletor, executado no momento da seleção do Volume quando o registro já estiver bloqueado por outro usuário. | ||||||
Localização: | SIGAACD - Automação Coleta de Dados \ Conf. Volume Entrada (OFIA350) | ||||||
Eventos: | ... DbSelectArea("VCX") For nCntFor := 1 to len(aRecVCX[nPos,2]) VCX->(DbGoto(aRecVCX[nPos,2,nCntFor,2])) If !SimpleLock() // No coletor utilizar SimpleLock ao inves de SoftLock - Travar todos os Registros do VCX // VTAlert(STR0005,STR0002) // Volume encontra-se Bloqueado por outro usuario! / Atencao // If ExistBlock("OA350BLQ") ExecBlock("OA350BLQ",.f.,.f.,{ aRecVCX[nPos,1] }) // Dispara PE se tiver Bloqueado por outro usuario EndIf // lTravouVCX := .f. Exit Else aRecVCX[nPos,2,nCntFor,1] := .t. // Travou VCX EndIf Next If lTravouVCX ... | ||||||
Programa Fonte: | OFIA350.PRW | ||||||
Função: | OA3500011_TELA1() | ||||||
| Parâmetros: |
| ||||||
| Retorno: | Não há. |
Exemplo:
Include totvs.ch
// Ponto de Entrada na rotina de Conferência de Volume de Entrada via Coletor,
// executado no momento da seleção do Volume quando o registro já estiver
// bloqueado por outro usuário
User Function OA350BLQ()
Local cVol := ParamIXB[1] // Volume de Entrada
VtAlert("Ponto de entrada OA350BLQ executado com sucesso!")
Return
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas