Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas

ÍNDICE

01. VISIÓN GENERAL

El punto de entrada F200VAR permite el manejo de las informaciones (variables) en la devolución del Cnab por Cobrar (FINA200). 

Este punto de entrada se llama en la función fA200Ger, inmediatamente después de la carga de los datos del archivo de devolución para las variables de control, y antes de efectuar la baja mediante el execauto. 

Importante

El comportamiento del punto de entrada F200VAR es igual al punto de entrada 200GEMBX.

02. EJEMPLO DE UTILIZACIÓN


F200VAR
#INCLUDE "PROTHEUS.CH"

//-------------------------------------------------------------------------------
/*/{Protheus.doc} F200VAR
Manejar las informaciones (variables) en la devolución del Cnab por cobrar (FINA200). 

@PARAMIXB aDados[1] = Número del título    | Variable de origen: cNumTit
          aDados[2] = Fecha de la baja       | Variable de origen: dBaixa
		  aDados[3] = Tipo del título 	  | Variable de origen: cTipo
		  aDados[4] = Nuestro número 		  | Variable de origen: cNsNum
          aDados[5] = Valor del gasto    | Variable de origen: nDespes
          aDados[6] = Valor del descuento   | Variable de origen: nDescont
          aDados[7] = Valor de la rebaja | Variable de origen: nAbatim
          aDados[8] = Valor cobrado  	  | Variable de origen: nValRec
          aDados[9] = Intereses 			  | Variable de origen: nJuros
          aDados[10] = Multa 			  | Variable de origen: nMulta
          aDados[11] = Otros gastos    | Variable de origen: nOutrDesp
          aDados[12] = Valor del crédito   | Variable de origen: nValCc
          aDados[13] = Fecha del crédito    | Variable de origen: dDataCred
          aDados[14] = Ocurrencia         | Variable de origen: cOcorr
          aDados[15] = Motivo del banco    | Variable de origen: cMotBan
          aDados[16] = Linea entera      | Variable de origen: xBuffer
          aDados[17] = Fecha de vencimiento | Variable de origen: dDtVc

/*/
//-------------------------------------------------------------------------------

User Function F200VAR()

    Local aDados     := PARAMIXB
    Local aAreaSE1	 := SE1->(GetArea())
    Local cNumTitulo := Alltrim(Paramixb[1][1])
    Local nValLiq    := 0

    dbSelectArea("SE1")                
    SE1->( dbSetOrder(16) )         
    cChave := SE1->(dbSeek(xFilial("SE1")+cNumTitulo))
       
    If SE1->E1_DECRESC > 0
        //Ajusta el valor de la baja de títulos con disminución, para que el saldo sea dado de baja integralmente
        nValLiq := nValRec + SE1->E1_DECRESC
        nAbatim += SE1->E1_DECRESC
        If nValRec < nValLiq	
            nValRec := nValLiq
        EndIf	
        
    EndIf
    
    RestArea(aAreaSE1)

Return(aDados)

03. PARÁMETROS

El punto de entrada recibe la variable PARAMIXB en forma de array con la siguiente estructura:

Posición

Descripción

Variable de origen

1

Número del título   

cNumTit

2

Fecha de la baja      

dBaixa

3

Tipo del título 

cTipo

4

Nuestro número 

cNsNum

5

Valor del gasto   

nDespes

6

Valor del descuento  

nDescont

7

Valor de la rebaja

nAbatim

8

Valor cobrado  

nValRec

9

Intereses 

nJuros

10

 Multa 

nMulta

11

 Otros gastos   

nOutrDesp

12

 Valor del crédito  

nValCc

13

 Fecha del crédito   

dDataCred

14

 Ocurrencia        

cOcorr

15

 Motivo del banco (EB_MOTBAN)   

cMotBan

16

 Línea completa     

xBuffer

17

 Fecha de vencimiento

dDtVc

04. RESPUESTA

Debe devolver una variable del tipo ARRAY con la misma estructura del parámetro PARAMIXB.


Importante

Durante el procesamiento de la rutina,  después de salir del punto de entrada F200VAR, su array de devolución también se transfiere por parámetro a otros puntos de entrada.

Por lo tanto, si modificara el contenido de variables dentro del punto de entrada F200VAR, evalúe si la variable modificada también fue debidamente actualizada en el array de devolución para no impactar a los otros puntos de entrada.

Puntos de entrada que pueden ser impactados: F200AVL, FA200POS y FA200FIL.