Ponto de entrada A140IQTD

Linha de Produto:

Protheus

Segmento:

Backoffice

Módulo:

SIGACOM - Compras

Rotina:

Rotina

Nome Técnico

NF (Totvs Colaboração / Importador XML)

MATA140I

Ponto de Entrada:

A140IQTD

País(es):

Brasil

Banco(s) de Dados:

Todos

Tabelas utilizadas:

SDT

Sistema(s) operacional(is):

Windows/Linux

Ponto de Entrada

Descrição:

O Ponto de Entrada A140IQTD permite alterar os campos de quantidade, valor unitário, total e quantidade da segunda unidade de medida na importação do documento.

Localização:

Rotina de processamento dos documentos para o Monitor Totvs Colaboração (Item a item).

Eventos:

O Ponto de entrada é executado durante a inclusão dos itens do documento.

Programa Fonte:

MATA140I

Função:

IMPXML_NFE

Obs:Caso seja utilizado em conjunto com o Ponto de entrada A140QTDPC, deverá ser tratado os preços unitários e totais referente a quantidade informado no ponto de entrada anterior.  saiba mais

Parâmetros:

Nome

Tipo

Descrição

Obrigatório

PARAMIXB

Carácter

Produto

X

PARAMIXBCarácterUnidade de medidaX
PARAMIXBCarácterSegunda unidade de medidaX
PARAMIXBNuméricoQuantidade da segunda unidade de medidaX
PARAMIXBNuméricoQuantidadeX
PARAMIXBNuméricoPreço unitárioX
PARAMIXBNuméricoTotalX
PARAMIXBLógico

.T. - Utiliza 2ª unidade de medida

.F. - Não utiliza 2ª unidade de medida

X
PARAMIXBCaracterFornecedorX
PARAMIXBCaracterLojaX
PARAMIXBCaracterDocumentoX
PARAMIXBCaracterSerieX
PARAMIXBCaracterTipo do documentoX
PARAMIXBLógico

.T. = Alias SA7 (Cliente)

.F. = Alias SA5 (Fornecedor)

X
PARAMIXBObjetoXML do documentoX
PARAMIXBLógicoInforma se foi executado o ponto de entrada A140QTDPC         X
 Retorno:
Nome
Tipo
Descrição
Obrigatório
aRetArray

Informações a serem inseridas no item

[01] - Quantidade

[02] - Preço unitário

[03] - Total

[04] - Quantidade segunda unidade de medida

 X

 

Exemplo:

#Include "Protheus.ch"
#Include "RwMake.ch"
#Include "TbiConn.ch"

User Function A140IQTD()

Local cProduto := PARAMIXB[1]
Local cUM := PARAMIXB[2]
Local cSEGUM := PARAMIXB[3]
Local nQtSEGUM := PARAMIXB[4]
Local nQtdeIt := PARAMIXB[5]
Local nPrcIt := PARAMIXB[6]
Local nTotIt := PARAMIXB[7]
Local lConvUM := PARAMIXB[8]

Local cForn := PARAMIXB[9]
Local cLoja := PARAMIXB[10]
Local cDoc := PARAMIXB[11]
Local nSerie := PARAMIXB[12]
Local nTipo := PARAMIXB[13]
Local lA5A7 := PARAMIXB[14]
Local oXML := PARAMIXB[15]
Local lA140QTDPC := PARAMIXB[16] 

Local aRet := Array(4)

//Customização do cliente

Alert("Passou pelo P.E A140IQTD")

Return aRet