Histórico da Página

#Include 'TOTVS.CH'

User Function GVOrdFld()
    Local aHeader   := PARAMIXB[1] //Array com os os campos e todos os dados do cabeçalho que serão encaminhados para a gravação do Pedido de Venda.
    Local aItems    := PARAMIXB[2] //Array com os dados dos Itens e todos os dados que serão encaminhados para a gravação do Pedido de Venda.
    Local nOpc      := PARAMIXB[3] //Número da Operação realizada (Inclusão, Alteração ou Exclusão).
    Local aRet      := {}

    IF nOpc == 3 .Or. nOpc == 4
        //Adicionar campo customizado C5_XPGV no cabeçalho do Pedido
        Aadd( aHeader             , { "C5_XPGV" , "Incluido pelo Portal Gestão de Vendas", NIL } )

        //Adicionar campo customizado 'C6_XPGV' no item 1 do Pedido
        Aadd( aItems[ aItems[1] ] , {"C6_XPGV", "Incluido pelo Portal Gestão de Vendas", NIL})
    EndIf

    aRet :={ aHeader, aItems }
    
Return aRet