Ponto de Entrada
Descrição: | Ponto de Entrada na rotina de Conferencia de Itens NF Entrada no desktop (OFIOM390) para possibilitar deixar passar a Entrada de uma determinada NF de Entrada mesmo que não houve a Conferência dos Itens. | ||||||
Localização: | Atualizações \ Mov Peças \ Conf. Codigo Barra (OFIOM390) | ||||||
Eventos: | ... lRet := .f. // NAO existe Conferencia APROVADA ... | ||||||
Programa Fonte: | OFIOM390.PRW | ||||||
Função: | OFIOM390() | ||||||
Parâmetros: |
| ||||||
Retorno: |
|
Exemplo:
Include totvs.ch
User Function OM390VLD()
Local lRet := .f.
Local cConfNF := ParamIXB[1] // DOC + SERIE + FORNECEDOR + LOJA
Local oSqlHlp := DMS_SqlHelper():New()
cQuery += " AND " + oSqlHlp:Concat({'D1_DOC', 'D1_SERIE', 'D1_FORNECE', 'D1_LOJA'}) + " = '" + cConfNF + "'"
MsgAlert("Ponto de Entrada OM390VLD executado com sucesso!","Atenção")
Return lRet