CE PLUS - Nota 006094

Módulo: CÂMBIO FINANCEIRO

Funcionalidade: Relatórios

Data/Hora da Publicação: 03/03/2008 00:00:00

Data/Hora Última Alteração: 03/03/2010 17:55:42

Descrição da Nota: CODE INSPECTOR, VERIFICAÇÃO AMPLIADA - CAMBIO

Sintoma

 

sintaxe e performance - não afeta o funcionamento do programa

 

Solução

 

code inspector e verificação ampliada .

Versões Tratadas

7.0

Informações Complementares

 

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

Nota Número 06094 Data: 03/03/2008 Hora: 16:19:28

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

 

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

Nota Número              : 06094

Categoria                : Melhoria

Prioridade               : Baixa

Versão PW.CE             : 7.0

Pacote                   : 00004

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

Texto Rápido:

CODE INSPECTOR, VERIFICAÇÃO AMPLIADA - CAMBIO

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

Palavras Chave:

CODE INSPECTOR, VERIFICAÇÃO AMPLIADA - CAMBIO

 

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

Objetos da nota:

FUNC /PWS/ZYCB_TRANSACAO_F47_A

FUNC /PWS/ZYCB_TRANSACAO_FB02

FUNC /PWS/ZYCB_TRANSACAO_FB02A

FUNC /PWS/ZYCB_TRANSACAO_FB08

FUNC /PWS/ZYCB_TRANSACAO_FB08B

FUNC /PWS/ZYCB_TRANSACAO_FBRA

FUNC /PWS/ZYCB_TRANSACAO_FBV0

FUNC /PWS/ZYCB_TRANSACAO_FBV0_A

FUNC /PWS/ZYCB_TRANSACAO_FF63

FUNC /PWS/ZYCB_TRANSACAO_FV60

FUNC /PWS/ZYCB_TRANSACAO_F_02

FUNC /PWS/ZYCB_TRANSACAO_F_02A

FUNC /PWS/ZYCB_TRANSACAO_F_02B

FUNC /PWS/ZYCB_TRANSACAO_F_02C

FUNC /PWS/ZYCB_TRANSACAO_F_02D

FUNC /PWS/ZYCB_TRANSACAO_F_02F

FUNC /PWS/ZYCB_TRANSACAO_F_02G

FUNC /PWS/ZYCB_TRANSACAO_F_02H

FUNC /PWS/ZYCB_TRANSACAO_F_02I

FUNC /PWS/ZYCB_TRANSACAO_F_02J

FUNC /PWS/ZYCB_TRANSACAO_F_05

FUNC /PWS/ZYCB_TRANSACAO_F_07

FUNC /PWS/ZYCB_TRANSACAO_F_07_A

FUNC /PWS/ZYCB_TRANSACAO_F_22

FUNC /PWS/ZYCB_TRANSACAO_F_22B

FUNC /PWS/ZYCB_TRANSACAO_F_22C

FUNC /PWS/ZYCB_TRANSACAO_F_22D

FUNC /PWS/ZYCB_TRANSACAO_F_22E

FUNC /PWS/ZYCB_TRANSACAO_F_22F

FUNC /PWS/ZYCB_TRANSACAO_F_28

FUNC /PWS/ZYCB_TRANSACAO_F_28_A

FUNC /PWS/ZYCB_TRANSACAO_F_29

FUNC /PWS/ZYCB_TRANSACAO_F_29R

FUNC /PWS/ZYCB_TRANSACAO_F_30

FUNC /PWS/ZYCB_TRANSACAO_F_30_A

FUNC /PWS/ZYCB_TRANSACAO_F_30_B

FUNC /PWS/ZYCB_TRANSACAO_F_30_C

FUNC /PWS/ZYCB_TRANSACAO_F_30_D

FUNC /PWS/ZYCB_TRANSACAO_F_30_E

FUNC /PWS/ZYCB_TRANSACAO_F_30_F

FUNC /PWS/ZYCB_TRANSACAO_F_30_H

FUNC /PWS/ZYCB_TRANSACAO_F_30_I

FUNC /PWS/ZYCB_TRANSACAO_F_30_J

FUNC /PWS/ZYCB_TRANSACAO_F_30_K

FUNC /PWS/ZYCB_TRANSACAO_F_30_L

FUNC /PWS/ZYCB_TRANSACAO_F_30_M

FUNC /PWS/ZYCB_TRANSACAO_F_30_N

FUNC /PWS/ZYCB_TRANSACAO_F_30_PR

FUNC /PWS/ZYCB_TRANSACAO_F_30_Q

FUNC /PWS/ZYCB_TRANSACAO_F_30_T

FUNC /PWS/ZYCB_TRANSACAO_F_30_U

FUNC /PWS/ZYCB_TRANSACAO_F_30_V

FUNC /PWS/ZYCB_TRANSACAO_F_30_W

FUNC /PWS/ZYCB_TRANSACAO_F_31

FUNC /PWS/ZYCB_TRANSACAO_F_43

FUNC /PWS/ZYCB_TRANSACAO_F_43A

FUNC /PWS/ZYCB_TRANSACAO_F_47

FUNC /PWS/ZYCB_TRANSACAO_F_51

FUNC /PWS/ZYCB_TRANSACAO_F_51A

FUNC /PWS/ZYCB_TRANSACAO_F_51B

FUNC /PWS/ZYCB_TRANSACAO_F_51C

FUNC /PWS/ZYCB_TRANSACAO_F_51D

FUNC /PWS/ZYCB_TRANSACAO_F_51E

FUNC /PWS/ZYCB_TRANSACAO_F_51F

FUNC /PWS/ZYCB_TRANSACAO_F_51H

FUNC /PWS/ZYCB_TRANSACAO_F_51I

FUNC /PWS/ZYCB_TRANSACAO_F_53

FUNC /PWS/ZYCB_TRANSACAO_F_53A

FUNC /PWS/ZYCB_TRANSACAO_F_63

FUNC /PWS/ZYCB_TRANSACAO_F_63A

FUNC /PWS/ZYCB_TRANSACAO_F_63B

FUNC /PWS/ZYCB_TRANSACAO_F_63C

FUNC /PWS/ZYCB_TRANSACAO_F_63D

FUNC /PWS/ZYCB_TRANSACAO_F_63E

FUNC /PWS/ZYCB_VERIFICA_DISCREP

RELE F6DK958772 20080303 161412 PWSCB

REPS /PWS/LZYCBGF2F01

REPT /PWS/SAPLZYCBGF2

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F47_A

 

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_FB02

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_CAPTACAO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_FB02A

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_FB08

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_GJAHS

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_FB08B

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_FBRA

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_FBV0

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_FBV0_A

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_FF63

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_FV60

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_MONTANTE

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_02

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_CANC

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_02A

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_LANCTO_MULTIPLO_C

V_NEWBS2

V_OP

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_02B

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_02C

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_02D

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_02F

IMPORTAÇÃO: Desflegar opção : Transfer.valor

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_02G

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_02H

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_02I

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_02J

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

 V_MODO

 V_ACE

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_05

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_MONT_MI

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_07

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_07_A

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_22

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_TRANSITORIA

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_22B

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_22C

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_22D

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_VINC

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_22E

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_22F

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_28

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_28_A

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_29

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_29R

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_DESC_REC

V_DESC_REC_AUX

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_A

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_ZUONR

V_VLT

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_B

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_SIMULAR

V_FILTRO_DOC

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_C

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_D

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_E

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_F

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_VINC_TOT

V_DIV

V_DESC_REC

V_DP

 

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_H

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_I

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_J

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_K

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

ZUONR

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_L

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_M

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_N

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_PR

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

FILTRA

SO_SEGUNDO

TOTAL

V_VINC_TOT

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_Q

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_RATEIO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_T

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_U

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_V

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_W

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_VINC_TOT

V_DESC_REC

V_DP

V_DIV

V_RES_LIQ_AND

V_CONTASI

V_OP

V_LIQOP

V_ASSOC

 

 

EXPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_DTLANC

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_31

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_43

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_43A

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_47

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_51

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

SEM_PARTIDA_RESIDUAL

ASSOCIA_SALDO_TOTAL

V_MODO

V_ZUONR

 

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_51A

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_ZUONR

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_51B

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_BELNR

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_51C

 

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

SEM_PARTIDA_RESIDUAL

ASSOCIA_SALDO_TOTAL

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_51D

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_COM_IR

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_51E

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_51F

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_ZUONR

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_51H

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_ZUONR

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_51I

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_53

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_53A

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_63

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_MONTANTE

V_PREDIC

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_63A

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_IRRF

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_63B

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_MONTANTE

 

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_63C

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_IRRF

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_63D

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_63E

IMPORTAÇÃO: Desflegar opção : Transfer.valor

 

NOME PARAM.   ATRIB. TIPO REFERÊNCIA  VL. PROPOSTO OPCIONAL TRANSF. TEXT

V_MODO

V_MONTANTE

 

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

Modificações efetuadas em FUNC /PWS/ZYCB_VERIFICA_DISCREP

 

*   Seleciona Item

    SELECT * FROM /pws/zycbt097 INTO TABLE itab_zycbt097

      FOR ALL ENTRIES IN t_nrseq_aux

* >> Início da exclusão

      WHERE nrseq = t_nrseq_aux-nrseq.

* << Fim da exclusão

* >> Início da inclusão

      WHERE nrseq = t_nrseq_aux-nrseq."#EC CI_NOFIELD

* << Fim da inclusão

....

 

*   Seleciona Ordens de Venda

    SELECT * FROM /pws/zycbt161 INTO TABLE itab_zycbt161

      FOR ALL ENTRIES IN t_nrseq_aux

* >> Início da exclusão

      WHERE nrseq = t_nrseq_aux-nrseq.

* << Fim da exclusão

* >> Início da inclusão

      WHERE nrseq = t_nrseq_aux-nrseq."#EC CI_NOFIELD

* << Fim da inclusão

 

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

Modificações efetuadas em REPS /PWS/LZYCBGF2F01

 

FORM bdc_field USING value(par1)

* >> Início da exclusão: FORM BDC_FIELD

                     value(par2).

* << Fim da exclusão

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

                     value(par2)."#EC *

* << Fim da inclusão

  CLEAR itab_bdc.

  itab_bdc-fnam = par1.

  itab_bdc-fval = par2.

  APPEND itab_bdc.

ENDFORM.

FORM bdc_screen USING value(par1)

* >> Início da exclusão: FORM BDC_SCREEN

                      value(par2).

* << Fim da exclusão

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

                      value(par2)."#EC *

* << Fim da inclusão

  CLEAR itab_bdc.

  itab_bdc-program  = par1.

  itab_bdc-dynpro   = par2.

  itab_bdc-dynbegin = 'X'.

  APPEND itab_bdc.

ENDFORM.

FORM determina_string USING value(p_chave)

                            value(p_bukrs)

                            value(p_newko)

* >> Início da exclusão: FORM DETERMINA_STRING

                      CHANGING p_string.

* << Fim da exclusão

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

                      CHANGING p_string."#EC *

* << Fim da inclusão

  SELECT SINGLE * FROM skb1 WHERE saknr = p_newko

                            AND   bukrs = p_bukrs.

  IF sy-subrc = 0.

    CALL FUNCTION 'FI_FIELD_SELECTION_DETERMINE'

         EXPORTING

              i_bschl     = p_chave

              i_bukrs     = p_bukrs

              i_saknr     = p_newko

         IMPORTING

              e_faus1     = p_string

         EXCEPTIONS

              customizing = 1

              OTHERS      = 2.

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

  if sy-subrc = 0.

  else.

  endif.

* << Fim da inclusão

  ELSE.

    CLEAR p_string.

  ENDIF.

ENDFORM.

FORM trata_string_debito TABLES   p_t_dados STRUCTURE /pws/zycbe033

                                  p_t_campo STRUCTURE /pws/zycbt034

                                  p_itab_oculto LIKE itab_oculto[]

* >> Início da exclusão: FORM TRATA_STRING_DEBITO

                         USING    value(p_string).

* << Fim da exclusão

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

                         USING    value(p_string)."#EC *

* << Fim da inclusão

  DATA:

    v_string(50) TYPE c,

    v_component(2) TYPE c,

    v_bupla TYPE i,

    v_secco TYPE i.

  MOVE p_string TO v_string.

  IF v_string+6(1) = '+'.

    IF p_t_dados-zterm = space.

      CLEAR p_t_campo.

      READ TABLE p_t_campo WITH KEY campo = 'BSEG-ZTERM'.

...

 

...

  ELSEIF v_string+25(1) = '-'.

    p_itab_oculto-campo = 'COBL-WERKS'.

    p_itab_oculto-chave = 'D'.

    APPEND p_itab_oculto.

  ENDIF.

ENDFORM.

FORM trata_string_debito2 TABLES   p_t_dados STRUCTURE /pws/zycbe033

                                  p_t_campo STRUCTURE /pws/zycbt034

                                  p_itab_oculto LIKE itab_oculto2[]

                         USING    value(p_string)

* >> Início da exclusão: FORM TRATA_STRING_DEBITO2

                                  value(p_conta).

* << Fim da exclusão

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

                                  value(p_conta)."#EC *

* << Fim da inclusão

  DATA:

    v_string(50) TYPE c.

  MOVE p_string TO v_string.

  IF v_string+5(1) = '+'.

    IF p_t_dados-d_valut = space.

      CLEAR p_t_campo.

      READ TABLE p_t_campo WITH KEY campo = 'BSEG-VALUT'.

      IF sy-subrc <> 0.

        p_t_campo-mandt = p_t_dados-mandt.

        p_t_campo-campo = 'BSEG-VALUT'.

...

 

...

  ELSEIF v_string+11(1) = '-'.

    p_itab_oculto-campo = 'COBL-PS_PSP_PNR'.

    p_itab_oculto-chave = 'D'.

    p_itab_oculto-conta = p_conta.

    APPEND p_itab_oculto.

  ENDIF.

ENDFORM.

FORM trata_string_credito TABLES   p_t_dados STRUCTURE /pws/zycbe033

                                   p_t_campo STRUCTURE /pws/zycbt034

                                   p_itab_oculto LIKE itab_oculto[]

* >> Início da exclusão: FORM TRATA_STRING_CREDITO

                          USING    value(p_string).

* << Fim da exclusão

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

                          USING    value(p_string)."#EC *

* << Fim da inclusão

  DATA:

    v_string(50) TYPE c.

  MOVE p_string TO v_string.

  IF v_string+6(1) = '+'.

    IF p_t_dados-zterm = space.

      CLEAR p_t_campo.

      READ TABLE p_t_campo WITH KEY campo = 'BSEG-ZTERM'.

      IF sy-subrc <> 0.

        p_t_campo-mandt = p_t_dados-mandt.

        p_t_campo-campo = 'BSEG-ZTERM'.

...

 

...

FORM  call_transaction TABLES   p_itab_msg   LIKE itab_msg[]

                                p_itab_bdc   STRUCTURE bdcdata

                                p_t_zycbt032 STRUCTURE

 /pws/zycbt032

                                p_t_dados    STRUCTURE /pws/zycbe033

                       USING    value(p_tcode)

                                value(p_mode)

                                value(p_update)

                                value(p_msgid)

                                value(p_msgno)

* >> Início da exclusão: FORM CALL_TRANSACTION

                       CHANGING p_nrmsg.

* << Fim da exclusão

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

                       CHANGING p_nrmsg."#EC *

* << Fim da inclusão

  DATA: v_belnr LIKE bseg-belnr.

  DATA: itab_zyglt100

          TYPE STANDARD TABLE OF /pws/zyglt100

          WITH HEADER LINE,

        v_ret_call(1) TYPE c VALUE '0',

        v_repid       LIKE sy-repid.

  MOVE sy-repid TO v_repid.

  CALL FUNCTION '/PWS/ZYGL_BUSCA_EXIT_CLIENTE'

       EXPORTING

            i_codmod      = 'E'

...

 

...

        USING    p_tcode

                 p_mode

                 p_update

        CHANGING v_ret_call.

    ENDIF.

  ENDIF.

  IF v_ret_call NE '1'.

    CALL TRANSACTION p_tcode USING p_itab_bdc

                           MODE  p_mode

                           UPDATE p_update

* >> Início da exclusão: FORM CALL_TRANSACTION

                           MESSAGES INTO p_itab_msg.

* << Fim da exclusão

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

                           MESSAGES INTO p_itab_msg."#EC *

* << Fim da inclusão

  ENDIF.

  IF sy-subrc <> 0.

    LOOP AT p_itab_msg.

      ADD 1 TO p_nrmsg.

      CALL FUNCTION 'MESSAGE_PREPARE'

           EXPORTING

                language               = sy-langu

                msg_id                 = p_itab_msg-msgid

                msg_no                 = p_itab_msg-msgnr

                msg_var1               = p_itab_msg-msgv1

                msg_var2               = p_itab_msg-msgv2

                msg_var3               = p_itab_msg-msgv3

                msg_var4               = p_itab_msg-msgv4

           IMPORTING

                msg_text               = p_t_zycbt032-msg

           EXCEPTIONS

                function_not_completed = 1

                message_not_found      = 2

                OTHERS                 = 3.

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

  if sy-subrc = 0.

  else.

  endif.

* << Fim da inclusão

      p_t_zycbt032-mandt  = p_t_dados-mandt.

      p_t_zycbt032-tcode  = p_tcode.

      p_t_zycbt032-tabela = p_t_dados-tabela.

      p_t_zycbt032-cpochv = p_t_dados-cpochv.

      p_t_zycbt032-tpmsg  = 'E'.

      p_t_zycbt032-msgid  = p_itab_msg-msgid.

      p_t_zycbt032-nrmsg  = p_itab_msg-msgnr.

      p_t_zycbt032-msgv1  = p_itab_msg-msgv1.

      p_t_zycbt032-msgv2  = p_itab_msg-msgv2.

      p_t_zycbt032-msgv3  = p_itab_msg-msgv3.

...

 

...

              msg_var1               = sy-msgv1

              msg_var2               = sy-msgv2

              msg_var3               = sy-msgv3

              msg_var4               = sy-msgv4

         IMPORTING

              msg_text               = p_t_zycbt032-msg

         EXCEPTIONS

              function_not_completed = 1

              message_not_found      = 2

              OTHERS                 = 3.

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

  if sy-subrc = 0.

  else.

  endif.

* << Fim da inclusão

    p_t_zycbt032-mandt  = p_t_dados-mandt.

    p_t_zycbt032-tcode  = p_tcode.

    p_t_zycbt032-tabela = p_t_dados-tabela.

    p_t_zycbt032-cpochv = p_t_dados-cpochv.

    p_t_zycbt032-tpmsg  = 'S'.

    p_t_zycbt032-msgid  = p_msgid.

    p_t_zycbt032-nrmsg  = p_msgno.

    p_t_zycbt032-msgv1  = sy-msgv1.

    p_t_zycbt032-msgv2  = sy-msgv2.

    p_t_zycbt032-msgv3  = sy-msgv3.

...

 

...

    v_belnr = p_t_dados-belnr.

    p_t_dados-belnr = p_t_zycbt032-belnr.

    p_t_dados-dtdocto = p_t_dados-budat.

    MODIFY p_t_dados TRANSPORTING: belnr dtdocto WHERE belnr = v_belnr.

  ENDIF.

  REFRESH: p_itab_bdc.

ENDFORM.

FORM  obter_taxa_cambial USING value(p_belnr)

                               value(p_bukrs)

                               value(p_budat)

* >> Início da exclusão: FORM OBTER_TAXA_CAMBIAL

                         CHANGING    p_taxa.

* << Fim da exclusão

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

                         CHANGING    p_taxa."#EC *

* << Fim da inclusão

  DATA: wa_bkpf LIKE bkpf.

  CALL FUNCTION 'READ_DOCUMENT_HEADER'

       EXPORTING

            belnr          = p_belnr

            bukrs          = p_bukrs

            gjahr          = p_budat(4)

       IMPORTING

            e_bkpf         = wa_bkpf

       EXCEPTIONS

            exit           = 1

...

 

...

            OTHERS         = 4.

  IF sy-subrc EQ 0.

    p_taxa = wa_bkpf-kursf.

  ENDIF.

ENDFORM.

FORM check_periodo USING    value(p_koart)

                            value(p_monat)

                            value(p_bukrs)

                            value(p_gjahr)

                   CHANGING value(p_novadata)

* >> Início da exclusão: FORM CHECK_PERIODO

                            value(p_ok).

* << Fim da exclusão

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

                            value(p_ok)."#EC *

* << Fim da inclusão

  DATA: v_resposta(1),

        v_novadata LIKE spop-varvalue1.

  v_novadata = p_novadata.

  CALL FUNCTION 'FI_PERIOD_CHECK'

       EXPORTING

            i_bukrs          = p_bukrs

            i_gjahr          = p_gjahr

            i_koart          = p_koart

            i_monat          = p_monat

       EXCEPTIONS

...

 

...

  IF sy-subrc <> 0.

    PERFORM entrar_nova_data USING v_resposta v_novadata.

    IF v_resposta = 'A'.

      RAISE periodo_fechado.

    ENDIF.

  ELSE.

    p_ok = 'S'.

  ENDIF.

  p_novadata = v_novadata.

ENDFORM.

* >> Início da exclusão: FORM ENTRAR_NOVA_DATA

FORM entrar_nova_data CHANGING value(p_resposta)

                               value(p_novadata).

* << Fim da exclusão

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

FORM entrar_nova_data CHANGING

                            value(p_resposta)

                            value(p_novadata)."#EC *

* << Fim da inclusão

  DATA: v_data_ TYPE d.

  WHILE v_data_ IS INITIAL OR

        v_data_ EQ '00000000'.

    IF sy-index > 1.

      MESSAGE i061(/pws/zycbm) WITH text-051.

    ENDIF.

    CALL FUNCTION 'TR_POPUP_INPUT_DATE'

         EXPORTING

              iv_title               = text-012

              iv_description1        = text-010

              iv_description2        = text-011

              iv_date                = v_data_

         IMPORTING

              ev_date                = v_data_

         EXCEPTIONS

              action_aborted_by_user = 1

              value_not_changed      = 2

              OTHERS                 = 3.

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

  if sy-subrc = 0.

  else.

  endif.

* << Fim da inclusão

    WRITE v_data_ TO p_novadata.

  ENDWHILE.

ENDFORM.

FORM trata_string_credito2 TABLES   p_t_dados STRUCTURE /pws/zycbe033

                                    p_t_campo STRUCTURE /pws/zycbt034

                                    p_itab_oculto2 LIKE itab_oculto2[]

                           USING    value(p_string)

* >> Início da exclusão: FORM TRATA_STRING_CREDITO2

                                    value(p_v_conta).

* << Fim da exclusão

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

                                    value(p_v_conta)."#EC *

* << Fim da inclusão

  DATA:

    v_string(50) TYPE c.

  MOVE p_string TO v_string.

  IF v_string+6(1) = '+'.

    IF p_t_dados-zterm = space.

      CLEAR p_t_campo.

      READ TABLE p_t_campo WITH KEY campo = 'BSEG-ZTERM'.

      IF sy-subrc <> 0.

        p_t_campo-mandt = p_t_dados-mandt.

        p_t_campo-campo = 'BSEG-ZTERM'.

...

 

...

      ENDIF.

    ENDIF.

  ELSEIF v_string+49(1) = '-'.

    p_itab_oculto2-campo = 'COBL-FISTL'.

    p_itab_oculto2-chave = 'C'.

    p_itab_oculto2-conta = p_v_conta.

    APPEND p_itab_oculto2.

  ENDIF.

ENDFORM.

FORM determina_string1 USING    value(p_refer)

* >> Início da exclusão: FORM DETERMINA_STRING1

                       CHANGING value(p_string).

* << Fim da exclusão

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

                       CHANGING value(p_string)."#EC *

* << Fim da inclusão

  CALL FUNCTION '/PWS/ZYCE_SELECT_FIELDS'

       EXPORTING

            i_referencia       = p_refer

       IMPORTING

            e_controle         = p_string

       EXCEPTIONS

            field_status_group = 1

            OTHERS             = 2.

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

  if sy-subrc = 0.

  else.

  endif.

* << Fim da inclusão

ENDFORM.

FORM bdc_tela USING    value(par1)

* >> Início da exclusão: FORM BDC_TELA

                       value(par2).

* << Fim da exclusão

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

                       value(par2)."#EC *

* << Fim da inclusão

  CLEAR itab_bdc.

  itab_bdc-program  = par1.

  itab_bdc-dynpro   = par2.

  itab_bdc-dynbegin = 'X'.

  APPEND itab_bdc.

ENDFORM.

FORM bdc_campo USING    value(par1)

* >> Início da exclusão: FORM BDC_CAMPO

                        value(par2).

* << Fim da exclusão

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

                        value(par2)."#EC *

* << Fim da inclusão

  CLEAR itab_bdc.

  itab_bdc-fnam = par1.

  itab_bdc-fval = par2.

  APPEND itab_bdc.

ENDFORM.

FORM trata_campo_obrigatorio TABLES p_t_dados  STRUCTURE /pws/zycee005

                                    p_t_campos STRUCTURE /pws/zycet004

                                    p_itab_oculto LIKE itab_oculto[]

* >> Início da exclusão: FORM TRATA_CAMPO_OBRIGATORIO

                             USING  value(p_string).

* << Fim da exclusão

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

                             USING  value(p_string)."#EC *

* << Fim da inclusão

  DATA: v_string(80) TYPE c.

  MOVE p_string TO v_string.

  IF v_string+0(1) = '+'.

    IF p_t_dados-docdat = space.

      CLEAR p_t_campos.

      READ TABLE p_t_campos WITH KEY campo = 'J_1BDYDOC-DOCDAT'.

      IF sy-subrc <> 0.

        p_t_campos-mandt = p_t_dados-mandt.

        p_t_campos-campo = 'J_1BDYDOC-DOCDAT'.

        p_t_campos-descricao = text-034.

...

 

...

FORM z_call_transaction TABLES   p_itab_msg   STRUCTURE   itab_msg

                                 p_itab_bdc   STRUCTURE   itab_bdc

                                 p_t_zycet005 STRUCTURE

 /pws/zycet005

                                 p_t_dados    STRUCTURE   /pws/zycee004

                        USING    p_tcode

                                 p_mode

                                 p_update

                                 p_msgid

                                 p_msgno

* >> Início da exclusão: FORM Z_CALL_TRANSACTION

                        CHANGING p_nrmsg.

* << Fim da exclusão

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

                        CHANGING p_nrmsg."#EC CALLED

* << Fim da inclusão

  DATA: v_belnr LIKE bseg-belnr.

  CALL TRANSACTION p_tcode USING p_itab_bdc

                         MODE  p_mode

                         UPDATE p_update

* >> Início da exclusão: FORM Z_CALL_TRANSACTION

                         MESSAGES INTO p_itab_msg.

* << Fim da exclusão

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

                         MESSAGES INTO p_itab_msg."#EC *

* << Fim da inclusão

  IF sy-subrc <> 0.

    LOOP AT p_itab_msg.

      ADD 1 TO p_nrmsg.

      CALL FUNCTION 'MESSAGE_PREPARE'

           EXPORTING

                language               = sy-langu

                msg_id                 = p_itab_msg-msgid

                msg_no                 = p_itab_msg-msgnr

                msg_var1               = p_itab_msg-msgv1

                msg_var2               = p_itab_msg-msgv2

                msg_var3               = p_itab_msg-msgv3

                msg_var4               = p_itab_msg-msgv4

           IMPORTING

                msg_text               = p_t_zycet005-msg

           EXCEPTIONS

                function_not_completed = 1

                message_not_found      = 2

                OTHERS                 = 3.

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

  if sy-subrc = 0.

  else.

  endif.

* << Fim da inclusão

      p_t_zycet005-mandt  = p_t_dados-mandt.

      p_t_zycet005-tcode  = p_tcode.

      p_t_zycet005-tabela = p_t_dados-tabela.

      p_t_zycet005-cpochv = p_t_dados-cpochv.

      p_t_zycet005-tpmsg  = 'E'.

      p_t_zycet005-nrmsg  = p_nrmsg.

      APPEND p_t_zycet005.

    ENDLOOP.

  ELSE.

    ADD 1 TO p_nrmsg.

...

 

...

              msg_var1               = sy-msgv1

              msg_var2               = sy-msgv2

              msg_var3               = sy-msgv3

              msg_var4               = sy-msgv4

         IMPORTING

              msg_text               = p_t_zycet005-msg

         EXCEPTIONS

              function_not_completed = 1

              message_not_found      = 2

              OTHERS                 = 3.

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

  if sy-subrc = 0.

  else.

  endif.

* << Fim da inclusão

    p_t_zycet005-mandt  = p_t_dados-mandt.

    p_t_zycet005-tcode  = p_tcode.

    p_t_zycet005-tabela = p_t_dados-tabela.

    p_t_zycet005-cpochv = p_t_dados-cpochv.

    p_t_zycet005-tpmsg  = 'S'.

    p_t_zycet005-nrmsg  = p_nrmsg.

    p_t_zycet005-belnr  = sy-msgv1.

    SHIFT p_t_zycet005-belnr RIGHT DELETING TRAILING space.

    TRANSLATE p_t_zycet005-belnr USING ' 0'.

    APPEND p_t_zycet005.

...

 

...

FORM call_transaction1 TABLES   p_itab_msg STRUCTURE itab_msg

                                p_itab_bdc STRUCTURE itab_bdc

                                p_t_zycet005 STRUCTURE

 /pws/zycet005

                                p_t_dados STRUCTURE /pws/zycee005

                       USING    p_tcode

                                p_mode

                                p_update

                                p_msgid

                                p_msgno

* >> Início da exclusão: FORM CALL_TRANSACTION1

                       CHANGING p_nrmsg.

* << Fim da exclusão

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

                       CHANGING p_nrmsg."#EC CALLED

* << Fim da inclusão

  DATA: v_belnr LIKE bseg-belnr.

  CALL TRANSACTION p_tcode USING p_itab_bdc

                         MODE  p_mode

                         UPDATE p_update

* >> Início da exclusão: FORM CALL_TRANSACTION1

                         MESSAGES INTO p_itab_msg.

* << Fim da exclusão

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

                         MESSAGES INTO p_itab_msg."#EC *

* << Fim da inclusão

  IF sy-subrc <> 0.

    LOOP AT p_itab_msg.

      ADD 1 TO p_nrmsg.

      CALL FUNCTION 'MESSAGE_PREPARE'

           EXPORTING

                language               = sy-langu

                msg_id                 = p_itab_msg-msgid

                msg_no                 = p_itab_msg-msgnr

                msg_var1               = p_itab_msg-msgv1

                msg_var2               = p_itab_msg-msgv2

                msg_var3               = p_itab_msg-msgv3

                msg_var4               = p_itab_msg-msgv4

           IMPORTING

                msg_text               = p_t_zycet005-msg

           EXCEPTIONS

                function_not_completed = 1

                message_not_found      = 2

                OTHERS                 = 3.

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

  if sy-subrc = 0.

  else.

  endif.

* << Fim da inclusão

      p_t_zycet005-mandt  = p_t_dados-mandt.

      p_t_zycet005-tcode  = p_tcode.

      p_t_zycet005-tabela = p_t_dados-tabela.

      p_t_zycet005-cpochv = p_t_dados-cpochv.

      p_t_zycet005-tpmsg  = 'E'.

      p_t_zycet005-nrmsg  = p_nrmsg.

      APPEND p_t_zycet005.

    ENDLOOP.

  ELSE.

    ADD 1 TO p_nrmsg.

...

 

...

              msg_var1               = sy-msgv1

              msg_var2               = sy-msgv2

              msg_var3               = sy-msgv3

              msg_var4               = sy-msgv4

         IMPORTING

              msg_text               = p_t_zycet005-msg

         EXCEPTIONS

              function_not_completed = 1

              message_not_found      = 2

              OTHERS                 = 3.

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

  if sy-subrc = 0.

  else.

  endif.

* << Fim da inclusão

    p_t_zycet005-mandt  = p_t_dados-mandt.

    p_t_zycet005-tcode  = p_tcode.

    p_t_zycet005-tabela = p_t_dados-tabela.

    p_t_zycet005-cpochv = p_t_dados-cpochv.

    p_t_zycet005-tpmsg  = 'S'.

    p_t_zycet005-nrmsg  = p_nrmsg.

    p_t_zycet005-belnr  = sy-msgv1.

    SHIFT p_t_zycet005-belnr RIGHT DELETING TRAILING space.

    TRANSLATE p_t_zycet005-belnr USING ' 0'.

    APPEND p_t_zycet005.

...

 

...

    p_t_dados-belnr = p_t_zycet005-belnr.

    MODIFY p_t_dados TRANSPORTING belnr WHERE belnr = v_belnr.

    itab_zycet006-belnr = p_t_zycet005-belnr.

    MODIFY itab_zycet006 TRANSPORTING belnr WHERE belnr = v_belnr.

  ENDIF.

  REFRESH: p_itab_bdc.

ENDFORM.

FORM trata_string_deb1 TABLES   p_t_dados STRUCTURE /pws/zycee005

                                p_t_campo STRUCTURE /pws/zycet004

                                p_itab_oculto STRUCTURE itab_oculto

* >> Início da exclusão: FORM TRATA_STRING_DEB1

                       USING    value(p_string).

* << Fim da exclusão

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

                       USING    value(p_string)."#EC *

* << Fim da inclusão

  DATA:

    v_string(50) TYPE c.

  MOVE p_string TO v_string.

  IF v_string+5(1) = '+'.

    IF p_t_dados-d_valut = space.

      CLEAR p_t_campo.

      READ TABLE p_t_campo WITH KEY campo = 'BSEG-VALUT'.

      IF sy-subrc <> 0.

        p_t_campo-mandt = p_t_dados-mandt.

        p_t_campo-campo = 'BSEG-VALUT'.

...

 

...

    ENDIF.

  ELSEIF v_string+11(1) = '-'.

    p_itab_oculto-campo = 'COBL-PS_PSP_PNR'.

    p_itab_oculto-chave = 'D'.

    APPEND p_itab_oculto.

  ENDIF.

ENDFORM.

FORM trata_string_cred1 TABLES   p_t_dados STRUCTURE /pws/zycee005

                                 p_t_campo STRUCTURE /pws/zycet004

                                 p_itab_oculto STRUCTURE itab_oculto

* >> Início da exclusão: FORM TRATA_STRING_CRED1

                        USING    value(p_string).

* << Fim da exclusão

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

                        USING    value(p_string)."#EC *

* << Fim da inclusão

  DATA:

    v_string(50) TYPE c.

  MOVE p_string TO v_string.

  IF v_string+5(1) = '+'.

    IF p_t_dados-c_valut = space.

      CLEAR p_t_campo.

      READ TABLE p_t_campo WITH KEY campo = 'BSEG-VALUT'.

      IF sy-subrc <> 0.

        p_t_campo-mandt = p_t_dados-mandt.

        p_t_campo-campo = 'BSEG-VALUT'.

...

 

...

        ENDIF.

      ENDIF.

    ENDIF.

  ELSEIF v_string+49(1) = '-'.

    p_itab_oculto-campo = 'COBL-FISTL'.

    p_itab_oculto-chave = 'C'.

    APPEND p_itab_oculto.

  ENDIF.

ENDFORM.

FORM mensagem_erro  TABLES  p_t_dados STRUCTURE /pws/zycee005

* >> Início da exclusão: FORM MENSAGEM_ERRO

                            p_t_zycet005 STRUCTURE /pws/zycet005.

* << Fim da exclusão

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

                       p_t_zycet005 STRUCTURE /pws/zycet005."#EC CALLED

* << Fim da inclusão

  IF p_t_dados-d_newko IS INITIAL OR p_t_dados-c_newko IS INITIAL.

    p_t_zycet005-mandt  = p_t_dados-mandt.

    p_t_zycet005-tcode  = p_t_dados-tcode.

    p_t_zycet005-tabela = p_t_dados-tabela.

    p_t_zycet005-cpochv = p_t_dados-cpochv.

    p_t_zycet005-tpmsg  = 'E'.

    p_t_zycet005-msg    = text-042.

    APPEND p_t_zycet005.

  ELSE.

    p_t_zycet005-mandt  = p_t_dados-mandt.

...

 

...

    LOOP AT itab_t041b.

      IF itab_t041b-bukrs = itab_t041b-bbukr.

        DELETE itab_t041b.

      ENDIF.

    ENDLOOP.

    CLEAR itab_t041b.

    CHECK NOT itab_t041b[] IS INITIAL.

    IF p_tpcont EQ 'S'.

      SELECT bukrs saknr FROM skb1

             INTO TABLE itab_empresas

* >> Início da exclusão: FORM VERIFICA_EMPRESAS

             WHERE saknr EQ p_conta.

* << Fim da exclusão

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

             WHERE saknr EQ p_conta."#EC CI_SGLSELECT

* << Fim da inclusão

    ELSEIF p_tpcont EQ 'K'.

      SELECT bukrs lifnr FROM lfb1

             INTO TABLE itab_empresas

             WHERE lifnr EQ p_conta.

    ELSEIF p_tpcont EQ 'D'.

      SELECT bukrs kunnr FROM knb1

             INTO TABLE itab_empresas

             WHERE kunnr EQ p_conta.

    ENDIF.

    IF NOT itab_empresas[] IS INITIAL.

...

 

...

  ENDIF.

  CALL FUNCTION 'FI_VENDOR_DATA'

       EXPORTING

            i_bukrs        = t_dados_bukrs

            i_lifnr        = v_agkon

       IMPORTING

            e_kred         = vf_kred

       EXCEPTIONS

            vendor_missing = 1

            OTHERS         = 2.

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

  if sy-subrc = 0.

  else.

  endif.

* << Fim da inclusão

  MOVE-CORRESPONDING vf_kred TO lfb1.

  CALL FUNCTION 'FI_CUSTOMER_DATA'

       EXPORTING

            i_bukrs          = t_dados_bukrs

            i_kunnr          = v_agkon

       IMPORTING

            e_debi           = vf_debi

       EXCEPTIONS

            customer_missing = 1

            OTHERS           = 2.

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

  if sy-subrc = 0.

  else.

  endif.

* << Fim da inclusão

  MOVE-CORRESPONDING vf_debi TO knb1.

  CASE tbsl-koart.

    WHEN 'D'.

      MOVE: knb1-akont TO bseg-hkont,

            tbsl-koart TO bseg-koart.

    WHEN 'K'.

      MOVE: lfb1-akont TO bseg-hkont,

            tbsl-koart TO bseg-koart.

  ENDCASE.

  SELECT SINGLE * FROM ska1

...

 

...

    PERFORM zeile_modifizieren(sapff001)

      USING    p_telas-name p_telas-group1 p_telas-group2

               p_telas-group3 p_telas-group4

      CHANGING v_input v_output v_required

               v_invisible.

  ENDIF.

ENDFORM.

FORM trata_string_debito3 TABLES  p_t_contas STRUCTURE /pws/zycbe035

                                  p_t_campo STRUCTURE /pws/zycbt034

                                  p_itab_oculto LIKE itab_oculto[]

* >> Início da exclusão: FORM TRATA_STRING_DEBITO3

                         USING    value(p_string).

* << Fim da exclusão

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

                         USING    value(p_string)."#EC *

* << Fim da inclusão

  DATA:   v_string(50) TYPE c.

  MOVE p_string TO v_string.

  IF v_string+5(1) = '+'.

    IF p_t_contas-d_valut = space.

      CLEAR p_t_campo.

      READ TABLE p_t_campo WITH KEY campo = 'BSEG-VALUT'.

      IF sy-subrc <> 0.

        p_t_campo-mandt = p_t_contas-mandt.

        p_t_campo-campo = 'BSEG-VALUT'.

        p_t_campo-descricao = text-019.

...

 

...

    p_itab_oculto-chave = 'C'.

    APPEND p_itab_oculto.

    p_itab_oculto-campo = 'BSEG-EBELP'.

    p_itab_oculto-chave = 'C'.

    APPEND p_itab_oculto.

  ENDIF.

ENDFORM.

FORM trata_string_credito3 TABLES  p_t_contas STRUCTURE /pws/zycbe035

                                  p_t_campo STRUCTURE /pws/zycbt034

                                  p_itab_oculto LIKE itab_oculto[]

* >> Início da exclusão: FORM TRATA_STRING_CREDITO3

                         USING    value(p_string).

* << Fim da exclusão

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

                         USING    value(p_string)."#EC *

* << Fim da inclusão

  DATA: v_string(50) TYPE c.

  MOVE p_string TO v_string.

  IF v_string+5(1) = '+'.

    IF p_t_contas-c_valut = space.

      CLEAR p_t_campo.

      READ TABLE p_t_campo WITH KEY campo = 'BSEG-VALUT'.

      IF sy-subrc <> 0.

        p_t_campo-mandt = p_t_contas-mandt.

        p_t_campo-campo = 'BSEG-VALUT'.

        p_t_campo-descricao = text-019.

...

 

 

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

Modificações efetuadas em REPT /PWS/SAPLZYCBGF2

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 001

 

Texto: (1 caracteres)

"X"

 

Comprimento máximo: 1

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 002

 

Texto: (73 caracteres)

"Empresa, conta de débito ou conta de crédito em branco na tabela T"

"_DADOS."

 

Comprimento máximo: 73

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 003

 

Texto: (42 caracteres)

"Campo D_VALUT em branco na tabela T_DADOS."

 

Comprimento máximo: 42

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 004

 

Texto: (42 caracteres)

"Campo D_ZUONR em branco na tabela T_DADOS."

 

Comprimento máximo: 42

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 005

 

Texto: (42 caracteres)

"Campo D_SGTXT em branco na tabela T_DADOS."

 

Comprimento máximo: 42

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 006

 

Texto: (42 caracteres)

"Campo D_GSBER em branco na tabela T_DADOS."

 

Comprimento máximo: 42

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 007

 

Texto: (42 caracteres)

"Campo D_KOSTL em branco na tabela T_DADOS."

 

Comprimento máximo: 42

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 036

 

Texto: (21 caracteres)

"Número da Nota Fiscal"

 

Comprimento máximo: 21

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 037

 

Texto: (6 caracteres)

"Filial"

 

Comprimento máximo: 6

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 044

 

Texto: (10 caracteres)

"BSEG-GSBER"

 

Comprimento máximo: 10

 

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

Incluído símbolo de texto:

 

Idioma: PT

 

Símbolo: 052

 

Texto: (4 caracteres)

"Des."

 

Comprimento máximo: 4

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: D01

 

Texto: (72 caracteres)

"L/C SOLICITA CERTIFICADO DE INSPEÇÃO E NÃO HÁ ACOMPANHAMENTO DE IN"

"SPEÇÃO"

 

Comprimento máximo: 72

 

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

Excluído símbolo de texto:

 

Idioma: PT

 

Símbolo: D02

 

Texto: (84 caracteres)

"EMPRESA INSPETORA INDICADA NA L/C DIFERENTE DA EMPRESA DO ACOMPANH"

"AMENTO DE INSPEÇÃO"

 

Comprimento máximo: 84