CE PLUS - Nota 004653
Módulo: DOC. EXPORTAÇÃO
Funcionalidade: Registro de Exportação (RE)
Data/Hora da Publicação: 06/09/2007 00:00:00
Data/Hora Última Alteração: 04/03/2010 11:11:45
Descrição da Nota: CODE INSPECTOR RE
Sintoma
Erros/Warnings no Code Inspector e na Verificação Ampliada no Programa do RE
Solução
Correção dos Erros e Warnings Apresentados no Code Inspector e na Verificação Ampliada.
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 04653 Data: 06/09/2007 Hora: 16:35:56
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 04653
Categoria : Melhoria
Prioridade : Baixa
Versão PW.CE : 7.0
Pacote : 00002
Agrupamento : 00011
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
CODE INSPECTOR RE
----------------------------------------------------------------------------------------------------
Palavras Chave:
CODE INSPECTOR RE /PWS/SAPMZYCE041
----------------------------------------------------------------------------------------------------
Objetos da nota:
DOCU NA/PWS/ZYCEM118
REPS /PWS/MZYCE041F01
REPS /PWS/MZYCE041I01
REPS /PWS/MZYCE041O01
REPS /PWS/MZYCE041TOP
REPS /PWS/MZYCE041X01
REPT /PWS/SAPMZYCE041
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE041F01
...
SELECT SINGLE filial FROM /pws/zycet145 INTO v_branch
WHERE bukrs = itab_zycet116-bukrs
AND filial NE space.
IF sy-subrc = 4.
CALL FUNCTION 'J_1BREAD_CGC_COMPANY'
EXPORTING
bukrs = itab_zycet116-bukrs
IMPORTING
branch = v_branch
EXCEPTIONS
* >> Início da exclusão: FORM SEL_CNPJ
OTHERS = 1.
* << Fim da exclusão
* >> Início da inclusão: FORM SEL_CNPJ
OTHERS = 0.
* << Fim da inclusão
ENDIF.
CALL FUNCTION 'J_1BREAD_BRANCH_DATA'
EXPORTING
branch = v_branch
bukrs = itab_zycet116-bukrs
IMPORTING
cgc_number = v_cgc
EXCEPTIONS
branch_not_found = 1
address_not_found = 2
...
...
CALL FUNCTION '/PWS/ZYCE_DESCRICAO_MATERIAL'
EXPORTING
bukrs = itab_zycet116-bukrs
ncm = ncm
werks = itab_zycet116-werks
agrupado = itab_zycet116-agrupado
TABLES
itab_zycet002 = itab_zycet002
itab_zycet118 = itab_zycet118
itab_zycet092 = itab_zycet092
* >> Início da exclusão: FORM TRATA_DESCRICAO
itab_zycet078 = itab_zycet078.
* << Fim da exclusão
* >> Início da inclusão: FORM TRATA_DESCRICAO
itab_zycet078 = itab_zycet078aux.
* << Fim da inclusão
SORT itab_zycet118 BY nrseqre codnrseq.
SORT itab_zycet092 BY nrseqre codnrseq.
* >> Início da inclusão: FORM TRATA_DESCRICAO
IF NOT itab_zycet078aux IS INITIAL.
LOOP AT itab_zycet078aux.
MOVE-CORRESPONDING itab_zycet078aux TO itab_zycet078.
APPEND itab_zycet078.
ENDLOOP.
ENDIF.
* << Fim da inclusão
CLEAR itab_zyglt100.
READ TABLE itab_zyglt100 WITH KEY zexit = 'REX009'.
IF sy-subrc IS INITIAL.
IF NOT itab_zyglt100-programa IS INITIAL AND
NOT itab_zyglt100-formulario IS INITIAL.
PERFORM (itab_zyglt100-formulario)
IN PROGRAM (itab_zyglt100-programa)
IF FOUND.
ENDIF.
ENDIF.
...
...
IF NOT itab_rc[] IS INITIAL.
MESSAGE i001 WITH text-006.
LOOP AT itab_zycet092.
MOVE: itab_zycet092-ncm TO itab_ncm-steuc.
APPEND itab_ncm.
ENDLOOP.
DELETE ADJACENT DUPLICATES FROM itab_ncm.
CALL SCREEN '0004' STARTING AT 5 2.
PERFORM rc_move_zycet116.
ELSE.
* >> Início da exclusão: FORM RC_VERIFICA_RE
CLEAR rcxre.
* << Fim da exclusão
CLEAR: itab_zycet092, itab_zycet118.
REFRESH: itab_zycet092, itab_zycet118.
FREE: itab_zycet092, itab_zycet118.
ENDIF.
ENDFORM.
FORM seleciona_ncm.
* >> Início da exclusão: FORM SELECIONA_NCM
MOVE 'X' TO rcxre.
* << Fim da exclusão
CLEAR itab_ncm.
...
...
FROM /pws/zycet014
INTO TABLE itab_zycet014
FOR ALL ENTRIES IN itab_002
WHERE nrseq = itab_002-nrseq.
SELECT nrseq import15
FROM /pws/zycet014a
INTO TABLE itab_zycet014a
FOR ALL ENTRIES IN itab_002
WHERE nrseq = itab_002-nrseq.
ENDIF.
* >> Início da exclusão: FORM SEL_PARAM_CABEC
LOOP AT itab_zycet118 WHERE tipo NE space.
SELECT SINGLE * FROM /pws/zycet130 INTO itab_zycet130
WHERE tipo EQ itab_zycet118-tipo.
ENDLOOP.
IF NOT itab_zycet118[] IS INITIAL.
SELECT * FROM /pws/zycet130 INTO TABLE itab_zycet130
FOR ALL ENTRIES IN itab_zycet118
WHERE tipo EQ itab_zycet118-tipo
AND tipo NE space.
* << Fim da exclusão
CLEAR totanexo.
LOOP AT itab_zycet118.
totanexo = totanexo + itab_zycet118-vfob.
ENDLOOP.
* >> Início da exclusão: FORM SEL_PARAM_CABEC
ENDIF.
* << Fim da exclusão
ENDFORM.
FORM verifica_ov.
IF itab_zycet116-tpre IS INITIAL.
...
...
lines = itab_tline4
EXCEPTIONS
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
wrong_access_to_archive = 7
OTHERS = 8.
* >> Início da inclusão: FORM CRIA_MARCACAO
IF sy-subrc = 0.
* << Fim da inclusão
CLEAR itab_tline4.
READ TABLE itab_tline4 INDEX 1.
IF sy-subrc = 0.
MOVE itab_tline4-tdline TO itab_zycet118-marca.
* >> Início da inclusão: FORM CRIA_MARCACAO
MODIFY itab_zycet118 INDEX v_index.
* << Fim da inclusão
ENDIF.
* >> Início da inclusão: FORM CRIA_MARCACAO
ENDIF.
* << Fim da inclusão
* >> Início da exclusão: FORM CRIA_MARCACAO
MODIFY itab_zycet118 INDEX v_index.
* << Fim da exclusão
ENDLOOP.
ENDIF.
CLEAR itab_zycet041.
READ TABLE itab_zycet041 WITH KEY pgmna = '/PWS/SAPMZYCE105'
codint = '002'.
IF sy-subrc = 0.
v_id = itab_zycet041-tdid.
CLEAR :itab_tline4. REFRESH : itab_tline4.
LOOP AT itab_zycet118.
v_index = sy-tabix.
...
...
lines = itab_tline4
EXCEPTIONS
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
wrong_access_to_archive = 7
OTHERS = 8.
* >> Início da inclusão: FORM CRIA_MARCACAO
IF sy-subrc = 0.
* << Fim da inclusão
CLEAR itab_tline4.
READ TABLE itab_tline4 INDEX 1.
IF sy-subrc = 0.
CONCATENATE itab_zycet118-marca '/' itab_tline4-tdline INTO
itab_zycet118-marca.
ENDIF.
MODIFY itab_zycet118 INDEX v_index.
* >> Início da inclusão: FORM CRIA_MARCACAO
ENDIF.
* << Fim da inclusão
ENDLOOP.
ENDIF.
LOOP AT itab_zycet092.
READ TABLE itab_zycet118
WITH KEY codnrseq = itab_zycet092-codnrseq
TRANSPORTING marca.
IF sy-subrc = 0.
itab_zycet092-marca = itab_zycet118-marca.
MODIFY itab_zycet092.
ENDIF.
...
...
days = v_days
signum = '+'
months = '0'
years = '0'
IMPORTING
calc_date = itab_zycet116-dtlimi.
ENDIF.
ENDFORM.
FORM verifica_branch.
DATA: v_dif,
* >> Início da exclusão: FORM VERIFICA_BRANCH
v_index LIKE sy-tabix,
v_nrseqre LIKE /pws/zycet116-nrseqre.
* << Fim da exclusão
* >> Início da inclusão: FORM VERIFICA_BRANCH
v_index LIKE sy-tabix.
* << Fim da inclusão
REFRESH: itab_centro, itab_centro_aux.
CLEAR: itab_centro, itab_centro_aux, v_dif.
IF NOT itab_zycet002[] IS INITIAL.
SELECT * FROM /pws/zycet037 INTO TABLE itab_zycet037
FOR ALL ENTRIES IN itab_zycet002
WHERE bukrs EQ itab_zycet002-bukrs.
ENDIF.
LOOP AT itab_zycet002.
CHECK itab_zycet002-st_vd = 'VD'
OR itab_zycet002-st_vd = 'DP'.
...
...
IF itab_zycet037-centro_dif EQ c_sim.
v_dif = 1.
ENDIF.
ENDLOOP.
SORT itab_centro BY werks j_1bbranch.
DELETE ADJACENT DUPLICATES FROM itab_centro.
itab_centro_aux[] = itab_centro[].
IF NOT v_dif IS INITIAL.
DESCRIBE TABLE itab_centro LINES v_index.
IF v_index GT 1.
* >> Início da exclusão: FORM VERIFICA_BRANCH
MOVE itab_zycet116-nrseqre TO v_nrseqre.
* << Fim da exclusão
SELECT a~nrseq b~nrseqre b~werks b~j_1bbranch
FROM /pws/zycev117 AS a
INNER JOIN /pws/zycet116 AS b
ON b~nrseqre = a~nrseqre
INTO TABLE itab_locneg
WHERE a~nrseq = /pws/zycee001-nrseq.
ENDIF.
IF NOT itab_locneg[] IS INITIAL.
LOOP AT itab_locneg.
CLEAR itab_centro.
...
...
FORM determina_enquad.
IF itab_zycet116-tpre EQ '05'.
CALL FUNCTION '/PWS/ZYCE_ENQFAB_RE'
EXPORTING
agrupado = itab_zycet116-agrupado
tipo = 'ENQ'
itab_zycet092_aux = itab_zycet092_aux
TABLES
itab_zycet002 = itab_zycet002
itab_zycet118 = itab_zycet118
* >> Início da exclusão: FORM DETERMINA_ENQUAD
itab_zycet078 = itab_zycet078
* << Fim da exclusão
* >> Início da inclusão: FORM DETERMINA_ENQUAD
itab_zycet078 = itab_zycet078aux
* << Fim da inclusão
itab_zycet092 = itab_zycet092
itab_zycet116 = itab_zycet116
itab_zycet066 = itab_zycet066
itab_zycet119 = itab_zycet119.
* >> Início da inclusão: FORM DETERMINA_ENQUAD
LOOP AT itab_zycet078aux.
MOVE-CORRESPONDING itab_zycet078aux TO itab_zycet078.
MODIFY itab_zycet078 INDEX sy-tabix.
ENDLOOP.
* << Fim da inclusão
ELSE.
APPEND itab_zycet116.
ENDIF.
READ TABLE itab_zycet116 INDEX 1.
IF v_ato NE 'X' AND
( itab_zycet116-codagrup EQ '000007' OR
itab_zycet116-codagrup EQ '000010' OR
itab_zycet116-codagrup EQ '000013' OR
itab_zycet116-codagrup EQ '000014' ).
IF NOT itab_zycet116-codenq3 IS INITIAL
...
...
MODIFY itab_zycet078.
ENDLOOP.
ELSEIF v_ato EQ ' ' AND itab_zycet116-codenq1 IS INITIAL.
MOVE: wa_zycet145-codenq TO itab_zycet116-codenq1.
ENDIF.
PERFORM dias_limite.
MODIFY itab_zycet116 INDEX 1.
ENDFORM.
FORM verifica_re.
DATA: itab_zycet008 LIKE /pws/zycet008 OCCURS 0 WITH HEADER LINE.
* >> Início da exclusão: FORM VERIFICA_RE
DATA: itab_zycet156 LIKE /pws/zycet156 OCCURS 0 WITH HEADER LINE.
* << Fim da exclusão
DATA: itab_soma LIKE /pws/zycet002 OCCURS 0 WITH HEADER LINE.
DATA: v_rateio.
TABLES: /pws/zycee313.
SELECT * FROM /pws/zycet065 INTO TABLE itab_zycet065.
SELECT * FROM /pws/zycet008 INTO TABLE itab_zycet008
WHERE nrseq EQ /pws/zycee001-nrseq.
* >> Início da exclusão: FORM VERIFICA_RE
SELECT * FROM /pws/zycet156 INTO TABLE itab_zycet156
WHERE codmod = 'X'.
* << Fim da exclusão
LOOP AT itab_zycet002.
IF itab_zycet002-vlme_r IS INITIAL.
SELECT SINGLE * FROM /pws/zyglt217
WHERE arbgb EQ '/PWS/ZYCEM' AND msgnr EQ '118'.
IF sy-subrc EQ 0 AND NOT /pws/zyglt217-msgtp IS INITIAL.
ENDIF.
ENDIF.
READ TABLE itab_zycet065 WITH KEY inco1 = itab_zycet002-inco1.
IF sy-subrc EQ 0.
IF NOT itab_zycet065-fob IS INITIAL AND
...
...
inco1 TYPE /pws/zycet065-inco1,
fob TYPE /pws/zycet065-fob,
frete TYPE /pws/zycet065-frete,
seguro TYPE /pws/zycet065-seguro,
outras_desp TYPE /pws/zycet065-outras_desp,
comissao TYPE /pws/zycet065-comissao,
END OF ty_zycet065.
DATA: wa_zycet065 TYPE ty_zycet065,
v_despesas TYPE /pws/zycet002-vlme,
v_totdesp TYPE /pws/zycet002-vlme,
* >> Início da exclusão: FORM AJUSTA_PRECOS
v_peso_db TYPE /pws/zycet002-fkimg,
* << Fim da exclusão
v_valor_anexo TYPE /pws/zycee092-netpr.
READ TABLE itab_zycet001 INDEX 1.
CHECK sy-subrc IS INITIAL.
SELECT SINGLE inco1
fob
frete
seguro
outras_desp
comissao
FROM /pws/zycet065
INTO wa_zycet065
WHERE inco1 EQ itab_zycet001-inco1.
IF itab_zycet116-agrupado EQ 'S'.
LOOP AT itab_zycet092 ASSIGNING <fs_zycet092>.
* >> Início da exclusão: FORM AJUSTA_PRECOS
CLEAR: v_peso_db,
v_totdesp.
* << Fim da exclusão
* >> Início da inclusão: FORM AJUSTA_PRECOS
CLEAR: v_totdesp.
* << Fim da inclusão
LOOP AT itab_zycet118 ASSIGNING <fs_zycet118>
WHERE seqagrupado EQ <fs_zycet092>-codnrseq.
CLEAR v_despesas.
READ TABLE itab_zycet002
WITH KEY vbeln_va = <fs_zycet118>-vbeln_va
aupos = <fs_zycet118>-aupos
vbeln_vl = <fs_zycet118>-vbeln_vl
posnl = <fs_zycet118>-posnl
vbeln_vf = <fs_zycet118>-vbeln_vf
posnr = <fs_zycet118>-posnr
...
...
vlseguro_r
vlod_r
vlagente_r.
CHECK sy-subrc IS INITIAL.
PERFORM ajustes_re_termo USING itab_zycet116-perc_re_termo
CHANGING <fs_zycet118>-fkimg
<fs_zycet118>-ntgew
<fs_zycet118>-brgew
<fs_zycet118>-netpr
<fs_zycet118>-vfob.
* >> Início da exclusão: FORM AJUSTA_PRECOS
v_peso_db = itab_zycet002-fkimg_r *
( 1 + itab_zycet116-perc_re_termo / 100 ).
* << Fim da exclusão
IF NOT wa_zycet065-frete IS INITIAL AND
NOT itab_zycet002-vlfrete_r IS INITIAL.
ADD itab_zycet002-vlfrete_r TO v_despesas.
ENDIF.
IF NOT wa_zycet065-seguro IS INITIAL AND
NOT itab_zycet002-vlseguro_r IS INITIAL.
ADD itab_zycet002-vlseguro_r TO v_despesas.
ENDIF.
IF NOT wa_zycet065-outras_desp IS INITIAL AND
NOT itab_zycet002-vlod_r IS INITIAL.
...
...
MOVE: wa_zycet081-codnaladi TO p_naladi.
ELSE.
MOVE: wa_t604f-/pws/codncmre TO p_ncm,
wa_t604f-/pws/codnaladi TO p_naladi.
ENDIF.
ELSEIF NOT wa_t604f-/pws/codnaladi IS INITIAL.
MOVE: wa_t604f-/pws/codnaladi TO p_naladi.
ENDIF.
ENDIF.
ENDFORM.
* >> Início da exclusão: FORM CONVERTE_UM
FORM converte_um USING value(p_quant_de)
* << Fim da exclusão
* >> Início da inclusão: FORM CONVERTE_UM
FORM converte_um USING value(p_quant_de) TYPE any
* << Fim da inclusão
value(p_um_de) LIKE mara-meins
value(p_um_para) LIKE mara-meins
value(p_matnr) LIKE mara-matnr
* >> Início da exclusão: FORM CONVERTE_UM
CHANGING p_quant_para.
* << Fim da exclusão
* >> Início da inclusão: FORM CONVERTE_UM
CHANGING p_quant_para TYPE any.
* << Fim da inclusão
DATA: v_i_menge LIKE ekpo-menge,
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE041I01
...
WHEN 'OK'.
PERFORM comm_ok.
WHEN 'CANCEL'.
LEAVE PROGRAM.
ENDCASE.
WHEN '0004'.
CASE okcode.
WHEN 'OK'.
PERFORM comm_ok.
WHEN 'CANCEL'.
* >> Início da exclusão: MODULE USER_COMMAND
CLEAR: rcxre, itab_zycet092.
* << Fim da exclusão
* >> Início da inclusão: MODULE USER_COMMAND
CLEAR: itab_zycet092.
* << Fim da inclusão
REFRESH itab_zycet092. FREE itab_zycet092.
LEAVE TO SCREEN 0.
ENDCASE.
WHEN '0005'.
CASE okcode.
WHEN 'OK'.
PERFORM comm_ok.
WHEN 'CANCEL'.
LEAVE TO SCREEN 0.
ENDCASE.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE041O01
...
EXPORTING
i_codmod = 'X'
i_func = v_repid
TABLES
itab_zyglt100 = itab_zyglt100
EXCEPTIONS
i_codmod_nao_encontrado = 1
i_func_nao_encontrado = 2
i_zexit_nao_encontrado = 3
OTHERS = 4.
* >> Início da inclusão: MODULE LOAD_EXIT
CHECK sy-subrc = 0.
* << Fim da inclusão
ENDIF.
ENDMODULE.
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE041TOP
...
INCLUDE /pws/mzyce041x01.
TABLES: /pws/zycee001,
/pws/zycee090,
/pws/zycee112,
/pws/zycee113,
/pws/zycee118,
/pws/zycee235,
/pws/zycee236,
/pws/zyglt217,
t001w.
* >> Início da inclusão:
TABLES: *t615t.
* << Fim da inclusão
* >> Início da exclusão:
TABLES: *t615,
*t615t.
* << Fim da exclusão
CONTROLS: tc_nrrv TYPE TABLEVIEW USING SCREEN '0003',
tc_ncm TYPE TABLEVIEW USING SCREEN '0004',
tc_rc TYPE TABLEVIEW USING SCREEN '0005',
tc_esc TYPE TABLEVIEW USING SCREEN '0006',
tc_param TYPE TABLEVIEW USING SCREEN '0007',
tc_locneg TYPE TABLEVIEW USING SCREEN '0008'.
DATA : BEGIN OF itab_zycet001 OCCURS 10.
INCLUDE STRUCTURE /pws/zycet001.
DATA : END OF itab_zycet001.
DATA : BEGIN OF itab_zycet020 OCCURS 10.
...
...
DATA : BEGIN OF itab_importador OCCURS 10,
name1 LIKE kna1-name1,
regio LIKE kna1-regio,
land1 LIKE kna1-land1,
street LIKE adrc-street,
country LIKE adrc-country,
END OF itab_importador.
DATA : BEGIN OF itab_zycet134 OCCURS 1.
INCLUDE STRUCTURE /pws/zycet134.
DATA : END OF itab_zycet134.
* >> Início da exclusão:
DATA : BEGIN OF itab_zycet130 OCCURS 5.
INCLUDE STRUCTURE /pws/zycet130.
DATA : END OF itab_zycet130.
* << Fim da exclusão
DATA : BEGIN OF itab_zycet014 OCCURS 1,
nrseq LIKE /pws/zycet014-nrseq,
import1 LIKE /pws/zycet014-import1,
import2 LIKE /pws/zycet014-import2,
import3 LIKE /pws/zycet014-import3,
END OF itab_zycet014.
DATA : BEGIN OF itab_zycet014a OCCURS 1,
nrseq LIKE /pws/zycet014a-nrseq,
import15 LIKE /pws/zycet014a-import15,
END OF itab_zycet014a.
...
...
vincular LIKE /pws/zycet118-vincular,
saldordem LIKE /pws/zycet118-saldordem,
END OF itab_zycet118_saldo.
DATA: BEGIN OF wa_rvdados.
INCLUDE STRUCTURE /pws/zycet112.
DATA: END OF wa_rvdados.
DATA: BEGIN OF itab_zyglt100 OCCURS 0.
INCLUDE STRUCTURE /pws/zyglt100.
DATA: END OF itab_zyglt100.
DATA: mark ,
* >> Início da exclusão:
rcxre ,
* << Fim da exclusão
okcode LIKE sy-ucomm,
refresh(1) TYPE c ,
nrseqre LIKE /pws/zycee116-nrseqre ,
totanexo LIKE /pws/zycee118-netpr ,
v_codnrseq LIKE /pws/zycet118-codnrseq.
DATA: v_ntgew(18) TYPE c,
v_brgew(18) TYPE c,
v_netpr(18) TYPE c,
v_vfob(18) TYPE c,
v_vlagente(18) TYPE c,
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE041X01
DATA: BEGIN OF COMMON PART r.
DATA : BEGIN OF itab_zycet002 OCCURS 10.
INCLUDE STRUCTURE /pws/zycet002.
DATA : END OF itab_zycet002.
* >> Início da inclusão:
DATA: BEGIN OF itab_zycet078aux OCCURS 10.
INCLUDE STRUCTURE /pws/zycet078.
DATA: END OF itab_zycet078aux.
* << Fim da inclusão
DATA: BEGIN OF itab_zycet078 OCCURS 10.
INCLUDE STRUCTURE /pws/zycet078.
DATA: codnrseq_ant TYPE /pws/zycet078-codnrseq.
DATA: retif TYPE c.
DATA: END OF itab_zycet078.
DATA: BEGIN OF itab_zycet116 OCCURS 1.
INCLUDE STRUCTURE /pws/zycee116.
DATA: END OF itab_zycet116.
DATA : BEGIN OF itab_zycet092 OCCURS 10.
INCLUDE STRUCTURE /pws/zycet092.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCE041
------------------------------------------------------------------------
Excluído símbolo de texto:
Idioma: PT
Símbolo: 040
Texto: (1 caracteres)
"1"
Comprimento máximo: 1
------------------------------------------------------------------------
Excluído símbolo de texto:
Idioma: PT
Símbolo: 041
Texto: (1 caracteres)
"G"
Comprimento máximo: 1