Árvore de páginas

01. DATOS GENERALES

Línea de producto:

Microsiga Protheus®

Segmento:

Backoffice

Módulo:

Financiero

Función:

FINA050 - Cuentas por pagar

FINA080 - Bajas por pagar manual

FINA090 - Bajas por pagar automática

FINA190 - Generación de cheques

FINA390 - Cheques sobre títulos

02. DESCRIPCIÓN

El punto de entrada PAGOBJCH tiene como finalidad permitir que el campo con el número de cheque quede deshabilitado para modificación del usuario.

03. PARÁMETROS

Nombre

Tipo

Descripción

PARAMIXB[1]

Carácter

Número del banco.

PARAMIXB[2]

Carácter

Número de la agencia bancaria.

PARAMIXB[3]

Carácter

Número de la cuenta bancaria.

PARAMIXB[4]

Carácter

Número del cheque.

PARAMIXB[5]

Objeto

Objeto de la pantalla del campo cheque.

PARAMIXB[6]

Lógico

Validación de banco (punto de entrada F080KCO).

04. DEVOLUCIÓN

Tipo

Descripción

Lógico

Indica si el campo cheque puede editarse.

05. EJEMPLO DE UTILIZACIÓN

PAGOBJCH
#INCLUDE "TOTVS.CH"
User Function PAGOBJCH() as logical
Local _cBanco		:= PARAMIXB[1] as character
Local _cAgencia		:= PARAMIXB[2] as character
Local _cNumero		:= PARAMIXB[3] as character
Local _cCheque		:= PARAMIXB[4] as character
Local _oCheque		:= PARAMIXB[5] as object
Local _lVldBanc		:= PARAMIXB[6] as logical
Local lEditNCheq	:= .T. as logical

If _cBanco == "999" .And. _cAgencia == "9999" .And. _cNumero == "999999"
    lEditNCheq    := .F.
EndIf

Return lEditNCheq