Histórico da Página
...
Vale ressaltar que as colunas que não forem preenchidas, devem ser inicializadas com a função Criavar dos respectivos campos. Basta pesquisar qual o campo tomado como base para criação das colunas.
Para mais informações pode ser consultado a variável "aHeader" que contém os dados do cabeçalho da Grid de empenhos onde:
Posição | Campo SX3 | Título |
---|---|---|
aHeader[01] | X3_TITULO | Título |
aHeader[02] | X3_CAMPO | Campo |
aHeader[03] | X3_PICTURE | Picture |
aHeader[04] | X3_TAMANHO | Tamanho |
aHeader[05] | X3_DECIMAL | Decimal |
aHeader[06] | X3_VALID | Validação |
aHeader[07] | X3_USADO | Usado |
aHeader[08] | X3_TIPO | Tipo |
aHeader[09] | X3_F3 | F3 |
aHeader[10] | X3_CONTEXT | Contexto (R,V) |
aHeader[11] | X3_CBOX | Combobox |
aHeader[12] | X3_RELACAO | Inicial. Padrao |
aHeader[13] | X3_WHEN | Habilita edicao |
aHeader[14] | X3_VISUAL | Alteravel (A,V) |
aHeader[15] | X3_VLDUSER | Valid de User |
aHeader[16] | X3_PICTVAR | Picture |
aHeader[17] | X3_OBRIGAT | Obrigatorio |
02. EXEMPLO DE UTILIZAÇÃO
#INCLUDE 'PROTHEUS.CH'
User function EMP650()
Local aArea := GetArea()
local nx
For nx := 1 to len(Acols) // Percorre todas as linhas da acols
IF ! Acols[nx][len(acols[nx])] // Verifica se linha nao esta Deletada
Conout("Linha não deletada: "+ cValTochar(nx))
EndIF
Conout("Produto :"+ acols[nx,nPoscod] + " Descrição : " +acols[nx,nPosDescr] )
Next nx
RestArea(aArea)
Return
...
Também fica disponível o array aOpcCam, que deve ser atualizado juntamente com o array aCols, para correto cálculo de opcionais.
Exemplo:
#include "rwmake.ch"
User Function EMP650()
Local nQtdDel := Len(aColsDele)
Local nx := 0
If Len(aColsDele) > 0
For nx:= nQtdDel To 1 Step -1
aDel(aCols, aColsDele[nx])
aDel(aOpcCam, aColsDele[nx])
Next nx
aSize(aCols, Len(aCols) - Len (aColsDele))
aSize(aOpcCam, Len(aOpcCam) - Len (aColsDele))
aSize(aColsDele,0)
EndIf
Return
HTML |
---|
<!-- esconder o menu --> <style> div.theme-default .ia-splitter #main { margin-left: 0px; } .ia-fixed-sidebar, .ia-splitter-left { display: none; } #main { padding-left: 10px; padding-right: 10px; overflow-x: hidden; } .aui-header-primary .aui-nav, .aui-page-panel { margin-left: 0px !important; } .aui-header-primary .aui-nav { margin-left: 0px !important; } </style> |