Linha de Produto: | Protheus |
Segmento: | Agroindústria |
Módulo: | SIGAAGR |
Descrição: | Permitir intervir na confirmação do romaneio(com e sem pesagem). | ||||||||||||
Localização: | Antes de confirmação do romaneio. | ||||||||||||
Programa Fonte: | OGA250 | ||||||||||||
Parâmetros: |
| ||||||||||||
Retorno: |
| ||||||||||||
Observação: | Não se aplica. |
#include 'protheus.ch' #include 'parmtype.ch' user function OG250NFVD() Local cFilPed := PARAMIXB[1] Local cNumRom := PARAMIXB[2] Local lRet := .F. DbSelectArea( "NJJ" ) DbSetOrder( 1 ) If NJJ->( DbSeek( cFilPed + cNumRom ) ) alert("Romaneio barrado pelo PE: " + cNumRom ) endIf Return lRet |