Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin

Ponto de Entrada

Descrição:

Ponto de Entrada na rotina de Conferência de Nota Fiscal de Entrada via Coletor, executado no momento da seleção da Nota Fiscal de Entrada quando o registro já estiver bloqueado por outro usuário.

Localização:

SIGAACD - Automação Coleta de Dados \ Conf. Entrada (OFIA060)

Eventos:

...

DbSelectArea("SF1")

If !SimpleLock() // No coletor utilizar SimpleLock ao inves de SoftLock

//

VTAlert(STR0034,STR0002) // NF de Entrada encontra-se Bloqueada por outro usuario! / Atencao

//

If ExistBlock("OA060BLQ")

ExecBlock("OA060BLQ",.f.,.f.,{ SF1->F1_DOC , SF1->F1_SERIE , SF1->F1_FORNECE , SF1->F1_LOJA }) // Dispara PE se tiver Bloqueado por outro usuario

EndIf

//

Else

...

Programa Fonte:

OFIA060.PRW

Função:

OA0600011_TELA1()

Parâmetros:
NomeTipoDescrição

cNF

Caractere

SF1->F1_DOC ( Nro. da NF de Entrada )

cSer

Caractere

SF1->F1_SERIE ( Serie da NF de Entrada )

cFor

Caractere

SF1->F1_FORNECE ( Codigo do Fornecedor )

cLoj

Caractere

SF1->F1_LOJA ( Loja do Fornecedor )

Retorno:

Não há.


Exemplo:

Include totvs.ch

// Ponto de Entrada na rotina de Conferência de Nota Fiscal de Entrada via Coletor,

// executado no momento da seleção da Nota Fiscal de Entrada quando o registro já

// estiver bloqueado por outro usuário

User Function OA060BLQ()


Local cNF := ParamIXB[1] // SF1->F1_DOC ( Nro. da NF de Entrada )

Local cSer := ParamIXB[2] // SF1->F1_SERIE ( Serie da NF de Entrada )

Local cFor := ParamIXB[3] // SF1->F1_FORNECE ( Codigo do Fornecedor )

Local cLoj := ParamIXB[4] // SF1->F1_LOJA ( Loja do Fornecedor )


VtAlert("Ponto de entrada OA060BLQ executado com sucesso!")


Return