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
