Scribd
Upload
8 views1 page

KNA1 Record Management Process

The document outlines a module for handling user commands related to the KNA1 table in a database. It includes cases for inserting, deleting, updating, displaying records, and exiting the program, with appropriate messages for success or failure. Each command checks the operation's success using SY-SUBRC and provides feedback accordingly.

Uploaded by

mithun007reddy
Copyright
© Attribution Non-Commercial (BY-NC)
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOC, PDF, TXT or read online on Scribd
8 views1 page

KNA1 Record Management Process

The document outlines a module for handling user commands related to the KNA1 table in a database. It includes cases for inserting, deleting, updating, displaying records, and exiting the program, with appropriate messages for success or failure. Each command checks the operation's success using SY-SUBRC and provides feedback accordingly.

Uploaded by

mithun007reddy
Copyright
© Attribution Non-Commercial (BY-NC)
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOC, PDF, TXT or read online on Scribd

PROCESS BEFORE OUTPUT. * MODULE STATUS_0030. * PROCESS AFTER INPUT. MODULE USER_COMMAND_0030 INPUT. TABLES:KNA1.

CASE SY-UCOMM WHEN 'INSERT'. INSERT KNA1. IF SY-SUBRC = 0 MESSAGE I000(0) WITH 'RECORD INSERTED'. ELSE MESSAGE E000(0) WITH 'RECORD ALREADY EXIST'. ENDIF. WHEN 'DELETE'. INSERT KNA1. IF SY-SUBRC = 0 MESSAGE I000(0) WITH 'RECORD DELETED'. ELSE MESSAGE E000(0) WITH 'RECORD ALREADY DELETED'. ENDIF. WHEN 'UPDATE'. INSERT KNA1. IF SY-SUBRC = 0 MESSAGE I000(0) WITH 'RECORD UPDATED'. ELSE MESSAGE E000(0) WITH 'RECORD ALREADY UPDATED'. ENDIF. WHEN 'DISPLAY'. SELECT * FROM KNA1 WHERE KUNNR = KNA1-KUNNR. ENDSELECT. WHEN 'EXIT'. LEAVE PROGRAM. ENDCASE. ENDMODULE.

You might also like