Histórico da Página

Este ponto punto de entrada não inclui campos na interface do no incluye campos en la interfaz del sistema.

#Include 'TOTVS.CH'
 
User Function GVOrdFld()
    Local aHeader   := PARAMIXB[1] //Array comcon oslos campos ey valores dodel cabeçalhoencabezado que serãose encaminhadosencaminarán para ala gravaçãograbación dode Pedidos de Vendasventas.
    Local aItems    := PARAMIXB[2] //Array comcon oslos Itensítems ey valores que serãose encaminhadosencaminarán para ala gravaçãograbación dode Pedidos de Vendasventas.
    Local nOpc      := PARAMIXB[3] //Número de dala Operaçãooperación realizada (InclusãoInclusión, AlteraçãoModificación ouo ExclusãoBorrado).
    Local nX        := 1
    Local aRet      := {}
    
    //Validar ala operaçãooperación
    IF nOpc == 3 .Or. nOpc == 4
        //AdicionarAgregar campo customizadopersonalizado C5_XPGV en noel cabeçalhoencabezado dodel PedidosPedido de Vendasventas comcon oel valor "Reg. Op:3 Portal GestãoGestión de Vendasventas"             
		Aadd( aHeader, { "C5_XPGV" , "Reg. Op:"+cValToChar(nOpc)+" Portal GestãoGestión de Vendasventas", NIL } )
    
        //PercorrerRecorrer todos los osítems itensde desseeste Pedido de Vendasventas
        For nX:= 1 To Len(aItems)
            //AdicionarAgregar campo customizadopersonalizado 'C6_XPGV' emen todos oslos itensítems dodel PedidosPedido de Vendasventas comcon oel valor "Reg. Op:3 Portal GestãoGestión de Vendasventas"
                        Aadd( aItems[nX], { "C6_XPGV" , "Reg. Op:"+cValToChar(nOpc)+" Portal GestãoGestión de Vendasventas", NIL } )
        Next    
    EndIf
 
    aRet :={ aHeader, aItems }
     
Return aRet