Identificador de Regra

VEN-140NEORD02

Módulo: VEN - Vendas.

Finalidade: Nota Fiscal Eletrônica - Permitir ao usuário alterar a ordem em que os itens são gerados no arquivo eletrônico.

Características: após ativá-lo, é possível que o sistema apresente uma mensagem referente ao uso incorreto de comandos no banco de dados. Caso isso ocorra, desative o identificador e entre em contato com o Suporte.

Lembrando que ele pode ser utilizado somente se o identificador de regra VEN-140NEAGR02 não estiver em uso para agrupar os itens.

Quando o cliente usa código fiscal, pode ordenar pelos seguintes campos: DESFIS e ITEFIS;
Quando o cliente não usa código fiscal, pode ordenar pelos seguintes campos: DESPRO e CODPRO.

Transação: não se aplica.

Regra:

@Exemplo do identificador VEN-140NEORD02 @
@ Ordenar itens do da nota fiscal por padrão os itens são ordenados pela sua sequência @
Definir NUMERO VSIntCodEmp;
Definir NUMERO VSIntCodFil;
Definir ALFA VSIntCodSnf;
Definir NUMERO VSIntNumNfv;
Definir ALFA VSIntOrdSql;
Definir ALFA xUtiFis; @Indicativo se utiliza código fiscal@
Definir ALFA xCursor; @Cursor para acesso a base de dados@

Inicio
  Se (VSIntCodEmp = 1) 
  inicio
    Se (VSIntCodFil = 1) 
    inicio
      SQL_Criar(xCursor);
      SQL_DefinirComando(xCursor,"SELECT UTIFIS FROM E070EPF WHERE CODEMP = :xCodEmp ");
      SQL_DefinirInteiro(xCursor,"xCodEmp",VSIntCodEmp);
      SQL_AbrirCursor(xCursor);
      se (SQL_BOF(xCursor) = 0) {  
        SQL_RetornarALfa(xCursor,"UTIFIS",xUtiFis);
      }
      SQL_FecharCursor(xCursor);
      SQL_Destruir(xCursor);

      se (xUtiFis <> "S") {
        @ Exemplo ordenando pela descrição do produto e descrição da derivação @
        VSIntOrdSql = "DESPRO, DESDER";       
      }
      senao {
        @ Exemplo ordenando pela descrição fiscal @
        VSIntOrdSql = "DESFIS, ITEFIS";
      }             
    fim;
  fim; 
Fim;

Ordenação dos itens da nota fiscal via identificadores de regras VEN-140ATUSU01 e VEN-140NEORD02.

Variáveis disponibilizadas:

Nome	Tipo	Observações	Retorna Valor
VSIntCodEmp	NÚMERO	Código da Empresa da Nota Fiscal	N
VSIntCodFil	NÚMERO	Código da Filial da Nota Fiscal	N
VSIntCodSnf	ALFA	Código da Série da Nota Fiscal	N
VSIntNumNfv	NÚMERO	Número da Nota Fiscal	N
VSIntOrdSql	ALFA	Campos para ordenar (Separados por vírgula)	S

Atenção

Caso o parâmetro global LisVarReg esteja habilitado, a variável ListaVariaveis estará disponível em todos os identificadores de regras do sistema. O conteúdo desta variável lista os campos disponibilizados no identificador de regras em questão.

Não é aconselhada a ativação desse parâmetro global para o uso cotidiano. Esse recurso de listagem dos campos de identificadores auxilia a construção de regras e o Suporte para, por exemplo, depuração ou quando não houver acesso à documentação dos identificadores de regras.

PORTAL DE DOCUMENTAÇÃO
Gestão Empresarial \| ERP - versão 5.10.3 (XTended)