Descrição

Exemplo do funcionamento da rotina automática de Transferências.

Exemplos

#include "tbiconn.ch"
#include "protheus.ch"

User Function TRANSF()

PREPARE ENVIRONMENT EMPRESA "T1" FILIAL "D MG 01 " MODULO "GPE"

dbselectarea("SRA")
dbseek("D MG 01 000032")

MsExecAuto( { |a,x,y,z| Gpea180(a,x,y,z)}, 4) // 2 - Visualizar, 4 - Manutencao,, 5 - Exclusao

RESET ENVIRONMENT

Return()

Programa Fonte

GPEA180.PRX