Histórico da Página
01. DADOS GERAIS
| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Logística |
| Módulo: | SIGATMS - Gestão de Transportes |
02. DESCRIÇÃO
O ponto de entrada TM850PRD é executado após a obtenção do produto de imposto e permite ao usuário alterar o mesmo.
03. EXEMPLO DE UTILIZAÇÃO
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | |||||
| cExp1 | Caracter | Código do Produto de Imposto | Não | |||||||
| cExp2 | Caracter | Código do Documento de Transporte | Não | |||||||
| cExp3 | Caracter | Código da Região de Origem | Não | |||||||
| cExp4 | Caracter | Código da Região de Destino | Não | |||||||
| cExp5 | Caracter | Código da Região de Cálculo | Não |
Variáveis
| Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||
| Array of Record | Global | Não |
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
Programa Fonte
TMSA850.PRW
Sintaxe
TM850PRD - Altera o Produto de Calculo do SE1
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 configuração de documentos "TMSA150", campo DUI_DOCFAT estiver sem o preenchimento.
05. ASSUNTOS RELACIONADOS
- Não há.
| Templatedocumentos |
|---|
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas