Versões comparadas

Chave

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

...

  1. Visión general
  2. Ejemplo de utilización
  3. Regla de negocio.
  4. Diccionario de datos.
  5. Menu
  6. Tablas


01. VISIÓN GENERAL

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

FISA832.PRW

Nota
titleImportante

 La funcionalidad Liquidación de granos del módulo Fiscal quedará descontinuada el 01/07/2024,  para mayor detalle consultar el siguiente enlace:

https://centraldeatendimento.totvs.com/hc/pt-br/articles/18371290987543-Aviso-de-descontinuaci%C3%B3n-de-Liquidaci%C3%B3n-de-granos-L%C3%ADnea-Protheus



02. EJEMPLO DE UTILIZACIÓN

...

  • 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

          • Para las preliquidaciones a pagar se debe tener informado el campo D1_TPLIQ.
            • "1" - Primarias.
            • "2" - Secundarias.
      • Agregar la rutina "Tipos de Operaciones/Deducciones" (FISA832) al menú.
      • Agregar registros de "Tipos de Operaciones/Deducciones".
        • Contar con al menos un registro de comisión.
        • Contar con al menos un registro de calidad como operación y uno como deducción.

      Pagar

      Parcial o Total - Primaria

      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. 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" y D1_TPLIQ="1").
        5. Seleccionar el remito a ser utilizado.  (Sólo es permitida la selección de un registro).
        6. Verificar que los campos provenientes del remito son informados en la pestaña 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.
            1. Se incluyen 2 líneas nuevas en caso de  ser una parcial, en caso de ser Total se incluye una línea;
              1. Una línea correspondiente a la comisión informada en el campo D1_COMIS1. (Deducción)
              2. Una línea correspondiente a calidad informada en el campo D1_DESPESA. (Deducción) *Sólo aplica en la parcial.
        10. Se confirma la inclusión.
        11. Verificar que el campo D1_LIQGR del remito sea actualizado.
          1. "
          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 - Primaria

        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" y D1_TPLIQ = "1").
        5. Seleccionar el remito a ser utilizado.  (Sólo es permitida la selección de un registro).
        6. Verificar que los campos provenientes del remito son informados en la pestaña 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. Se incluyen 1 línea nueva;
              1. Una línea correspondiente a calidad informada en el campo D1_DESPESA. (Operación)
              En caso de contener deducciones serán informadas a partir del segundo ítem como "Deducción
              1. .
        9. Se confirma la inclusión.
        10. Verificar que el campo D1_LIQGR del remito sea actualizado igual a "2".

        ...



        Parcial o Total - Secundaria.

        1. Incluir una nueva preliquidación.
        2. Seleccionar los parámetros de la preliquidación:
          1. ¿Especie? - RecibirPagar.
          2. ¿Liquidación? - Secundaria.
          3. ¿Tipo? - Seleccionar "Parcial" o "Total".
        3. Seleccionar los parámetros del compradorvendedor:
          1. ¿Vendedor? - Seleccionar compradorvendedor.
          2. ¿Tienda? - Seleccionar tienda del compradorvendedor.
        4. Se mostrará una ventana se selección de remitos disponibles para ese compradorvendedor. (Se mostrarán los remitos con estatus pendiente (D2D1_LIQGR = "0" y D1_TPLIQ="2").
        5. Seleccionar el remito a ser utilizado.  (Sólo es permitida la selección de un registro).
        6. Verificar que los campos provenientes del remito son informados en la pestaña para el compradorvendedor.
        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. Se incluye 1 línea nueva;En caso de contener deducciones serán informadas a partir del segundo ítem como "Deducción.
              1. Una línea correspondiente a la comisión informada en el campo D1_COMIS1. (Deducción)

        9. Se confirma la inclusión.
        10. Verificar que el campo D2D1_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 - Secundaria.

        1. Incluir una nueva preliquidación.
        2. Seleccionar los parámetros de la preliquidación:
          1. ¿Especie? - RecibirPagar.
          2. ¿Liquidación? - SecundariaSecundari.
          3. ¿Tipo? - Seleccionar "Final".
        3. Seleccionar los parámetros del compradorvendedor:
          1. ¿Vendedor? - Seleccionar compradorvendedor.
          2. ¿Tienda? - Seleccionar tienda del compradorvendedor.
        4. Se mostrará una ventana se selección de remitos disponibles para ese compradorvendedor. (Se mostrarán los remitos con estatus pendiente (D2D1_LIQGR = "1" y D1_TPLIQ = "2").
        5. Seleccionar el remito a ser utilizado.  (Sólo es permitida la selección de un registro).
        6. Verificar que los campos provenientes del remito son informados en la pestaña para el compradorvendedor.
        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.
        9. Se confirma la inclusión.
        10. El primer ítem tiene que ser informado como "Operación", sólo el primer ítem puede ser informado como "Operación".
        11. En caso de contener deducciones serán informadas a partir del segundo ítem como "Deducción.
        12. Se confirma la inclusión.
        13. 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.

        ...

        1. 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 del remito son informados en la pestaña 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í".

        ...

          1. 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

            ...

                1. Se incluye 1 líneas nueva;
                  1. Una línea correspondiente a la comisión informada en el campo D1_COMIS1. (Operación)
            1. Se confirma la inclusión.
            2. 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 del remito son informados en la pestaña 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.
            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,
            • Los parámetros del vendedor son seleccionador de los proveedores.
              • Primaria.
                • Se muestran los remitos que con valor "1" en el campo D1_TPLIQ.
              • Secundaria.
                • Se muestran los remitos que con valor "2" en el campo D1_TPLIQ.
            • 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í".


            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
            NJC2NJC_FILIAL+NJC_CODPRO+NJC_TIENDA+NJC_REMITO+NJC_ITREM Comprador + Tienda Com. + Remito + Item Remito
            NJC3NJC_FILIAL+NJC_VENDED+NJC_LOJAVE+NJC_REMITO+NJC_ITREMVendedor + Tienda Vend. + Remito + Item Remito
            NL31NL3_FILIAL+NL3_CODLIQ+NL3_CODCETLiquidación + Certificado
            NL41NL4_FILIAL+NL4_CODLIQ+NL4_ITEMLiquidación + Ítem
            FR81FR8_FILIAL+FR8_CODIGOCódigo


            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
            FR8Operaciones y Deducciones ExclusivoExclusivoExclusivoFR8_FILIAL+FR8_CODIGO


            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_COMPROC120COEComprobante (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=Final;3=Total

            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_SERREMC30Serie Rem. Serie 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

            SX1 - Preguntas

            ...

            SX2 - Tablas

            ...

            SX3 - Campos

            1DTAAUTD1VEMISSAD81VPTOEMIC60@!CODCTR61PROPRO1SX5","12"+M->NJC_PROVENTIPO1Tipo liquidación1Pertence("123")V1=Parcial;2=Final;3=TotalESPLIQC10EspecieEspecie liquidaciónNJC_OPERACOperación2Compraventa=Consignacion de granos1'TIPLIQ1¿Prod Prop?INFCER12SiNOMPROC400LOJAVEC2NJC_NOMVEDC300Nombr Vend. vendedor          4@!SiVRNJC_CUITVEC110CUIT VendedoCUIT Vendedor            NJC_NROIBV11SiNJC_ACTCOR551=;2=No;                                                    NJC_CORRED6NJCLOJCOR2NJCCUITCR11CUIT Corred@R 99-99999999-9NJCNOMCORC300@!VNJCNOIBCR 11Nro Ingr B56VNJCGDOREF6ANJCPESSCE16@E 9,999,999,999,999.99@!NJCCODSFPC5Desc ConsechaDesc Consecha@!VNJCCODPGO5Cond PagoExistCpo("SE4")@9NJCFACTOR73FactorFactor999NJCCONPRON73@E 999.999NJC_STATUS2StatusPendienteAutorizada3=AnuladaDOC   20Numero de Factura@E 9,999,999,999,999.99 NJCTOTDEDN16@E 9,999,999,999,999.99 NJCRETAFI16@E 9,999,999,999,999@E 9,999,999,999,999.99 NJCCREDEBN16@E 9,999,999,999,999.99 NL3
            NJC
            CampoTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhen
            NJC_FILIALFilialFilial1NJC_CODLIQC120LiquidaciónLiquidación1@!SiVRSiGETSXENUM("NJC","NJC_CODIGO")NJC_CUITEMC110CUIT Emisor CUIT Emisor 1@R 99-99999999-9SiVVSM0->M0_CGCNJC_COMPROC100COEComprobante (COE)        @!
            SiVR



            NJC_GDOREFC80Fch. AutorizFecha autorización       2
            Grado Ref. EGrado Ref. Ent           
            6@!
            SiAR
            G1=Grado 1;G2=Grado 2;G3=Grado3; 

            NJC_FRETE N1220Fch Emision Fch Emision              Prec Flete TPrec Flete TN            
            6@E 999,999,999.99
            SiARddatabase



            NJC_PESSCEN162Pto. De EmisCFH1P. Neto s/CeP. Neto s/Cert           
            6@E 9,999,999,999,999.99
            SiAR



            SiNJC_CODSAFC150ContratoCódigo del Contrato      Campaña PpalCampaña Ppal.NJU6@!
            SiAR



            NJC_CODSFPC60LocalidadLocalidad de Proced.     S11@!ExistCpo("SX5","S1"+M->NJC_PROPRO)SiARSiNJC_PROVENC20ProvinciaProvincia    125
            Desc ConsechaDesc Consecha
            6@!
            SiVR



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



            NJC_TESC30TESTipo de Entrada/Salida SF4@!6@9
            SiAR



            NJC_FACTORN73FactorFactor1@!Pertence("12")SiVR1=Pagar;2=RecibirNJC_TPLIQC10Liquidación1@!Pertence("12")SiVR1=Primaria;2=Secundaria
            7@E 999.999
            SiAR



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



            NJC_STATUSC20OperaciónStatusStatus

            @!Pertence("12")
            SiAR
            1=Pendiente;2=Autorizada;3=Anulada

            NJC_DOC   C200No. FacturaNumero de Factura

            ¿Produccion Propia? 2@!Pertence("12")
            SiAR1=Si;2=No;                                                    M->NJC_OPERAC=="1"



            NJC_SERIE C30Inf. CertificInf.Certific             SerieSerie

            @!Pertence("12")
            SiAR1=Si;2=No;  1'M->NJC_OPERAC=="1"NJC_TROCA C10¿Es Canje?¿Es Canje?2@!Pertence("123")SiAR1=No;2=Canje parcial;3=Canje total;1'M->NJC_OPERAC=="1" .and. M->NJC_TIPLIQ=='2'                NJC_PROD  C150ProductoProducto2@!



            NJC_PESTOTN80Peso Total Peso Total

            @E 99,999,999
            NoAR



            NJC_SUBOPEN162SubTtl OperaSubtotal Operación

            @E 9,999,999,999,999.99
            NoAR



            NJC_IMPIVAN162Total IVA Total IVA

            @E 9,999,999,999,999.99
            NoAR



            NJC_OPEIVAN162Desc. Prod.Descrip. Producto        2@!SiVRPOSICIONE("SB1", 1, XFILIAL("SB1") + NJC_PROD, "B1_DESC")NJC_REMITOC120RemitoNumero de Remito2@!SiVRNJC_ITREMC40Item RemitoItem Remito2@!SiVRNJC_ESPECIC30EspecieEspecie2@!SiVRIIF(!INCLUI,POSICIONE("SB1",1,XFILIAL("SB1")+NJC->NJC_PROD,"B1_CODESP"),"")NJC_DESESPC300Desc EspecieDesc Especie             2@!SiVRIIF(!INCLUI,POSICIONE("SX5",1,XFILIAL("SX5")+"W2"+POSICIONE("SB1",1,XFILIAL("SB1")+NJC->NJC_PROD,"B1_CODESP"),"X5_DESCSPA"),"") Tot. Op IVA Total Operación c/IVA

            @E 9,999,999,999,999.99
            NoAR



            NJC_TOTDEDN162Total DeduccTotal Deducciones

            @E 9,999,999,999,999.99
            NoAR



            NJC_RETAFIN162Tot.Ret AFIPTotal Retenciones AFIP

            @E 9,999,999,999,999.99
            NoAR



            NJC_OTRRETN162Tot Otra RetTotal otras retenciones

            @E 9,999,999,999,999.99
            NoAR



            NJC_IMPNAPN162Imp Neto PagImporte neto a pagar

            @E 9,999,999,999,999.99
            NoAR



            NJC_IVARG2N162IVA RG2300 IVA RG2300

            @E 9,999,999,999,999.99
            NoAR



            NJC_PAGSCON162Pag s/CondicPago s/condiciones

            @E 9,999,999,999,999.99
            NoAR



            NJC_CREDEBN162Cred./Deb. Credito/Debito

            @E 9,999,999,999,999.99
            NoAR



            NJC_PROVORC20Prov.Origen Provincia Origen 12
            @!
            SiAR



            NJC_LIQC10LiquidaciónLiquidación



            SiVR
            N=Pre liquidación;S=Liquidación"N"
            NJC_STAFIPC10Estatus AfipEstatus Afip



            NoVR
            1=Activo;2=Anulado

            NJC_COEAJU C120COE AjustadoCOE Ajustado



            NJC_CODPROC60Cod. CompradCodigo de comprador3@!SiVRNJC_TIENDAC20Tienda ComTienda Comprador3@!SiVRNJC_CUITCOC110CUIT comp.CUIT comprador           3@R 99-99999999-9SiVRNJC_NOMCOMC300CompradorComprador3@!SiVRNJC_NROIB C110Nro. Ingr. BNro. Ingr. Brut.         3@!SiVRNJC_VENDEDC60VendedorVendedor4@!SiVR



            NJC_DTTRAND80Tienda VendTienda Vendedor          4@!SiDt. Trans. AfipData Transmissao Afip



            NoVR



            NL3
            CampoTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacao4@R 99-99999999-9SiVRWhen
            NL3_FILIALC

            FilialFilial










            NL3_TIPLIQC10Nro. Ingr. BNro. Ingr. Brut.         4Tipo certificadoTipo de Certificado

            @!

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

            NL3_CODCETC10Actua Corredor?100Cert.Depos.Certificado de DepositoNJA001
            @!ExistCpo("NJA") SiAR1=Si;2=No;                                                    NJC_LIQCORC10Liq. Corredor?


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

            @!
            SiARSi
            IIF(INCLUI,M->NJC_CODLIQ,NJC->NJC_CODLIQ)
            NL3_CODSAFC100Cod. CorredorCodigo de corredorSA2A5CampanaCampana

            @!
            SiAR



            NL3_COECERC100Tda CorredorTienda Corredor5CEO CertCEO Certificado

            @!
            SiVV



            NL3_DATAD80Fecha CierreFecha de cierre



            SiAR



            NL3_LOCPROC60Loc. Proc.CUIT Corredor         5Localidad de procedenciaS1
            @!
            SiVR



            NL3_PESNETN8Nomb Corred.Nomb Corredor52Pes Net KgPeso Neto en Kg

            @E 99,999.99
            SiAR



            NL3_PROPROC60Prov. Proc.Nro. Ingr. Brut.         Provincia de procedencia12
            @!
            SiVRNJC_PRECO N123Prec. Refer.Precio referencia6@E 9.999SiARNJC_DATAFPD80Fch. Fij. OpFecha fijación operación6Si



            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 TESSF4ARNJC_PORTO C40PuertoPuertoU56@!ExistCpo("SX5","U5"+M->NJC_PORTO)SiARSi14'NJC_NOMEPOC400Nomb PuertoNomb Puerto              
            @!
            SiAR



            NL4_DESTESC2Grado Ref. EGrado Ref. Ent           300Desc. TESDescripcion TES

            @!
            SiVRG1=Grado 1;G2=Grado 2;G3=Grado3; 

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



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



            NL4_DIAALMN42P. Neto s/CeP. Neto s/Cert           60Dias AlmacenDias de almacenamiento

            @E 9,999
            SiARNJC_CODSAFC150Campaña PpalCampaña Ppal.NJU6



            NL4_QUANTN112CantidadCantidad

            @E 99,999,999.99
            SiAR



            NL4_IMPORTN112Importe6Importe

            @E 99,999,999.99
            SiAR



            NL4_ITEMC60ItemCond PagoSE46Item

            @!
            SiARNJC_TESC30TESTipo de Entrada/Salida SF46Si


            NL4_PORCENN42PorcentajePorcentaje

            @E 9.99
            SiAR



            NL4_PRECION122Preci
            Precio
            7

            @E 999,999,999.99
            SiAR



            NL4_TIPDEDC30Cont. Protei.Cont. Proteico           7Tp. OP./Ded.Tipo Operação/DeduçãoFR8
            @!
            SiARR


            FISA828ActDed(M->NL4_TIPO) 
            NL4_TIPOC10StatusTp. de ItemTipo de Item

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

            NL4_DESCC300No. FacturaDescripciónDescripción

            @!
            SiARNJC_SERIE C30SerieSerie@!SiARNJC_PESTOTN80Peso Total Peso Total @E 99,999,999NoARNJC_SUBOPEN162SubTtl OperaSubtotal Operación @E 9,999,999,999,999.99 NoARNJC_IMPIVAN162Total IVA Total IVA @E 9,999,999,999,999.99 NoARNJC_OPEIVAN162Tot. Op IVA Total Operación c/IVA



            NL4_TIPAJUC10Tipo AjusteTipo Ajuste



            SiAR
            1=Ajuste débito;2=Ajuste crédito

            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')NoAR



            D1_COELQ  C122Total DeduccTotal Deducciones 0COE Cert. Certificado COE

            @!   
            NoAR



            D1_COMIS1 N52Tot.Ret AFIPTotal Retenciones AFIP Comision 1 Porcentaje de Comision 1

            @E 99.99
            NoAR



            NJCD1_OTRRETTPLIQ NC1612Tot Otra RetTotal otras retenciones @E 9,999,999,999,999.99 0Tipo Liq. Tipo de Liquidación



            NoARNJC_IMPNAPN162Imp Neto PagImporte neto a pagar @E 9,999,999,999,999.99 NoARNJC_IVARG2N162IVA RG2300 IVA RG2300 @E 9,999,999,999,999.99 NoARNJC_PAGSCON162Pag s/CondicPago s/condiciones
            1=Primaria;2=Secundaria

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

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



            D2_COELQ C122Cred./Deb. Credito/Debito 0COE Cert. Certificado COE

            @!   
            NoAR



            SF1
            CampoTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhenNL3_FILIALCFilialFilialNL3_TIPLIQC10Tipo certificadoTipo de Certificado@!AR1=F1116/RT ; 2=F1116/ANL3_CODCETC100Cert.Depos.Certificado de DepositoNJA001@!ExistCpo("NJA") SiARFUNNAME() == "FISA828" .AND. M->NJC_INFCER=="1"NL3_CODLIQC120LiquidaciónLiquidación@!SiARSiIIF(INCLUI,M->NJC_CODLIQ,NJC->NJC_CODLIQ)NL3_CODSAFC100CampanaCampana@!SiARNL3_COECERC100CEO CertCEO Certificado@!SiVVNL3_DATAD80Fecha CierreFecha de cierreSiARNL3_LOCPROC60Loc. Proc.Localidad de procedenciaS1@!SiVRNL3_PESNETN82Pes Net KgPeso Neto en Kg@E 99,999.99SiARNL3_PROPROC60Prov. Proc.Provincia de procedencia12@!SiVR
            NL4
            CamposTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhen
            NL4_FILIALCFilialFilialNL4_CODLIQC120LiquidaciónLiquidación@!SiARIIF(INCLUI,M->NJC_CODLIQ,NJC->NJC_CODLIQ) NL4_CODTESC60Cod. TESCodigo TESSF4@!SiARNL4_DESTESC300Desc. TESDescripcion TES@!SiVRIIF(!INCLUI,POSICIONE("SF4",1,XFILIAL("SF4")+NL4->NL4_CODTES,"F4_TEXTO"),"")                                                    NL4_DETALLM100DetalleDetalleSiARNL4_DIAALMN40Dias AlmacenDias de almacenamiento@E 9,999SiARNL4_QUANTN112CantidadCantidad@E 99,999,999.99SiARNL4_IMPORTN112ImporteImporte@E 99,999,999.99SiARNL4_ITEMC60ItemItem@!SiARSiNL4_PORCENN42PorcentajePorcentaje@E 9.99SiARNL4_PRECION122Precio KgPrecio por Kg@E 999,999,999.99SiARNL4_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

            ...

            RelacaoWhen
            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')






            FR8
            CampoTipoTamañoDecimalesNombre del campoDescripciónF3FolderPictureValidacionBrowseVisualContextoObligatorioComboRelacaoWhen
            FR8_FILIALC10Filial Sucursal

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





            FR8_CODIGOC30Cod. Operac.Cod. Operac.

            @!   
            SiAR



            FR8_CODPROC150CodigoCodigoSB1
            @!   
            SiAR



            FR8_DESCC300DescripciónDescripción

            @!   
            SiAR



            FR8_TIPOEC10Tipo Op. EntTipo Operación Entrada

            9
            SiAR
            1=Operación;2=Deducción

            FR8_TIPOC10Tipo Op. SalTipo Operación Salida

            9
            SiAR
            1=Operación;2=Deducción

            FR8_TESEC30TES Entrada TES Entrada SF4

            ExistCpo("SF4") .And. Iif(M->FR8_TIPOE == "1",M->FR8_TESE<"500",Iif(M->FR8_TIPOE == "2",M->FR8_TESE>"500",.T.))SiAR



            FR8_TESC30TES Salida TES Salida SF4

            ExistCpo("SF4") .And. Iif(M->FR8_TIPO == "1",M->FR8_TES>"500",Iif(M->FR8_TIPO == "2",M->FR8_TES<"500",.T.))SiAR



            FR8_CALCSEC10Calc. SellosCalcula sellos

            9
            SiAR
            1=Si;2=No

            FR8_CALCDRC10Calc. Der. RCalcula Derechos/Registro

            9
            SiAR
            1=Si;2=No

            FR8_TIPOOPC10Tipo Operac.Tipo de operación

            9
            SiAR
            1=Comision;2=Calidad;3=Gastos Intermediario;4=Almacen;5=Otros


            SXB - Consulta estandar

            Alias

            FR8

            Tipo

            1

            Secuencia

            01

            Columna

            DB

            Descripción

            Tipo Op./Deduc.

            Contiene

            FR8

            Alias

            FR8

            Tipo

            2

            Secuencia

            01

            Columna

            01

            Descripción

            FR8_FILIAL+FR8_CODIGO

            Contiene


            Alias

            FR8

            Tipo

            4

            Secuencia

            01

            Columna

            01

            Descripción

            Cod. Operac.

            Contiene

            FR8_CODIGO

            Alias

            FR8

            Tipo

            4

            Secuencia

            01

            Columna

            02

            Descripción

            Codigo

            Contiene

            FR8_CODPRO

            Alias

            FR8

            Tipo

            4

            Secuencia

            01

            Columna

            03

            Descripción

            Descripción

            Contiene

            FR8_DESC

            Alias

            FR8

            Tipo

            4

            Secuencia

            01

            Columna

            04

            Descripción

            Tipo

            Contiene

            FR8_TIPO

            Alias

            FR8

            Tipo

            4

            Secuencia

            01

            Columna

            05

            Descripción

            TES

            Contiene

            FR8_TES

            Alias

            FR8

            Tipo

            4

            Secuencia

            01

            Columna

            06

            Descripción

            Tipo Op. Ent

            Contiene

            FR8_TIPOE

            Alias

            FR8

            Tipo

            4

            Secuencia

            01

            Columna

            07

            Descripción

            TES Entrada

            Contiene

            FR8_TESE

            Alias

            FR8

            Tipo

            5

            Secuencia

            01

            Columna


            Descripción


            Contiene

            FR8->FR8_CODIGO


            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


            SXA - Carpetas

            XA_ALIASAX_ORDEMXA_DESCSPA
            NJC1

            Datos de emisión

            NJC2Datos de la operación
            NJC3Datos del comprador
            NJC4Datos del vendedor
            NJC5Datos de corredor
            NJC6Condiciones de operación
            NJC7Mercaderías entregadas
            NJC8Operación / Deducciones
            NJC9Impuestos

            05. Menú

            ProgramaFISA828.PRW
            MenúActualizaciones
            MóduloSIGAFIS
            Nombre de la rutinaPreliquidaciones.
            SubmenúArchivos
            TipoFunción de Protheus.
            ProgramaFISA832.PRW
            MenúActualizaciones
            MóduloSIGAFIS
            Nombre de la rutinaTipos Operaciones/Deducciones
            SubmenúArchivos
            TipoFunción de Protheus.

            06

            ...

            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.
            • FR8 - Operaciones y Deducciones