Árvore de páginas

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:
NomeTipoDescrição

cVM3

Caractere

VM3->VM3_CODIGO ( Código da Conferência )

cOS

Caractere

VM3->VM3_NUMOSV ( Nro. da OS )

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