Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas


TTMZXE_DT_A012ALTG_Graba_aCols_aHeader_cuando_modifica_grupo

Características del requisito

Línea de producto:

Microsiga Protheus

Segmento:

Servicios

Módulo:

Activo fijo

Rutina:

Rutina

Nombre técnico

ATFA012.

inclusión/clasificación de activos

Punto de entrada:

A012ALTG

Llamados relacionados

TTMZXE, TTSOHZ

País(es):

Todos

Base(s) de datos:

Todas

Tablas utilizadas:

SN1/SN3

Sistema(s) operativo(s):

Todos

Versiones/Release:

12.1.6, 12.1.7

  

Descripción

El punto de entrada A012ALTG permite grabar aHeader/aCols cuando se modifica el grupo.


Punto de entrada

Descripción:

El punto de entrada A012ALTG graba aHeader/aCols al modificar el grupo

Ubicación:

Es una rutina personalizada, por lo tanto no forma parte del menú estándar.

Eventos:

A012ALTG

Programa fuente:

ATFA012.PRW

Función:

AF012AFNG()

Parámetros:

Nombre

Tipo

Descripción

Obligatorio

aHeader

array



aCols 

array



Sin devolución del punto de entrada

 

Ejemplo:

#include "Protheus.ch"
Static aHeadx
Static aColx
Static lSalvei := .F.

User Function A012ALTG()
Local nx

aHeadx := ParamIxb[1]
aColx := ParamIxb[2]
lSalvei := .T.

MsgAlert("Entré en el Punto de entrada A012ALTG")

//muestra los 3 primeros campos de aHeadx
For nX := 1 TO 3
MsgAlert( "Campo " +Alltrim(Str(nX))+": "+aHeadx[nX,2])
Next

Return

//acols puede manejarse por el siguiente punto de entrada
User Function A012RCOL()
Local nx
MsgAlert("Entré en el Punto de entrada A012RCOL")

If lSalvei
//muestra los 3 primeros campos de aHeadx
For nX := 1 TO 3
MsgAlert("Campo "+Alltrim(Str(nX))+": "+aHeadx[nX,2])
Next
EndIf

Return