Versões comparadas

Chave

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

...

Agregar la funcionalidad de Preliquidación de granos para con la necesidad de poder generar LPG/LSG.


La solución contiene los fuentes:

FISA828.PRW


02. EJEMPLO DE UTILIZACIÓN

Configuraciones previas:

  • Tener remitos de tipo de liquidación de granos. - Campo D1/D2_LIQGR informado.
    • "0" - Pendiente de preliquidación.
    • "1" - Preliquidación parcial.
    • "2" - Preliquidación final.
    • "3" - Preliquidación total.


Pagar

Parcial o Total

  1. Incluir una nueva preliquidación.
  2. Seleccionar los parámetros de la preliquidación:
    1. ¿Especie? - Pagar.
    2. ¿Liquidación? - Primaria.
    3. ¿Tipo? - Seleccionar "Parcial" o "Total".
  3. Seleccionar los parámetros del vendedor:
    1. ¿Vendedor? - Seleccionar vendedor.
    2. ¿Tienda? - Seleccionar tienda del vendedor.
  4. Se mostrará una ventana se selección de remitos disponibles para ese vendedor. (Se mostrarán los remitos con estatus pendiente (D1_LIQGR = "0").
  5. Seleccionar el remito a ser utilizado.  (Sólo es permitida la selección de un registro).
  6. Verificar que los campos provenientes son informados en la preliquidación para el vendedor.
  7. Informar todos los campo obligatorios del encabezado de la preliquidación.
  8. Informar las pestañas
    1. Carpeta de certificado de deposito. *Informar en caso que el campo Inf. Certific. (NJC_INFCER) sea informado como "Sí".
    2. Operaciones/Deducciones.
      1. El primer ítem tiene que ser informado como "Operación", sólo el primer ítem puede ser informado como "Operación".
      2. En caso de contener deducciones serán informadas a partir del segundo ítem como "Deducción.
  9. Se confirma la inclusión.
  10. Verificar que el campo D1_LIQGR del remito sea actualizado.
    1. "1" en caso de haber realizado una preliquidación parcial.
    2. "2" en caso de haber realizado una preliquidación total.


Final

  1. Incluir una nueva preliquidación.
  2. Seleccionar los parámetros de la preliquidación:
    1. ¿Especie? - Pagar.
    2. ¿Liquidación? - Primaria.
    3. ¿Tipo? - Seleccionar "Final".
  3. Seleccionar los parámetros del vendedor:
    1. ¿Vendedor? - Seleccionar vendedor.
    2. ¿Tienda? - Seleccionar tienda del vendedor.
  4. Se mostrará una ventana se selección de remitos disponibles para ese vendedor. (Se mostrarán los remitos con estatus pendiente (D1_LIQGR = "1").
  5. Seleccionar el remito a ser utilizado.  (Sólo es permitida la selección de un registro).
  6. Verificar que los campos provenientes son informados en la preliquidación para el vendedor.
  7. Informar todos los campo obligatorios del encabezado de la preliquidación.
  8. Informar las pestañas
    1. Carpeta de certificado de deposito. *Informar en caso que el campo Inf. Certific. (NJC_INFCER) sea informado como "Sí".
    2. Operaciones/Deducciones.
      1. El primer ítem tiene que ser informado como "Operación", sólo el primer ítem puede ser informado como "Operación".
      2. En caso de contener deducciones serán informadas a partir del segundo ítem como "Deducción.
  9. Se confirma la inclusión.
  10. Verificar que el campo D1_LIQGR del remito sea actualizado igual a "2".

Recibir

Parcial o Total

  1. Incluir una nueva preliquidación.
  2. Seleccionar los parámetros de la preliquidación:
    1. ¿Especie? - Recibir.
    2. ¿Liquidación? - Secundaria.
    3. ¿Tipo? - Seleccionar "Parcial" o "Total".
  3. Seleccionar los parámetros del comprador:
    1. ¿Vendedor? - Seleccionar comprador.
    2. ¿Tienda? - Seleccionar tienda del comprador.
  4. Se mostrará una ventana se selección de remitos disponibles para ese comprador. (Se mostrarán los remitos con estatus pendiente (D2_LIQGR = "0").
  5. Seleccionar el remito a ser utilizado.  (Sólo es permitida la selección de un registro).
  6. Verificar que los campos provenientes son informados en la preliquidación para el comprador.
  7. Informar todos los campo obligatorios del encabezado de la preliquidación.
  8. Informar las pestañas
    1. Carpeta de certificado de deposito. *Informar en caso que el campo Inf. Certific. (NJC_INFCER) sea informado como "Sí".
    2. Operaciones/Deducciones.
      1. El primer ítem tiene que ser informado como "Operación", sólo el primer ítem puede ser informado como "Operación".
      2. En caso de contener deducciones serán informadas a partir del segundo ítem como "Deducción.
  9. Se confirma la inclusión.
  10. Verificar que el campo D2_LIQGR del remito sea actualizado.
    1. "1" en caso de haber realizado una preliquidación parcial.
    2. "2" en caso de haber realizado una preliquidación total.


Final

  1. Incluir una nueva preliquidación.
  2. Seleccionar los parámetros de la preliquidación:
    1. ¿Especie? - Recibir.
    2. ¿Liquidación? - Secundaria.
    3. ¿Tipo? - Seleccionar "Final".
  3. Seleccionar los parámetros del comprador:
    1. ¿Vendedor? - Seleccionar comprador.
    2. ¿Tienda? - Seleccionar tienda del comprador.
  4. Se mostrará una ventana se selección de remitos disponibles para ese comprador. (Se mostrarán los remitos con estatus pendiente (D2_LIQGR = "1").
  5. Seleccionar el remito a ser utilizado.  (Sólo es permitida la selección de un registro).
  6. Verificar que los campos provenientes son informados en la preliquidación para el comprador.
  7. Informar todos los campo obligatorios del encabezado de la preliquidación.
  8. Informar las pestañas
    1. Carpeta de certificado de deposito. *Informar en caso que el campo Inf. Certific. (NJC_INFCER) sea informado como "Sí".
    2. Operaciones/Deducciones.
      1. El primer ítem tiene que ser informado como "Operación", sólo el primer ítem puede ser informado como "Operación".
      2. En caso de contener deducciones serán informadas a partir del segundo ítem como "Deducción.
  9. Se confirma la inclusión.
  10. Verificar que el campo D2_LIQGR del remito sea actualizado igual a "2".

03. Regla de negocio.

Sólo son considerados los remitos con contenido en el campo D1/D2_LIQGR.

  • "0" - Pendiente de preliquidación.
  • "1" - Preliquidación parcial.
  • "2" - Preliquidación final.
  • "3" - Preliquidación total.

Preliquidación pagar.

  • Al seleccionar seleccionar la especie Pagar, unicamente se puede realizar una liquidación primaria.
  • Los parametros del vendedor son seleccionador de los proveedores.
  • Una vez seleccionado el remito serán informados los campos correspondientes a la pestaña "Vendedor"

Preliquidación recibir.

  • Al seleccionar seleccionar la especie Recibir, unicamente se puede realizar una liquidación secundaria.
  • Los parámetros del comprador son seleccionador de los clientes.
  • Una vez seleccionado el remito serán informados los campos correspondientes a la pestaña "Comprador"


Pestaña de certificado.

  • Estará activa mientras el campo Inf. Certific. (NJC_INFCER) sea informado como "Sí".


Pestaña Operaciones/Deducciones.

  • El primer ítem tiene que ser de tipo "Operación" y unicamente puede haber un ítem de este tipo.
  • Los ítems de tipo "Deducción" tienen que ser a partir del segundo ítem.


Actualización de remito.

  • Al realizar un remito "Parcial".
    • El campo  D1/D2_LIQGR deberá tener valor "0" y al finalizar la inclusión será actualizado a "1".
  • Al realizar un remito "Final".
    • El campo  D1/D2_LIQGR deberá tener valor "1" y al finalizar la inclusión será actualizado a "2".
  • Al realizar un remito "Total".
    • El campo  D1/D2_LIQGR deberá tener valor "0" y al finalizar la inclusión será actualizado a "3".


04. Diccionario de datos.


SIX - Indices


IndiceOrdenClaveDescripción
NJC1NJC_FILIAL+NJC_CODLIQLiquidación
NL31NL3_FILIAL+NL3_CODLIQ+NL3_CODCETLiquidación + Certificado
NL41NL4_FILIAL+NL4_CODLIQ+NL4_ITEMLiquidación + Ítem


SX1 - Preguntas

FISA828
OrdenPreguntaTipoTamañoDecimalObjetoConsultaPreseleccionItem 1Item 2Item 3
1EspecieCarácter10Combo
1PagarRecibir
2LiquidaciónCarácter10Combo
1PrimariaSecundaria
3TipoCarácter10Combo
1ParcialFinal Total
FISA828A
OrdenPreguntaTipoTamañoDecimalObjetoConsultaPreseleccionItem 1Item 2Item 3
1VendedorCarácter60EditProveedor (SA2)



2TiendaCarácter20EditTda. Proveedor



FISA828B
OrdenPreguntaTipoTamañoDecimalObjetoConsultaPreseleccionItem 1Item 2Item 3
1CompradorCarácter60EditCliente (SA1)



2TiendaCarácter20EditTda. Cliente




SX2 - Tablas

TablaNombreModo filialModo unidadModo empresaUnico
NJCLiquidac. Cetificac. de CPCompartidoCompartidoCompartidoNJC_FILIAL+STR(NJC_CODLIQ)
NL3Certificados por LPGExclusivoExclusivoExclusivoNL3_FILIAL+NL3_CODLIQ
NL4Deducciones y operacionesExclusivoExclusivoExclusivoNL4_FILIAL+NL4_CODLIQ


SX3 - Campos

NJC
CampoTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhen
NJC_FILIAL


FilialFilial
1








NJC_CODLIQC120LiquidaciónLiquidación
1@!
SiVRSi
GETSXENUM("NJC","NJC_CODIGO")
NJC_CUITEMC110CUIT Emisor CUIT Emisor 
1@R 99-99999999-9
SiVV

SM0->M0_CGC
NJC_COMPROC100COEComprobante (COE)        
1@!
SiVR



NJC_DTAAUTD80Fch. AutorizFecha autorización       
1

SiVR



NJC_EMISSAD80Fch Emision Fch Emision              
1

SiVR

ddatabase
NJC_PTOEMIC60Pto. De Emis
CFH1@!
SiARSi


NJC_CODCTRC60ContratoCódigo del Contrato      
1@!
SiAR



NJC_PROPROC60LocalidadLocalidad de Proced.     S11@!ExistCpo("SX5","S1"+M->NJC_PROPRO)SiARSi


NJC_PROVENC20ProvinciaProvincia    121@!ExistCpo("SX5","12"+M->NJC_PROVEN)SiARSi


NJC_TIPOC10TipoTipo de liquidación
1@!Pertence("123")SiVR
1=Parcial;2=Total;3=Final

NJC_ESPLIQC10EspecieEspecie liquidación
1@!Pertence("12")SiVR
1=Pagar;2=Recibir

NJC_TPLIQC10Liquidación

1@!Pertence("12")SiVR
1=Primaria;2=Secundaria

NJC_OPERACC20OperaciónOperación
2@!Pertence("12")SiAR
1=Compraventa;2=Consignacion de granos1'
NJC_TIPLIQC10¿Prod. Prop?¿Produccion Propia? 
2@!Pertence("12")SiAR
1=Si;2=No;                                                    
M->NJC_OPERAC=="1"
NJC_INFCERC10Inf. CertificInf.Certific             
2@!Pertence("12")SiAR
1=Si;2=No;  1'M->NJC_OPERAC=="1"
NJC_TROCA C10¿Es Canje?¿Es Canje?
2@!Pertence("123")SiAR
1=No;2=Canje parcial;3=Canje total;1'M->NJC_OPERAC=="1" .and. M->NJC_TIPLIQ=='2'                
NJC_PROD  C150ProductoProducto
2@!
SiAR



NJC_NOMPROC400Desc. Prod.Descrip. Producto        
2@!
SiVR

POSICIONE("SB1", 1, XFILIAL("SB1") + NJC_PROD, "B1_DESC")
NJC_REMITOC120RemitoNumero de Remito
2@!
SiVR



NJC_ITREMC40Item RemitoItem Remito
2@!
SiVR



NJC_ESPECIC30EspecieEspecie
2@!
SiVR

IIF(!INCLUI,POSICIONE("SB1",1,XFILIAL("SB1")+NJC->NJC_PROD,"B1_CODESP"),"")
NJC_DESESPC300Desc EspecieDesc Especie             
2@!
SiVR

IIF(!INCLUI,POSICIONE("SX5",1,XFILIAL("SX5")+"W2"+POSICIONE("SB1",1,XFILIAL("SB1")+NJC->NJC_PROD,"B1_CODESP"),"X5_DESCSPA"),"") 
NJC_CODPROC60Cod. CompradCodigo de comprador
3@!
SiVR



NJC_TIENDAC20Tienda ComTienda Comprador
3@!
SiVR



NJC_CUITCOC110CUIT comp.CUIT comprador           
3@R 99-99999999-9
SiVR



NJC_NOMCOMC300CompradorComprador
3@!
SiVR



NJC_NROIB C110Nro. Ingr. BNro. Ingr. Brut.         
3@!
SiVR



NJC_VENDEDC60VendedorVendedor
4@!
SiVR



NJC_LOJAVEC20Tienda VendTienda Vendedor          
4@!
SiVR



NJC_NOMVEDC300Nombr Vend.Nombre vendedor          
4@!
SiVR



NJC_CUITVEC110CUIT VendedoCUIT Vendedor            
4@R 99-99999999-9
SiVR



NJC_NROIBVC110Nro. Ingr. BNro. Ingr. Brut.         
4@!
SiVR



NJC_ACTCORC10Actua Corredor?

5@!
SiAR
1=Si;2=No;                                                    

NJC_LIQCORC10Liq. Corredor?

5@!
SiAR
1=Si;2=No;                                                    

NJC_CORREDC60Cod. CorredorCodigo de corredorSA2A5@!
SiAR



NJC_LOJCORC20Tda CorredorTienda Corredor
5@!
SiAR



NJC_CUITCRC110CUIT Corred.CUIT Corredor         
5@R 99-99999999-9
SiVR



NJC_NOMCORC300Nomb Corred.Nomb Corredor
5@!
SiVR



NJC_NOIBCR C110Nro. Ingr. BNro. Ingr. Brut.         
5@!
SiVR



NJC_PRECO N123Prec. Refer.Precio referencia
6@E 9.999
SiAR



NJC_DATAFPD80Fch. Fij. OpFecha fijación operación
6

SiAR



NJC_PORTO C40PuertoPuertoU56@!ExistCpo("SX5","U5"+M->NJC_PORTO)SiARSi
14'
NJC_NOMEPOC400Nomb PuertoNomb Puerto              
6@!
SiVR



NJC_GDOREFC2
Grado Ref. EGrado Ref. Ent           
6@!
SiAR
G1=Grado 1;G2=Grado 2;G3=Grado3; 

NJC_FRETE N122Prec Flete TPrec Flete TN            
6@E 999,999,999.99
SiAR



NJC_PESSCEN162P. Neto s/CeP. Neto s/Cert           
6@E 9,999,999,999,999.99
SiVR



NJC_CODSAFC150Campaña PpalCampaña Ppal.NJU6@!
SiAR



NJC_CODSFPC5
Desc ConsechaDesc Consecha
6@!
SiVR



NJC_CODPGOC50Cond PagoCond PagoSE46@!ExistCpo("SE4")SiAR



NJC_FACTORN73FactorFactor
7@E 999.999
SiAR



NJC_CONPRON73Cont. Protei.Cont. Proteico           
7@E 999.999
SiAR



NJC_STATUSC20StatusStatus

@!
SiAR
1=Pendiente;2=Autorizada;3=Anulada

NJC_DOC   C200No. FacturaNumero de Factura

@!
SiAR



NJC_SERIE C30SerieSerie

@!
SiAR



NL3
CampoTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhen
NL3_FILIALC

FilialFilial










NL3_TIPLIQC10Tipo certificadoTipo de Certificado

@!

AR
1=F1116/RT ; 2=F1116/A

NL3_CODCETC100Cert.Depos.Certificado de DepositoNJA001
@!ExistCpo("NJA") SiAR


FUNNAME() == "FISA828" .AND. M->NJC_INFCER=="1"
NL3_CODLIQC120LiquidaciónLiquidación

@!
SiARSi
IIF(INCLUI,M->NJC_CODLIQ,NJC->NJC_CODLIQ)
NL3_CODSAFC100CampanaCampana

@!
SiAR



NL3_COECERC100CEO CertCEO Certificado

@!
SiVV



NL3_DATAD80Fecha CierreFecha de cierre



SiAR



NL3_LOCPROC60Loc. Proc.Localidad de procedenciaS1
@!
SiVR



NL3_PESNETN82Pes Net KgPeso Neto en Kg

@E 99,999.99
SiAR



NL3_PROPROC60Prov. Proc.Provincia de procedencia12
@!
SiVR



NL4
CamposTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhen
NL4_FILIALC

FilialFilial










NL4_CODLIQC120LiquidaciónLiquidación

@!
SiAR

IIF(INCLUI,M->NJC_CODLIQ,NJC->NJC_CODLIQ) 
NL4_CODTESC60Cod. TESCodigo TESSF4
@!
SiAR



NL4_DESTESC300Desc. TESDescripcion TES

@!
SiVR

IIF(!INCLUI,POSICIONE("SF4",1,XFILIAL("SF4")+NL4->NL4_CODTES,"F4_TEXTO"),"")                                                    
NL4_DETALLM100DetalleDetalle



SiAR



NL4_DIAALMN40Dias AlmacenDias de almacenamiento

@E 9,999
SiAR



NL4_QUANTN112CantidadCantidad

@E 99,999,999.99
SiAR



NL4_IMPORTN112ImporteImporte

@E 99,999,999.99
SiAR



NL4_ITEMC60ItemItem

@!
SiARSi


NL4_PORCENN42PorcentajePorcentaje

@E 9.99
SiAR



NL4_PRECION122Precio KgPrecio por Kg

@E 999,999,999.99
SiAR



NL4_TIPDEDC10Tp.DeduccionTipo de deducción

@!PERTENCE("12") SiARSi1=Sellado;2=Registracion;
FISA828ActDed(M->NL4_TIPO) 
NL4_TIPOC10Tp. de ItemTipo de Item

@!PERTENCE("12") SiARSi1=Operacion;2=Deduccion;

SB1
CampoTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhen
B1_CODESPC50Cod. EspecieCódigo de EspecieSU









SD1
CampoTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhen
D1_LIQGRC10Liq Granos  Liquidacion de granos    

@!                                           Vazio() .or. Pertence('0123')






SD2
CampoTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhen
D2_LIQGRC10Liq Granos  Liquidacion de granos    

@!                                           Vazio() .or. Pertence('0123')






SF1
CampoTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhen
F1_LIQGRC10Liq Granos  Liquidacion de granos    

@!                                           Vazio() .or. Pertence('0123')






SF2
CampoTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhen
F2_LIQGRC10Liq Granos  Liquidacion de granos    

@!                                           Vazio() .or. Pertence('0123')







SX5 - Tablas genericas


SU - Tipos de grano
CódigoDescripción
1Lino
2Girasol
3Maní en caja
5Maní para industria de selecci
6Maní para industria aceitera
7Maní tipo confitería
8Colza
9Colza "00"/Canola
10Trigo forrajero
11Cebada forrajera
12Cebada apta para maltería
14Trigo candeal
15Trigo pan
16Avena
17Cebada cervecera
18Centeno
19Maíz
20Mijo
21Arroz cáscara
22Sorgo granífero
23Soja
24Trigo blando
25Trigo plata
26Maíz flynt o plata
27Maíz pisingallo
28Triticale
30Alpiste
31Algodón
32Cártamo 
33Poroto blanco natural oval y
34Poroto distinto del blanco o
35Arroz 
46Lenteja 
47Arveja 
48Poroto blanco seleccionado o
49Otras legumbres 
50Otros granos 
59Garbanzo
U5 - Puertos
CódigoDescripción
1SAN LORENZO/SAN MARTIN
2ROSARIO
3BAHIA BLANCA
4NECOCHEA
5RAMALLO
6LIMA
7DIAMANTE
8BUENOS AIRES
9SAN PEDRO
10SAN NICOLAS
11TERMINAL DEL GUAZU
12ZARATE
13VILLA CONSTITUCION
14OTROS

05. TABLAS UTILIZADAS

  • SA1 - Clientes.
  • SA2 - Proveedores.
  • SB1 - Productos.
  • SD1 - Items de notas fiscales de entrada.
  • SD2 - Items de notas fiscales de salida.
  • SF1 - Encabezado de notas fiscales de entrada.
  • SF2 - Encabezado de notas fiscales de salida.
  • SF4 - Tipos de entradas y salidas (TES).
  • SFC - Items de TES.
  • SE4 - Naturaleza.
  • NJC - Liquidac. Cetificac. de CP.
  • NL3 - Certificados por LPG.
  • NL4 - Deducciones y operaciones.
  • SX5 - Tablas genericas.