Ponto de Entrada

Descrição:

Este ponto de entrada está localizado na rotina Parts Data (OFINJD06) e é executado no momento da geração do arquivo de modo que possibilite a alteração na coluna de informação do valor de venda da peça.

Localização:

Atualizações /  Mov JD / Parts Data John Deere (OFINJD06)

Eventos:

cVlrPec := (cAl)->(B1_PRV1)

If lOJD06VPC

      cVlrPec := P_OJD06VPC((cAl)->(B1_COD),cVlrPec)

EndIf

Programa Fonte:

OFINJD06.PRW

Função:

FX_DEMDATA()

Parâmetros:

cCodPro - Código do Produto

cVlrPec - Valor de Venda da Peça no cadastro de produtos


Retorno:
NomeTipoDescrição

cVlrPec

caracter

Valor de venda da peça


Exemplo:

#include "protheus.ch"

Project Function OJD06VPC(xCod,xVal)

     Default cCodPro := xCod

     Default cValPec := xVal


     MsgInfo("Código do Produto: "+cCodPro+" Valor de Venda: "+ cValToChar(cValPec))

Return cValPec