CE PLUS - Nota 009588

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: LI

Data/Hora da Publicação: 16/12/2009 00:00:00

Data/Hora Última Alteração: 23/02/2011 10:12:37

Descrição da Nota: BLOQUEAR DESVINCULAÇÃO DO ATO CONCESS. QUANDO LI POSSUIR LICENCIAMENTO

Sintoma

O programa está permitindo desvincular o ato concessório mesmo com o numero de licenciamento

preenchido.

 

 

Solução

Ajustado programa para não permitir a desvinculação do ato concessório caso um dos seguintes campos

estiverem preenchidos: Licenciamento, Data do Registro e Data Deferimento

 

Versões Tratadas

8.0


Pré-Requisitos

Produto:

Nota

Descrição

AO DESVINCULAR LI NÃO VERIFICA SE O EMBARQUE ESTÁ CORRETO

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 09588 Data: 16/12/2009 Hora: 16:42:14

----------------------------------------------------------------------------------------------------

 

----------------------------------------------------------------------------------------------------

Nota Número              : 09588

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 8.0

Pacote                   : 00002

Agrupamento              : 00001

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

 

09506  - 00001 - 8.0    - 00002  - AO DESVINCULAR LI NÃO VERIFICA SE O EMBARQUE ESTÁ CORRETO

----------------------------------------------------------------------------------------------------

BLOQUEAR DESVINCULAÇÃO DO ATO CONCESS. QUANDO LI POSSUIR LICENCIAMENTO

----------------------------------------------------------------------------------------------------

Palavras Chave:

LI - ATO - CONCESSÓRIO - DESVINCULAR - LICENCIAMENTO

/PWS/SAPMZYCI020

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/MZYCI020F01

REPS /PWS/MZYCI020F02

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCI020F01

 

...

FORM desvin_li.

* >> Início da inclusão: FORM DESVIN_LI

  CHECK NOT /pws/zycie078-nrseq IS INITIAL.

* << Fim da inclusão

  IF NOT /pws/zycie078-nrli IS INITIAL.

    IF /pws/zycie078-tpli EQ 'N'.

      MESSAGE i015 WITH text-159 text-160.

    ELSEIF /pws/zycie078-tpli EQ 'S'.

      MESSAGE i015 WITH text-200 text-160.

    ENDIF.

    EXIT.

  ENDIF.

...

 

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCI020F02

 

...

FORM desvincula_ato.

* >> Início da inclusão: FORM DESVINCULA_ATO

  IF NOT /pws/zycie078-nrli  IS INITIAL OR

     NOT /pws/zycie078-dtreg IS INITIAL OR

     NOT /pws/zycie078-dtdef IS INITIAL.

    MESSAGE i015 WITH text-159 text-160.

    EXIT.

  ENDIF.

* << Fim da inclusão

  IF NOT /pws/zycie078-nrseq IS INITIAL.

    SELECT SINGLE * FROM /pws/zycit003

    WHERE nrseq    EQ /pws/zycie078-nrseq

    AND   nrseqli  EQ /pws/zycie078-nrseqli.

    IF sy-subrc EQ 0.

      MESSAGE i015 WITH text-458 text-459.

      EXIT.

    ENDIF.

  ENDIF.

  CLEAR: v_descr11.

...