OM390ROT Ponto de Entrada no inicio da rotina Conf Entrada Código Barra (OFIOM390) utilizado para customizar todo processo de conferencia do item

Ponto de Entrada

Descrição:

Ponto de Entrada no inicio da rotina de Conferencia de Entrada de Peças (OFIOM390), utilizado para customizar todo processo de conferencia do item.

Localização:

Atualizações / Mov. Peças / Conf Entrada Código Barra (OFIOM390)

Eventos:

...

If ExistBlock("OM390ROT")

Return ExecBlock("OM390ROT",.f.,.f.,{ cConfNF }) // Substitui a Rotina Padrão OFIOM390

Else

...

// Processo padrão

EndIf

Programa Fonte:

OFIOM390.PRW

Função:

OFIOM390()

Parâmetros:

Nome	Tipo	Descrição
cConfNF	Caracter	string contendo SF1->F1_DOC + SF1->F1_SERIE + SF1->F1_FORNECE + SF1->F1_LOJA

Retorno:

Nome	Tipo	Descrição
lRet	Lógico	.t. = continua o processo / .f. = aborta o processo

Exemplo:

// Substitui a Rotina Padrão OFIOM390

User Function OM390ROT()

Local lRet := .t.

Local cStrNF := ParamIXB[1] // SF1->F1_DOC + SF1->F1_SERIE + SF1->F1_FORNECE + SF1->F1_LOJA

MsgAlert("Ponto de Entrada OM390ROT executado com sucesso!")

Return lRet