Árvore de páginas

Versões comparadas

Chave

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

...

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ógico.T. - Foi alterada a quantidade pelo P.E A140QTDPC
.F. - Não foi alterada pelo P.E A140QTDPC
         X
PARAMIXBNuméricoQuantidade original do item anterior a mudança da quantidade do P.E A140QTDPC X
PARAMIXBNuméricoPreço unitário original do item anterior a mudança da quantidade do P.E A140QTDPCX
PARAMIXB NuméricoTotal original do item anterior a mudança da quantidade do P.E A140QTDPCX
 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:

Bloco de código
languagejava
themeMidnight
titleExemplo
#Include "Protheus.ch"

...


#Include "RwMake.ch"

...


#Include "TbiConn.ch"

...



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 nQtdeItOri       

...

 := PARAMIXB[17]

...

 
Local nPrcItOri       

...

  

...

:= PARAMIXB[18]

...


Local nTotItOri       

...

  

...

:= PARAMIXB[19]

...

 



Local aRet := Array(4)

...



//Customização do cliente

...



Alert("Passou pelo P.E A140IQTD")

...



Return aRet