ER_MANFIN01-384_FIN10036_Possibilitar_imprimir_a_Razão_Social_do_Representante

(Obrigatório)

Informações Gerais

   Legenda: 1 – Inovação 2 – Manutenção (Os demais campos devem ser preenchidos para ambos os processos). 

(Obrigatório)

Objetivo

Possibilitar  que o cliente possa selecionar se deseja imprimir o nome do representante ou a razão social da representação. Atualmente é possível apenas a impressão com o nome do representante.

(Obrigatório)

Definição da Regra de Negócio

1 - Será alterado a tela do programa FIN10036 (Integração de Comissões) para perver um novo campo na tela para permitir que o usuário indique se nos relatórios emitidos pela rotina, a impressão do nome do representante ou a razão social da empresa de representação.

A tela com o campo incluído está copiada no tópico Protótipos de tela.

Campo: Descrição do Representante

Valores possíveis : "N" = Nome do representante

                             "R" = Razão social do representante

 2 - Será alterado o programa fin10036 para prever o tratamento do novo campo para impressão do nome ou razão social do representante na emissão dos relatórios do programa. Deverão ser verificados os seguintes pontos:

      a) Prever o novo campo na variável mr_tela;

           DEFINE mr_tela RECORD
                               dat_lanc_ini                              DATE,
                               dat_lanc_fim                            DATE,
                               desc_representante                CHAR(01),
                               integracao_cap                       CHAR(01),
                               integracao_sup                       CHAR(01),
                               integracao_rhu                        CHAR(01),
                               virtual_emissao_ad                DATE,
                               dat_vencimento_ad                 DATE,
                               dat_entrega_oc                        DATE,
                               mercado                                  CHAR(01),
                               virtual_quebra_representante CHAR(01)
                       END RECORD

      b)  Alterar a função fin10036_after_load prevendo a inicialização do novo campo.

            #------------------------------------------------#

               FUNCTION fin10036_after_load()

            #-------------------------------------------#

                 IF NOT fin10036_cria_temporarias() THEN
                      RETURN FALSE
                 END IF

                LET mr_tela.desc_representante = 'N'

                .

                .

                .

END FUNCTION

          c) Alterar a função fin10036_verifica_representante para selecionar a razão social ou o nome do representante conforme novo campo da tela.

                 #------------------------------------------------------#
                   FUNCTION fin10036_verifica_representante(l_cod_repres)
                 #------------------------------------------------------#
                   DEFINE l_cod_repres            LIKE representante.cod_repres,
                                  l_raz_social             LIKE representante.raz_social,
                                  l_nom_repres          LIKE representante.nom_repres
                   DEFINE l_msg CHAR(100)

                   WHENEVER ERROR CONTINUE
                          SELECT nom_repres, raz_social
                                INTO l_nom_repres, l_raz_social
                              FROM representante
                            WHERE cod_repres = l_cod_repres
                   WHENEVER ERROR STOP

                  IF sqlca.sqlcode <> 0 THEN
                       IF sqlca.sqlcode <> NOTFOUND THEN
                            CALL log003_err_sql("SELECT","representante")
                       END IF

                      RETURN FALSE,l_nom_repres,"Representante não cadastrado."
                 ELSE
                       IF mr_tela.desc_representante = 'R' THEN
                            LET l_nom_repres = l_raz_social
                       END IF
                END IF

                .

                .

                .

END FUNCTION

      d) Alterar a função fin10036_processa_relatorio_1 para selecionar a razão social ou o nome do representante conforme novo campo da tela.

#--------------------------------------------------#

FUNCTION fin10036_processa_relatorio_1(reportfile)
#--------------------------------------------------#

       .

       .

       .

        WHENEVER ERROR CONTINUE

              SELECT nom_repres, raz_social

                   INTO lr_relat1.nom_repres, l_raz_social
                 FROM representante
               WHERE cod_repres = lr_relat1.cod_repres
         WHENEVER ERROR STOP
       

           IF sqlca.sqlcode <> 0 THEN

                IF SQLCA.SQLCODE <> NOTFOUND THEN
                    CALL log003_err_sql('CONSULTA','representante')
                    RETURN FALSE
                END IF

                LET lr_relat1.nom_repres = "REPRESENTANTE NAO CADASTRADO"
           ELSE
                 IF mr_tela.desc_representante = 'R' THEN
                      LET lr_relat1.nom_repres = l_raz_social
                 END IF
           END IF

            .

            .

            .

END FUNCTION

  F) Alterar a função fin10036_pesquisa_nom_repres para selecionar a razão social ou o nome do representante conforme novo campo da tela.

#-------------------------------------------------------------------#
          FUNCTION fin10036_pesquisa_nom_repres()
#-------------------------------------------------------------------#
          DEFINE l_nom_repres       LIKE representante.nom_repres
          DEFINE l_raz_social         LIKE representante.raz_social
         DEFINE l_cod_repres         LIKE representante.cod_repres

         LET l_cod_repres = mr_dados_comis.cod_repres

        WHENEVER ERROR CONTINUE
               SELECT representante.nom_repres, representante.raz_social
                   INTO l_nom_repres, l_raz_social
                 FROM representante
               WHERE representante.cod_repres = mr_dados_comis.cod_repres
         WHENEVER ERROR STOP

         IF sqlca.sqlcode <> 0
         OR l_nom_repres IS NULL THEN
               LET l_nom_repres = "REPRESENTANTE NAO CADASTRADO"
        ELSE
               IF mr_tela.desc_representante = 'R' THEN
                    LET l_nom_repres = l_raz_social
               END IF
        END IF

        RETURN l_nom_repres

END FUNCTION

  G) Alterar a função fin10036_carrega_temp_saldo_neg_detalhe para selecionar a razão social ou o nome do representante conforme novo campo da tela.

#---------------------------------------------------------#
FUNCTION fin10036_carrega_temp_saldo_neg_detalhe(lr_dados)
#---------------------------------------------------------#
       .

        .

        WHENEVER ERROR CONTINUE 

               SELECT nom_repres, raz_social
                    INTO l_nom_repres, l_raz_social
                  FROM representante
                WHERE cod_repres = lr_dados.cod_repres
         WHENEVER ERROR STOP

       IF SQLCA.SQLCODE = 100 THEN
              LET l_nom_repres = "REPRESENTANTE NAO CADASTRADO"
       ELSE
              IF mr_tela.desc_representante = 'R' THEN
                  LET l_nom_repres = l_raz_social
             END IF
       END IF

        .

        .

END FUNCTION

<Na tabela abaixo informe quais são as rotinas envolvidas, o tipo de operação, a opção de menu e se necessário uma breve descrição das regras de negócio relacionadas a rotina>.

Exemplo de Aplicação:

• Criar o campo “% Mínimo Espécie” (AAA_PERESP) onde o usuário informará o % que o aluno pagará em dinheiro. Esse % poderá ser alterado durante a negociação.
• Criar o campo “Referência Mínima para Cálculo” (AAA_REFCAL) onde o usuário informará um dos 4 valores disponíveis para pagamento das mensalidades  como a referência mínima para calcular o débito total do aluno.
• Criar o parâmetro MV_ACPARNE que definirá se as informações de “% Mínimo Espécie” e “Referência Mínima para Cálculo” serão obrigatórias.
• O parâmetro MV_ACPARNE deve ter as seguintes opções: 1=Obrigatório e 2=Opcional. Deve ser inicializado como opcional>.

Tabelas Utilizadas

• SE2 – Cadastro de Contas a Pagar
• FI9 – Controle de Emissão de DARF>.

Opcional

Protótipo de Tela

<Caso necessário inclua protótipos de telas com o objetivo de facilitar o entendimento do requisito, apresentar conceitos e funcionalidades do software>.

Protótipo 01

Opcional

Fluxo do Processo

<Nesta etapa incluir representações gráficas que descrevam o problema a ser resolvido e o sistema a ser desenvolvido. Exemplo: Diagrama - Caso de Uso, Diagrama de Atividades, Diagrama de Classes, Diagrama de Entidade e Relacionamento e Diagrama de Sequência>. 

Opcional

Dicionário de Dados

Arquivo ou Código do Script: AAA – Negociação Financeira / *Versao=CP.2014.12_03*/

(Opcional)

Grupo de Perguntas

<Informações utilizadas na linha Protheus>.

Nome: FINSRF2

(Opcional)

Consulta Padrão

<Informações utilizadas na linha Protheus>

Consulta: AMB

(Opcional)

Estrutura de Menu

<Informações utilizadas na linha Datasul>.

Procedimentos

Programas

Cadastro de Papéis

<O cadastro de papéis é obrigatório para os projetos de desenvolvimento FLEX a partir do Datasul 10>.

<Lembrete: o nome dos papeis em inglês descrito neste ponto do documento, devem ser homologados pela equipe de tradução>.