Histórico da Página
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: |
| |||||||||||||||
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