ABAP Programs :Using Field Symbols for variable parts of fields

REPORT ZSOURCE2402.
DATA: EXTERNAL_RECORD(4000),
POSITION TYPE I,
LENGTH TYPE N.
FIELD-SYMBOLS < ENTRY>.
EXTERNAL_RECORD = '0005Smith0007Edwards0005Young'.

DO.
LENGTH = EXTERNAL_RECORD+POSITION(4).
IF LENGTH = 0.
EXIT.
ENDIF.
ADD 4 TO POSITION.
ASSIGN EXTERNAL_RECORD+POSITION(LENGTH) TO < ENTRY>.
WRITE < ENTRY>.
ADD LENGTH TO POSITION.
IF POSITION >= 4000.
EXIT.
ENDIF.
ENDDO.

If you like this post, you may as well like these too:

1. ABAP Programs: Working with Field symbols REPORT CHAP2401. * Defining a Field Symbol FIELD-SYMBOLS < FS>. * Variable for later use DATA FIELD VALUE 'X'. * Assigning a field to a Field Symbol ASSIGN FIELD TO...
2. ABAP Programs:Using Field Symbols for components of a structure REPORT ZSOURCE2403. * Table work area for later use TABLES CUSTOMERS. * Defining a Field Symbol FIELD-SYMBOLS <OUTPUT>. * Displaying all fields of all table entries SELECT * FROM CUSTOMERS....
3. FIELD-SYMBOLS: ABAP Keyword a day FIELD-SYMBOLS: <fs>. FIELD-SYMBOLS: <fs> TYPE t. FIELD-SYMBOLS: <fs> TYPE LINE OF t. FIELD-SYMBOLS: <fs> LIKE s. FIELD-SYMBOLS: <fs> LIKE LINE OF s. Field Symbols are placeholders or symbolic names for...
4. ABAP Programs: Using system fields REPORT ZSOURCE0409. WRITE: / ‘Current date’, SY-DATUM, / ‘Current table index’, SY-TABIX, / ‘Loop counter’, SY-INDEX, / ‘System return code’, SY-SUBRC.———————ABAPer, mail: abap.community@gmail.com http://www.erpdb.info...
5. ABAP Programs: Copying fields REPORT ZSOURCE0701. * move fieldsDATA: NAME(25), COUNTER TYPE I.DATA: SOURCE LIKE NAME, TARGET LIKE SOURCE.MOVE: ‘Edison’ TO NAME, 17 TO COUNTER.MOVE SOURCE TO TARGET.* Using the compute command (keyword can...
6. ABAP Programs: Converting number fields * Using numeric texts and packed numbersDATA: NO_EMPLOYEES(4) TYPE N, NO_ROOMS TYPE P, EMPLOYEES_PER_ROOM TYPE P DECIMALS 2.EMPLOYEES_PER_ROOM = NO_EMPLOYEES / NO_ROOMS. * Rounding with integers and packed numbersDATA: INCOME...
7. ABAP Programs: Converting date fields * Using the built-in calendarDATA: RECEIVING_DATE TYPE D, LAST_ADMISSIBLE_DATE TYPE D. RECEIVING_DATE = ’19980223′.LAST_ADMISSIBLE_DATE = RECEIVING_DATE + 10.WRITE / LAST_ADMISSIBLE_DATE. RECEIVING_DATE = ’19980305′.LAST_ADMISSIBLE_DATE = RECEIVING_DATE + 10.WRITE / LAST_ADMISSIBLE_DATE. RECEIVING_DATE...
8. ABAP Programs: Converting character fields REPORT ZSOURCE0703. * Truncating fields or padding with blanksDATA: SHORT_NAME(8), LONG_NAME(16).MOVE ‘Washington’ TO: SHORT_NAME, LONG_NAME.WRITE: / SHORT_NAME, LONG_NAME. * Take care of intermediate stepsLONG_NAME = SHORT_NAME = ‘Washington’.WRITE: / SHORT_NAME,...
9. ABAP Programs: Selecting Single Fields REPORT ZSOURCE1106.* Work area for a database tableTABLES CUSTOMERS.* Selecting single fieldsDATA: CID LIKE CUSTOMERS-ID, CNAME LIKE CUSTOMERS-NAME.SELECT ID NAME INTO (CID,CNAME) FROM CUSTOMERS. WRITE: / CID, CNAME.ENDSELECT. ~~~ end...
10. ABAP Programs: Using Symbols and Icons REPORT ZSOURCE0806. * Declaring symbols and iconsINCLUDE: , . * Displaying symbols and iconsWRITE: / SYM_PHONE AS SYMBOL, ‘telephone’, / SYM_FAX AS SYMBOL, ‘fax machine’, / SYM_LEFT_HAND AS SYMBOL, ‘hand...
11. ABAP Programs: Setting the layout position of fields REPORT ZSOURCE0804. DATA: POS TYPE I, LEN TYPE I. WRITE AT 5 ‘position 5′.POS = 20.WRITE AT POS ‘position 20′.POSITION 40.WRITE ‘position 40′. POS = 10. LEN = 20.NEW-LINE.WRITE AT...
12. ABAP Programs: Simple examples of field conversion REPORT ZSOURCE0702. * Converting to numbers during computationsDATA: NUMBER_1(4) VALUE ’1771′, NUMBER_2(3), RESULT TYPE I. NUMBER_2 = ’005′.RESULT = NUMBER_1 + NUMBER_2.WRITE / RESULT. NUMBER_2 = ‘ 5′.RESULT = NUMBER_1...
13. ABAP Symbols How To get these ABAP symbols in the program. Here is a sample program to generate ABAP symbols....
14. FIELD-GROUPS: Abap keyword a day FIELD-GROUPS creates a field group for an extract dataset. FIELD-GROUPS: This statement would define a field group and these also define the actual line structure of extract dataset. Here is...
15. Use variable time references in currency conversions Today, in SAP’s Business Information Warehouse, currency conversion can take place using different parameters defined in a currency translation key (source currency, target currency, exchange rate type and time reference)...