01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:Terceirização (SIGATEC)
Função:TECA930 - Apuração
País:Brasil
Ticket:Não há
Requisito/Story/Issue (informe o requisito relacionado) :DSERSGS-13162


02. SITUAÇÃO/REQUISITO

Ao confirmar a inclusão da Apuração de Excedente, possibilidade de modificar as informações do PV gerado.

03. SOLUÇÃO

Aberto ponto de entrada antes da gravação do pedido de venda, para que seja possível alteração.

1
2
3
4
5
6
7
8
9
10
11
12

User Function AT930EXC()
Local aCabec := PARAMIXB[1] //Recebe o primeiro parâmetro "Cabeçalho"
Local aItens := PARAMIXB[2] //Recebe o segundo parâmetro "Itens"
Local nX
 
AADD(aCabec, {"C5_USER", RetCodUsr(), Nil})
 
For nX := 1 To Len(aItens)
    AADD(aItens[nX], {"C6_ESPECI", Posicione('SB1',1,xFilial('SB1')+aItens[nX][2][2],'B1_ESPECIE'), Nil})
Next nX
 
Return {aCabec, aItens}


04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS