...
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 |
| Bloco de código | ||||
|---|---|---|---|---|
| ||||
#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) |
...
Também fica disponível o array aOpcCam, que deve ser atualizado juntamente com o array aCols, para correto cálculo de opcionais.
Exemplo:
...
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>
|
