...
| Linha Línea de Produtoproducto: | Microsiga Protheus® |
|---|---|
Segmento: | Backoffice |
Módulo: | Financeiro Financiero |
| Função Función: | FINA050 - Contas a PagarCuentas por pagar FINA080 - Baixas Pagar ManualBajas por pagar manual FINA090 - Baixas Pagar AutomáticaBajas por pagar automática FINA190 - GeraçãoGeneración de Chequescheques FINA390 - Cheques Sobre Títulossobre títulos |
...
O ponto El punto de entrada PAGOBJCH tem tiene como finalidade finalidad permitir que o el campo com con el número do de cheque fique desabilitado para alteração do usuárioquede deshabilitado para modificación del usuario.
...
| Nome Nombre | Tipo | Descrição Descripción |
|---|---|---|
PARAMIXB[1] | Caracter Carácter | Número dodel banco. |
PARAMIXB[2] | Caracter Carácter | Número da agência bancáriade la agencia bancaria. |
PARAMIXB[3] | Caracter Carácter | Número da conta bancáriade la cuenta bancaria. |
PARAMIXB[4] | Caracter Carácter | Número dodel cheque. |
PARAMIXB[5] | Objeto | Objeto de tela dola pantalla del campo cheque. |
PARAMIXB[6] | Lógico | Validação Validación de banco ( pontopunto de entrada F080KCO). |
...
Tipo | Descrição Descripción |
|---|---|
Lógico | Indica se osi el campo cheque pode ser editadopuede editarse. |
...
...
| Bloco de código | ||||
|---|---|---|---|---|
| ||||
#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 |