ABAP ALPHA conversion

最新推荐文章于 2024-10-15 17:07:52 发布

LOVESAP

最新推荐文章于 2024-10-15 17:07:52 发布

阅读量1.3k

点赞数

分类专栏： ABAP 文章标签： output input string

本文链接：https://blog.csdn.net/lovesap/article/details/3956234

版权

ABAP 专栏收录该内容

7 篇文章

订阅专栏

本文介绍 SAP 系统中从外部到内部格式的数字字符串转换方法，并通过示例展示如何进行正确的格式转换。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

*&---------------------------------------------------------------------*
*& Report  Z_CONVERT_NUM_STRING
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  z_convert_num_string.

DATA: input TYPE n LENGTH 5,
      output TYPE string.

input = 123.

*-----------------------------------------------------------------------------*
*Short Text
*Conversion exit ALPHA, external->internal
*
*ALPHA conversion is used especially with account numbers.
*During conversion from the external to the internal format,
*the system checks to see if input in the INPUT field is purely numeric,
*that is, if this input consists only of numbers,
*possibly with spaces before and after them. If this is the case,
*then the number string is inserted right-justified in the display field OUTPUT
*and all spaces to the left of the value are filled with zeroes ('0').
*If the input is not purely numeric, it is inserted in the display field from left to right
*and all extra spaces are filled with blanks.
*
*Example:
*
*(Input field and output field are both eight characters in length)
*
*1. '1234    ' --> '00001234'
*2. 'ABCD    ' --> 'ABCD    '
*3. ' 1234   ' --> '00001234'
*
*Conversion from the internal to the external format
*(function module CONVERSION_EXIT_ALPHA_OUTPUT) is undertaken in exactly the opposite manner.
*-------------------------------------------------------------------------------*

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
  EXPORTING
    input  = input
  IMPORTING
    output = output.

WRITE: / 'From external to internal format:', output.

CLEAR: INPUT, OUTPUT.
INPUT = 00024.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input  = input
  IMPORTING
    output = output.

WRITE: / 'From internal to external format:', output.