Linha Microsiga Protheus

Árvore de páginas

Carregando...
Tempo aproximado para leitura: 8 minutos

01. DATOS GENERALES

Producto:

TOTVS Backoffice

Línea de producto:

Línea Protheus

Segmento:

Servicios

Módulo:SIGAFIN - Financiero
Función:
RutinaNombre TécnicoFecha
COLLECTOR.SERVICE.TLPPService del servicio de cobradores14/02/2022



País:Todos (Mercado Internacional)
Ticket:
Requisito/Story/Issue (informe el requisito vinculado):

DMINA-14277

DMINA-15056


02. DESCRIPCIÓN

Se necesita crear un punto de entrada en el cual permita llenar el campo del Cobrador cuando seleccione el código del cliente, con el Cobrador que tiene asociado en Clientes X Cobrador.

Se crea el punto de entrada F998NRDCOB en la rutina collector.service.tlpp del servicio de cobradores, con el objetivo de que el usuario al seleccionar el Cliente en Nuevo Recibo se coloque el Cobrador que tiene asignado en la rutina de Clientes X Cobrador.


03. INFORMACIÓN ADICIONAL


  1. Realizar un respaldo del repositorio (RPO).
  2. Realizar la aplicación del parche correspondiente al issue DMINA-14277.
  3. Validar que las rutinas actualizadas en el repositorio, coincidan con las descritas en el encabezado del presente Documento Técnico, así como las fechas.

  1. Crear la función de usuario F998NRDCOB para el cual permita llenar el campo del Cobrador cuando seleccione el código del cliente.

  2. La función debe retornar el código de cobrador.
  3. Dentro del módulo Financiero ejecutar la rutina TOTVS Recibo (Actualizaciones | Cuentas por cobrar | TOTVS Recibo).
  4. Dentro del aplicativo de TOTVS Recibo, ir a Nuevo Recibo.
  5. Al seleccionar el cliente se ejecutará el punto de entrada F998NRDCOB .
  6. La función de usuario retornará el cobrador correspondiente y se colocará en el box de cobrador.
DescripciónActualizaciones
Punto de entrada:

F998NRDCOB

Nombre del programa fuente:COLLECTOR.SERVICE.TLPP
Parámetros recibidos:



NombreTipoDescripción
PARAMIXB[1]CCliente seleccionado.
PARAMIXB[2]CTienda del cliente seleccionado.



Respuesta:



NombreTipoDescripciónObligatorio
cCobradorCRetorna el Cobrador que será colocado en el box del cobrador.Si



Ejemplo:

Ejemplo Expandir origem 
#Include 'Protheus.ch'

User Function F998NRDCOB()
Local cCobrador := ""
Local cClient := Paramixb[1]
Local cLoja := Paramixb[2]

dbselectarea("SAR")
("SAR")->(dbGoTop())

    While ("SAR")->(!eof())
        If  xFilial("SAR")== SAR->AR_FILIAL .AND. cClient == SAR->AR_CODCLI .AND. cLoja == SAR->AR_LOJCLI
             cCobrador :=AR_CODCOBR
        EndIf
        ("SAR")->(dbskip())
    EndDo

("SAR")->(dbCloseArea())

Return cCobrador


¡IMPORTANTE!

La presente solución aplica para versión 12.1.33 o superior, siempre y cuando se tengan las rutinas actualizadas a la fecha de la expedición del issue.

04. ASUNTOS RELACIONADOS