Ponto de Entrada para alterar os dados de geração do Pedido de Vendas

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Rotina:

Rotina	Nome Técnico
AGRA750	Romaneio de Saida

Ponto de Entrada:

AGR750PV

País(es):

Todos

Descrição:

Permite alterar o Pedido de Vendas.

Localização:

IncluiPV

Programa Fonte:

AGRA750

Função:

AGR750PV

Retorno:

Nome	Tipo	Descrição	Obrigatório
AGR750PV	Array	Parâmetros enviados: { aPedido, aItens }	Sim

Exemplo:

#Include 'Protheus.ch'

User Function AGR750PV()
Local aPedido := PARAMIXB[1] // Pedido de venda
Local aItens := PARAMIXB[2] // Itens do Pedido de venda
Local nX := 0

// Customizações do Cabeçalho - SC5
aAdd(aPedido,{"C5_TIPO" ,"N" ,Nil})

// Customizações dos Itens - SC6
For nX:= 1 to Len(aItens)
aAdd(aItens[nX],{"C6_TES" ,"522" ,Nil })
Next nX

Return {aPedido,aItens}