Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

NOSSONUM - Número

...

disponible para

...

identificación del título

ProdutoOcorrência disponível identificação do Nosso InstruçõesSíntaxe disponível identificação do ParâmetrosNomeDescriçãoObrigatórioReferênciaNenhumRetornocaracter do no gravado no gerado da faixa de numeração do cadastro de Parâmetros Exemplo nos parametros do Conta Sub-conta no titulo em bordero Titulo em bordero Atualiza numero do titulo no do no

Producto:

Microsiga Protheus

VersõesVersiones:

Todas

Ocurrencia:

NOSSONUM - Número

disponible para

identificación del título-

Nuestro Número

Instrucciones:

Retorna o próximo número disponível para identificação do titulo, de acordo com a faixa de numeração fornecida pelo banco.
Esta função é utilizada quando os boletos são impressos pela empresa e há necessidade de informar a numeração dos boletos no arquivo de remessa CNAB.

Devuelve el siguiente número disponible para identificar el título, de acuerdo con el rango de numeración proporcionada por el banco.

Esta función se utiliza cuando la empresa imprime las boletas y existe la necesidad de informar la numeración de las boletas en el archivo de remesa CNAB.

Sintaxis

:

NOSSONUM() - Número

disponible para

identificar el título ( [Nil] ) --> cNumBco

Parámetros/Elementos:

Nombre

Tipo

Descripción

Obligatorio

Referencia

Nil

Nulo

Ninguno



Devolución:

cNumBco (

carácter)

  • Número
  • del título
  • en el banco,
  • grabado en el campo E1_NUMBCO,
  • generado a partir
  • del rango de numeración del registro de parámetros de Banco (SEE).

Ejemplo:

#include "rwmake.ch"

User Function E1NUMBCO()

Local cNumBco := ""// Posiciona

en los parámetros del banco

SEE->( dbSetOrder( 1 ) )
SEE->( MsSeek( xFilial( "SEE" ) + "341" + "001 " + "001 " + "001" ) )// Banco / Agencia /

Cuenta /

Subcuenta
// Posiciona

en el título en borderó
SE1->( dbSetOrder( 1 ) )
SE1->( MsSeek( xFilial( "SE1" ) + "PRF" + "000000001" + " " + "NF " ) )//

Título en borderó

If !Empty( SE1->E1_NUMBOR ) //

Actualiza número del título en el banco
cNumBco := NossoNum()
Aviso( "NOSSONUM", "Número

del título

en el banco: " + cNumBco, { "Ok" }, 3 )
EndIf
Return .T.