Histórico da Página

01. DADOS GERAIS

Linha de Produto:

Linhas_totvs

Linha	Linha Protheus

Segmento:

Segmentos_totvs

Segmento	Backoffice

Módulo:

Modulos_cross_segmentos

ModulosCrossSegmentos	TOTVS Backoffice (Linha Protheus) - Faturamento (SIGAFAT)

Função:

MATA410 - Pedidos de Venda

02. DESCRIÇÃO

Este ponto de entrada permite alterar as linhas do acols referente aos itens gerados pela bonificação. O PE é executado apenas após a confirmação de gravação do Pedido de Venda, sendo processado uma vez para cada item gerado como bonificação.

03. SINTAXE

A410BLCO({aHeader, aCols}) ---> aRet

04. PARÂMETROS

Nome	Tipo	Descrição
PARAMIXB	Array	Matriz de itens gerados pela bonificação. Onde: PARAMIXB[1] - aHeader de campos dos itens; PARAMIXB[2] - aCols com os conteúdos do item gerado pela bonificação.

...

05.

...

RETORNO

Nome	Tipo	Descrição	Obrigatório
aRet	Array	aCols do item bonificado.	Sim

...

06.

...

EXEMPLO DE UTILIZAÇÃO

Bloco de código

language	vb
theme	Midnight
firstline	1
title	MTA416PVA410BLCO
linenumbers	true

#Include "PROTHEUS.CH"  

User Function A410BLCO()

	Local nPQtdVen := aScan(ParamIxb[1],{|x| AllTrim(x[2])== 'C6_QTDVEN'})
    Local nPPrcVen := aScan(ParamIxb[1],{|x| AllTrim(x[2])== 'C6_PRCVEN'})
    Local nPPrUnit := aScan(ParamIxb[1],{|x| AllTrim(x[2])== 'C6_PRUNIT'}) 
    Local nPValor  := aScan(ParamIxb[1],{|x| AllTrim(x[2])== 'C6_VALOR' })
	
	
    ParamIxb[2][nPPrcVen] := 10		//Alterado o Preço de Venda
    ParamIxb[2][nPPrUnit] := 10		//Alterado o Preço Unitário
	ParamIxb[2][nPValor ] := A410Arred(ParamIxb[2][nPQtdVen] * ParamIxb[2][nPPrcVen], 'C6_VALOR')	//Alterado o Valor Total

Return(ParamIxb[2])

Árvore de páginas

Versões comparadas

Versão antiga 4

Nova versão Atual

Chave