Histórico da Página
TTMZXE_DT_
A010ALTGA012ALTG_Salva_aCols_aHeader_quando_altera_grupo
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Serviços | ||||
Módulo: | Ativo Fixo | ||||
Rotina: |
| ||||
Ponto de Entrada: | A012ALTG | ||||
Chamados relacionados | TTMZXE, TTSOHZ | ||||
País(es): | Todos | ||||
Banco(s) de Dados: | Todos | ||||
Tabelas utilizadas: | SN1/SN3 | ||||
Sistema(s) operacional(is): | Todos | ||||
Versões/Release: | 11.80 |
12.1.6, 12.1.7 |
Descrição
O ponto de entrada A012ALTG permite salvar aHeader/aCols quando o grupo é alterado.
Ponto de Entrada
Descrição: | O ponto de entrada A012ALTG salva aHeader/aCols ao alterar grupo | ||||||||||||
Localização: | É uma rotina customizada, portanto não faz parte do menu padrão.. | ||||||||||||
Eventos: | A012ALTG | ||||||||||||
Programa Fonte: | ATFA010AATFA012.PRW | ||||||||||||
Função: | AF012AFNG() | ||||||||||||
Parametros: |
Sem Retorno do ponto entrada |
Exemplo:
#include "Protheus.ch"
Static aHeadx
Static aColx
Static lSalvei := .F.
User Function A012ALTG()
Local nx
aHeadx := ParamIxb[1]
aColx := ParamIxb[2]
lSalvei := .T.
MsgAlert("Entrei no Ponto de Entrada A012ALTG")
//exibe 3 primeiros campos do aHeadx
For nX := 1 TO 3
MsgAlert( "Campo " +Alltrim(Str(nX))+": "+aHeadx[nX,2])
Next
Return
//acols pode ser manipulado pelo ponto de entrada baixo
User Function A012RCOL()
Local nx
MsgAlert("Entrei no Ponto de Entrada A012RCOL")
If lSalvei
//exibe 3 primeiros campos do aHeadx
For nX := 1 TO 3
MsgAlert("Campo "+Alltrim(Str(nX))+": "+aHeadx[nX,2])
Next
EndIf
Return