Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
languagejava
themeMidnight
titleTM850PRD
Programa Fonte
TMSA850.PRW

Sintaxe
TM850PRD - Altera o Produto de Calculo

Retorno
(Código do Produto)


Exemplos

#INCLUDE "PROTHEUS.CH"

User Function TM850PRD()

Local _cProd    := (PARAMIXB[1])
Local _cDocTMS  := (PARAMIXB[2])
Local _cCdrOri  := (PARAMIXB[3])
Local _cCdrDes  := (PARAMIXB[4])
Local _cCdrCal  := (PARAMIXB[5])
Local cNewPrd   := '' 

	//-- Tratamento: Produto de Calculo (Dados do Produto)
	SB1->(DbSetOrder(1))
	If SB1->(MsSeek(xFilial("SB1") + _cProd))
        cNewPrd := SB1->B1_COD
    EndIf
Return cNewPrd


04. DEMAIS INFORMAÇÕES

Não háPonto de Entrada TM850PRD só é chamado quando a fatura e gerada com base em um documento fiscal, caso necessite alterar o produto de calculo de um documento de apoio, durante a geração da fatura será necessário também o uso do ponto de entrada TM040PRD.


05. ASSUNTOS RELACIONADOS

...