Árvore de páginas

01. DADOS GERAIS

Produto:

Linha de Produto:

TOTVS Prestadores de Serviços Terceirização

Segmento:

Serviços

Módulo:Prestadores de Serviços
Função:Apuração e Medição
País:Brasil
Ticket:Não há.
Requisito/Story/Issue (informe o requisito relacionado) :DSERSGS-11556


02. SITUAÇÃO/REQUISITO

Ao realizar uma medição para itens extras, era necessário alteração no pedido de venda.

03. SOLUÇÃO

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

AT930PVE
User Function AT930PVE()
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

  • Não há.