CE PLUS - Nota 007204
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Vinculação
Data/Hora da Publicação: 26/08/2008 00:00:00
Data/Hora Última Alteração: 18/02/2011 17:58:49
Descrição da Nota: VINCULAÇÃO - VERIFICAÇÃO DOCUMENTOS COMPENSADOS - DOCTO. CONTRATO
Sintoma
Ao efetuar uma vinculação, esta retornando mensagem de que o documento do contrato esta compensado,
mas o mesmo não esta.
Solução
Analisar o campo /pws/zycbe001-dtvincul, se não estiver vazio, buscar documento por esta data.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07204 Data: 26/08/2008 Hora: 16:09:32
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07204
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00006
Agrupamento : 00062
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
05049 - 00001 - 7.0 - 00003 - VINCULAÇÃO - VERIFICAÇÃO DE DOCUMENTOS COMPENSADOS
----------------------------------------------------------------------------------------------------
VINCULAÇÃO - VERIFICAÇÃO DOCUMENTOS COMPENSADOS - DOCTO. CONTRATO
----------------------------------------------------------------------------------------------------
Palavras Chave:
VINCULAÇÃO - VERIFICAÇÃO DOCUMENTOS COMPENSADOS
DOCTO. CONTRATO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB009F04
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB009F04
...
ASSIGN /pws/zycbe001-dtcontr TO <fs_dtdocto>.
WHEN OTHERS.
ASSIGN /pws/zycbe001-dtcred TO <fs_dtdocto>.
ENDCASE.
CASE /pws/zycbe001-tpcontr(1).
WHEN 'P' OR 'S'.
IF NOT <fs_zycbt002>-dtvincul IS INITIAL.
UNASSIGN <fs_dtdocto>.
ASSIGN <fs_zycbt002>-dtvincul TO <fs_dtdocto>.
ENDIF.
* >> Início da inclusão: FORM DOCUMENTOS_PRINCIPAL
IF NOT /pws/zycbe001-dtvincul IS INITIAL.
UNASSIGN <fs_dtdocto>.
ASSIGN /pws/zycbe001-dtvincul TO <fs_dtdocto>.
ENDIF.
* << Fim da inclusão
WHEN OTHERS.
IF NOT /pws/zycbe001-dtvincul IS INITIAL.
UNASSIGN <fs_dtdocto>.
ASSIGN /pws/zycbe001-dtvincul TO <fs_dtdocto>.
ENDIF.
ENDCASE.
ELSE.
ASSIGN <fs_zycbt002>-dtcont TO <fs_dtdocto>.
ENDIF.
PERFORM adiciona_documentos
...