BI Acompanhamento Financeiro - Sankhya

 BI Acompanhamento Financeiro

Finalidade deste BI: auxiliar o setor financeiro na gestão de:

• Movimentação das receitas

• Movimentação das despesas

• Movimentação dos títulos renegociados

• Títulos em aberto

• Títulos não baixados

• Títulos não conciliados

Geração do arquivo de remessa:

• Quem gerou o arquivo

• Nome do arquivo

• Quantidade de títulos gerados

• Número do arquivo de remessa

Processamento do arquivo de retorno:

• Quem processou o arquivo

• Nome do arquivo

• Status do título enviado para o banco

• Identificação de possíveis problemas nos títulos

Filtros disponíveis:

• Pesquisar por conta bancária

• Pesquisar por empresa

• Pesquisar por tipo de título

• Pesquisar por tipo de operação

• Pesquisar títulos que deverão gerar arquivo de remessa

• Pesquisar por número da remessa

• Pesquisar por nome do arquivo de remessa

• Pesquisar por nome do arquivo de retorno

• Pesquisar por status bancário do arquivo de retorno

• Pesquisar por datas

• Pesquisar por número do financeiro

• Pesquisar por nosso número

• Pesquisar por número de renegociação

• Pesquisar por número da compensação

• Pesquisar por parceiro

Outras funcionalidades:

• Apresenta informações do crédito do cliente

• Apresenta totalizador de débitos

• Apresenta totalizador de receitas

Procedure para comparar Estado do Parceiro com o da Empresa

 Esta procedure foi criada através do Evento na tabela TGFCAB

 

create or replace PROCEDURE "SPTJ_VERIFICA_ESTADO" (

    P_TIPOEVENTO INT,      

    P_IDSESSAO VARCHAR,

    P_MENSAGEM OUT VARCHAR2  

 

 

) AS

    v_codcid_parceiro VARCHAR2(20);

    v_codcid_empresa  VARCHAR2(20);

    v_codtipoper      VARCHAR2(20);

   

   

BEGIN

    -- Obter a cidade da empresa

    SELECT MAX(EMP.CODCID)

    INTO v_codcid_empresa

    FROM TGFCAB CAB

    JOIN TSIEMP EMP ON EMP.CODEMP = CAB.CODEMP

    WHERE EMP.CODEMP = TO_NUMBER(EVP_GET_CAMPO_INT(P_IDSESSAO, 'CODEMP'));

 

    -- Obter a cidade do parceiro

    SELECT MAX(PAR.CODCID)

    INTO v_codcid_parceiro

    FROM TGFCAB CAB

    JOIN TGFPAR PAR ON PAR.CODPARC = CAB.CODPARC

    WHERE CAB.CODPARC = TO_NUMBER(EVP_GET_CAMPO_INT(P_IDSESSAO, 'CODPARC'));

 

    -- Obter o tipo de operação

    SELECT MAX(TOP1.CODTIPOPER)

    INTO v_codtipoper

    FROM TGFTOP TOP1

    JOIN TGFCAB CAB ON TOP1.CODTIPOPER = CAB.CODTIPOPER

    WHERE CAB.DHTIPOPER = TOP1.DHALTER

      AND CAB.CODTIPOPER = TO_NUMBER(EVP_GET_CAMPO_INT(P_IDSESSAO, 'CODTIPOPER'));

 

    -- Verificação das cidades e tipo de operação

    IF v_codcid_parceiro <> v_codcid_empresa

       AND v_codtipoper = '1000' THEN

        RAISE_APPLICATION_ERROR(-20101, 'As cidades do parceiro e da empresa são diferentes. Verifique antes de continuar.');

    END IF;

 

    P_MENSAGEM := 'Atualizado com sucesso';

 

END;