Histórico da Página

#INCLUDE 'PROTHEUS.CH'
#INCLUDE 'TOTVS.CH'
#INCLUDE 'PARMTYPE.CH'

User Function OS010COL()

Local aHeader := PARAMIXB[1]
Local aCols   := PARAMIXB[2]

If aCols[1][8] == 0     // AvaliaCondição que avalia se o conteúdo da posição de aCols do campo DA1_PRCBAS (tabela DA1) == 0
    aCols[1][8] := 100  // Atribui Caso a condição seja verdadeira, atribui o valor à100 posiçãoao decampo aColsDA1_PRCBAS
EndIf    

Return aCols            //RetornoRetorna aCols