Línea de producto: | Microsiga Protheus® |
|---|---|
Segmento: | Servicios |
Módulo: | Financiero |
Punto de entrada para tratamiento de las variables (CBCO090, CAGE090, CTA090, CCHEQ090) después de la carga de datos del título que se dará de baja, antes de que las informaciones se muestren en la pantalla.
Para que este punto de entrada funcione correctamente se utiliza el punto de entrada F090MTBX para modificar el motivo de baja inicial (DÉBITO CC o BORDERÓ CH), pues solamente estos motivos de baja permiten movimiento bancario.
Nombre | Tipo | Descripción | |
|---|---|---|---|
Devolución | aRet | Array | Debe devolver el array con el contenido para las variables CBCO090, CAGE090, CTA090 y CCHEQ090. |
Orden | Nombre | Tipo |
|---|---|---|
1 | ParamIxb[1] = Recibe los parámetros para el punto de entrada. {cBco090, cAge090, cCta090, cCheq090} | Array |
#Include "Protheus.ch"
User function FA090POS()
Local aDados := {}
aadd(aDados, "001")
aadd(aDados, "00001")
aadd(aDados, "000001")
aadd(aDados, "123456789")
Alert ("¡Tratamiento de las variables concluido con éxito!")
Return aDados
//---------------------------------------
//Ejemplo de la activación del punto de entrada
//---------------------------------------
If ExistBlock("FA090POS")
aDados := ExecBlock("FA090POS",.F.,.F.,{cBco090, cAge090, cCta090, cCheq090})
cBco090 := aDados[1]
cAge090 := aDados[2]
cCta090 := aDados[3]
cCheq090 := aDados[4]
SE2->(dbGoTo(nSalvRec))
Endif
No hay.
F090MTBX - Modifica motivo de baja automática