01. DATOS GENERALES

Línea de producto:

Línea Protheus

Segmento:

Backoffice

Módulo:

TOTVS Backoffice (Línea Protheus) - Financiero (SIGAFIN)

Función:

finxspd1601 - Extractor registro 1601 - EFD ICMS/IPI

Requisito/Story/Issue:

No existe

02. DESCRIPCIÓN

El punto de entrada F160GRV, permite la edición de los registros existentes en la tabla temporal al final de todo procesamiento de búsqueda de 1601 - EFD ICMS/IPI.

03. PARÁMETROS

Nombre

Tipo

Descripción

cAliasTmp

Carácter

Alias de la tabla temporal con los datos enviados a EFD ICMS/IPI

04. ESTRUCTURA TABLA TEMPORAL


Campo

Tipo

Descripción

Obligatorio

REGIME

Carácter

Identifica si el registro es referente a la Inclusión (VIGENCIA) o pago (CAJA)

CARTEIRA

Carácter

Identifica si el registro es cobrar (R) o pagar (P)

BANCO

Carácter

Código banco, agencia y cuenta

CNPJBCO

Carácter

RCPJ de la Institución financiera portadora de la cobranza o pago.

No

FILORIG

Carácter

Sucursal de origen del movimiento

DT_EMISSAO

Fecha

Fecha de emisión del registro

ORIGEM

Carácter

Rutina de origen del registro

PREFIXO

Carácter

Prefijo del título.

NUMERO

Carácter

Número del título

PARCELA

Carácter

Cuota del título

TIPO

Carácter

Tipo del título

SITUACAO

Carácter

Situaciones de cobranza

NO

SALDO

Numérico

Saldo del título

NO

MOEDA

Numérico

Moneda del título

TXMOEDA

Numérico

Tasa de la moneda

NO

IDDOC

Carácter

Id del título (FK7_IDDOC)

CLIFOR

Carácter

Código del cliente o proveedor

LOJA

Carácter

Tienda del cliente o proveedor

CODBAR

Carácter

Código de barras

NO

INTERMED

Carácter

Código de la institución intermediadora (F1_CODA1U o F2_CODA1U)

NO

VALOR

Numérico

Valor del título o pago

DT_BAIXA

Fecha

Fecha de la baja o pago

No

MOTBX

Carácter

Motivo de la baja

MODELO

Carácter

Modelo del borderó por pagar (EA_MODELO)

NO

IDBAIXA

Carácter

Id de la baja (FK1_IDFK1 o FK2_IDFK2)

NO

FORMA_PGTO

Carácter

Forma de pago

05. EJEMPLO DE UTILIZACIÓN

F160GRV
#include 'protheus.ch'
  
/*/{Protheus.doc} F160GRV() 
  
    Punto de entrada para edición de los registros enviados al registro 1601 EFD ICMS/IPI.
      
    @param ParamIxb[1] - cAlias de la tabla temporal para edición de los registros 1601
    @return Nil
/*/
  
User Function F160GRV()
  
    Local cAliastmp  := ParamIXB[1] //alias de la tabla temporal
 
    (cAliasTmp)->(DbGoTop())
 
    While (cAliasTmp)->(!Eof())
 
        If AllTrim((cAliasTmp)->MOTBX) == 'NOR' .And. AllTrim((cAliasTmp)->FORMA_PGTO) == 'BOL'
            RecLock(cAliasTmp, .F.)
                (cAliasTmp)->REGIME := 'VIGENCIA'
            (cAliasTmp)->(MsUnlock())
        EndIf
        (cAliasTmp)->(DbSkip())
 
    EndDo
   
Return Nil