Data de entrega x MAF x Compras - Participativo Unimed JP

(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

 Permitir parametrizar tratamento para considerar somente dias úteis no cálculo da data de entrega da parcela da ordem de compra quando essa for sugerida ou atualizada automaticamente nos módulos de Compras, Cotações e Estoque.

(Obrigatório)

Definição da Regra de Negócio

CC0104 – MANUTENÇÃO PARÂMETROS DE COMPRAS

 Incluir novo parâmetro na Manutenção dos Parâmetros de Compras (CC0104) para definir se o tratamento correspondente ao cálculo da data de entrega da parcela da ordem de compra deve desconsiderar sábado, domingo e feriado.

A opção será:   Data de Entrega: considera somente dias úteis?

GERAÇÃO / SUGESTÃO DATA DE ENTREGA

Alterar todas as funções que calcula e sugere a data de entrega da parcela. Será considerado o Calendário da Produção para que seja possível identificar feriados, finais de semana e dias úteis:

 Exemplo:

Data atual : 20/06/2016

Tempo de ressuprimento: 7 dias

Rotinas impactadas:

CC0301 – Ordem de Compra: quando o novo parâmetro estiver marcado, sugerir data de entrega calculada apenas com dias úteis. A tela de Split das ordens apresenta sempre a mesma data confirmada para a parcela.

OC0201 – Manutenção Cotações: quando o novo parâmetro estiver marcado, será aplicado novo calculo na opção de alterar datas nas parcelas.

CD1406 – Requisição/Solicitação: quando o novo parâmetro estiver marcado, sugerir data de entrega calculada apenas com dias úteis.

CC0300 – Pedido Emergencial: quando o novo parâmetro estiver marcado, sugerir data de entrega calculada apenas com dias úteis.

CC0325 – Geração de Ordens: as parcelas são geradas com data da requisição, que já será tratada no cd1406.

CE0341 – Geração Ordens de Compra/Estoque: as parcelas são geradas com base nas necessidades da ordem de compra. Quando o novo parâmetro estiver marcado, irá gerar a data de entrega da necessidade calculada apenas com dias úteis.

Requisito Não Atendido

• Não será aplicada nova regra para os pontos que utilizam o horizonte fixo;
• Não será desenvolvido calendário especifico para esse tratamento, será utilizado o Calendário Calendário da Produção;
• Não será alterado o cálculo da data de entrega gerada pelos módulos de Manufatura (Planejamento, APS, Configurador do Produto, Desenvolvimento do Produto, Produção e MRP).

Diagrama de Ação

CC0104 – MANUTENÇÃO PARÂMETROS DE COMPRAS

O novo parâmetro deve ser colocados dentro do retângulo “Data Entrega” da aba “Parâmetros 2” e devem apresentar como valor inicial desmarcado, conforme protótipo 1.

Gravação do campo:

TRATAMENTO DATA DE ENTREGA

Exemplo: 

/* alteração do código BOIN356CA */

assign nova-dt = today.

for first item-uni-estab fields(it-codigo cod-estabel res-cq-comp res-int-comp res-for-comp)

    where item-uni-estab.cod-estabel = pcCodEstabel         and

          item-uni-estab.it-codigo   = pcItCodigo no-lock:  end.

if avail item-uni-estab then

   assign dt-ressup = item-uni-estab.res-int-comp + item-uni-estab.res-for-comp.         

else do:

     for first item fields(it-codigo res-int-comp res-for-comp) where

         item.it-codigo = pcItCodigo no-lock: end.

     if avail item then

        assign dt-ressup = item.res-int-comp + item.res-for-comp.

end.

IF substring(param-compra.char-1,136,1) = "1" THEN  /* considera somente dias úteis */

   /*  executa a include com a nova lógica de cálculo */

IF substring(param-compra.char-1,136,1) = "" OR l-erro-calend THEN

   ASSIGN nova-dt = today + dt-ressup.

ASSIGN pdt-entrega = nova-dt.

Sugestão: Criar uma include para realizar esse tratamento na data de entrega.

Definir variável de entrada para o estabelecimento e numero de dias de ressuprimento.

Retornar a data e se ocorreu erro.

assign nova-dt = TODAY.

       i-cont = 0

       l-erro-calend = no.

/* só executa se o novo parametro estiver marcado no param-compra  */

REPEAT WHILE i-cont <> dias-ressup.

    FIND FIRST calen-prod

         WHERE calen-prod.cod-estabel = pcCodEstabel

         AND   calen-prod.data        = nova-dt      no-lock no-error.

    IF AVAIL calen-prod THEN DO:

       IF calen-prod.tipo-dia = 1 THEN  /* dia útil */

          ASSIGN i-cont = i-cont + 1.

    END.

    ELSE DO:

       ASSIGN l-erro-calend = yes.

       LEAVE. /* erro: não tem calen-prod cadastrado */

    END.   

    ASSIGN nova-dt = nova-dt + 1.       

END.

OC0201a-v01.w

Alterar nesse ponto:

RUN Get-Field-Screen-Value IN adm-broker-hdl

    (INPUT this-procedure, INPUT "rs-atualiza-data":U).

/* assign da-atualiza = today + cotacao-item.prazo-entreg */

assign da-atualiza = today

       i-atualiza  = integer(return-value).

Executar a nova logica utilizando a variável “da-atualiza” para a data e a cotacao-item.prazo-entreg e i-dias-atualiza para o dias de ressuprimento.

Opcional

Protótipo de Tela

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

• Reserva de Campos livres:

 Tabela: param-compra

12.1.13

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