The report loops throgh the required Tables of Purchase Requisition and based on the data entered on screen, displays the desired data. The report is to be modified/tweaked as per the custom need.

The basic purpose of the report is to develop a pragmatical flow of the language, the way normally ABAP programs are written.

Download Source Code : Z_PENDING_PRS_REPORT

You might also be interested in these posts:

1. ABAP Pending Purchase Orders (PO) Report
2. ABAP Programs for Beginners
3. ABAP Program to search specific words(string) in SAP Programs

To adjust/change any keyword or DDIC field name, navigate to CMOD and browse to the option Goto->Text Enhacements->Keywords->Change.

It will ask you for the field name you want to modify/enhance. Here specify the Field Name and the language in which you want to change to be made.

It will take you the screen where you can specify various type of  texts for the field name enhacement. Change the text as desired and save. It will impact the keyword throughout SAP.

You might also be interested in these posts:

1. Dynamically read fields, field names and field contents using field symbols
2. Field Exit in SAP
3. Add Search Help to Screen Field in SAP

Function Module POPUP_GET_VALUES can be used to display a popup to get inputs from user. The specialty of this function module is we can add as many number of fields as we want. The fields can be of any data type.

REPORT ztestpopup.

DATA: t_fields LIKE sval OCCURS 0 WITH HEADER LINE.

START-OF-SELECTION.

*— Prepare Parameters for FM ————-*
t_fields-tabname = ’BKPF’.
t_fields-fieldname = ’BUDAT’.
APPEND t_fields.

t_fields-tabname = ’BKPF’.
t_fields-fieldname = ’BLART’.
APPEND t_fields.

*—- Function Module Call —————–*
CALL FUNCTION ’POPUP_GET_VALUES’
EXPORTING
*  NO_VALUE_CHECK = ’ ’
popup_title = ’Test Popup’
*  START_COLUMN = ’5’
*  START_ROW = ’5’
*  IMPORTING
*  RETURNCODE =
TABLES
fields = t_fields
EXCEPTIONS
error_in_fields = 1
OTHERS = 2
.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

*— Display Report —————-*
LOOP AT t_fields.
WRITE:/ t_fields-value.
ENDLOOP.

You might also be interested in these posts:

1. ABAP Program to display SAP Data in 3-Dimension
2. Date formatting for Display in ABAP Program
3. ABAP Program to Display SE78 pictures on Screen

The error says :

Please enter an address number
Communication type  cannot be used

This error is because of the print program (used in output type) the three fields listed were not populated.
addr_key-addrnumber, addr_key-persnumber, and addr_key-addr_type.

Below is the call function where these 3 fields need to be exported. Please try putting values in debug mode and it should work.

CALL FUNCTION ‘ADDR_GET_NEXT_COMM_TYPE‘
EXPORTING
strategy = nast-tcode
address_number = addr_key-addrnumber
person_number = addr_key-persnumber
IMPORTING
comm_type = lvs_comm_type
comm_values = lvs_comm_values

The values for the 3 fields are in addr_key table.

Lets see an example for the same, where different function module is used ( at the time of Billing).

vbco3-mandt = sy-mandt.
vbco3-spras = nast-spras.
vbco3-kunde = nast-parnr.
vbco3-parvw = nast-parvw.

CALL FUNCTION ’RV_BILLING_PRINT_VIEW‘
EXPORTING
comwa                        = vbco3
IMPORTING
kopf                         = vbdkr
TABLES
pos                          = tvbdpr
EXCEPTIONS
terms_of_payment_not_in_t052 = 1
error_message                = 5
OTHERS                       = 4.
IF NOT sy-subrc IS INITIAL.
IF sy-subrc = 1.
syst-msgty = ’I’.
PERFORM protocol_update.
ENDIF.
ENDIF.

* fill address key –> necessary for emails
ADDR_KEY-ADDRNUMBER = vbdkr-ADRNR.
ADDR_KEY-PERSNUMBER = vbdkr-ADRNP.
ADDR_KEY-ADDR_TYPE  = vbdkr-ADDRESS_TYPE.

You might also be interested in these posts:

1. ABAP Automailer program for sending output of SAP TCodes in Background
2. ABAP Editor: Create custom Pattern
3. Catch the Dump in ABAP – I

The most efficient way to deal with such situations is Field Symbol. As we know, Field Symbols are like a placeholder or symbolic names for any object, variable or value.

We can use following code as an sample code and customize as per our requirements.

Code snippet:

FIELD-SYMBOLS:
<fieldname> TYPE ANY, “Name of field
<line> TYPE ANY, “Line structure for table
<fieldvalue> TYPE ANY. “Value of field

DATA: l_shorttext LIKE dd03m-ddtext.

DATA: wa_dd03l LIKE dd03l.

SELECT *
FROM dd03l
INTO wa_dd03l
WHERE tabname = ‘ZTEST_TAB’.

* Assign name of field
ASSIGN COMPONENT 2 OF STRUCTURE wa_dd03l TO <fieldname>.

* Assign structure for internal table
ASSIGN wa_pa1_delta TO <line>.

* Assign field value from structure
ASSIGN COMPONENT <fieldname> OF STRUCTURE <line> TO <fieldvalue>.

* Find DD text for field
SELECT SINGLE ddtext
FROM dd03m
INTO l_shorttext
WHERE
tabname = ‘ZTEST_TAB’ AND
fieldname = <fieldname> AND
ddlanguage = ‘EN’.

WRITE: / <fieldname>, l_shorttext, ‘ : ‘, <fieldvalue>.

ENDSELECT.

Another code snippet:

Suppose we want to sum the fields from table(say, GLT0) only till the period the user enters on screen.

SELECT * FROM GLT0 WHERE BUKRS = P_BUKRS
AND RYEAR = CURRY
AND RBUSA IN P_GSBER.
V_VAR = 01. ” Temp var for reading Period from 01
WHILE V_VAR <= P_MONAT. ” P_MONAT-> user enters on screen
CONCATENATE ’TSL’ V_VAR INTO V_WAR. ” concat fieldname into local var
ASSIGN V_WAR TO <FS>. ” Assign to Field Symbol
ASSIGN GLT0 TO <L>. “Assign line/structure
ASSIGN COMPONENT <FS> OF STRUCTURE <L> TO <FS1>. “read fieldvalue
V_CURSTK = V_CURSTK + <FS1>. “adding the values in var
V_VAR = V_VAR + 1. “increment the loop variable
ENDWHILE.
ENDSELECT.

You might also be interested in these posts:

1. ABAP Program with Editable ALV Grid Contents
2. SAP renaming Field Names/Keywords using CMOD
3. Demystifying Field Groups in ABAP