in below program taking more time during updating cmd in bold. please advise me what is the problem. even for a single statement it is taking 1 min.
please help.
FORM write.
LOOP AT i_zsd_serial1.
* Padding '0' infront serial number
*----------------------------------
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
input = i_zsd_serial1-i_serial_num
IMPORTING
output = i_zsd_serial1-i_serial_num.
***********************************
* Updating ZSD_SERIAL1 table
*----------------------------
k = STRLEN( i_zsd_serial1-i_msisdn ).
IF len = k.
SELECT COUNT(*)
FROM zsd_serial1
INTO cnt
WHERE msisdn = i_zsd_serial1-i_msisdn.
IF cnt = 0.
UPDATE zsd_serial1
SET msisdn = i_zsd_serial1-i_msisdn
WHERE serial_num = i_zsd_serial1-i_serial_num
AND msisdn EQ ' '.
IF sy-subrc EQ 0.
i = i + 1.
ENDIF.
ELSE.
d_zsd_serial1-d_serial_num = i_zsd_serial1-i_serial_num.
d_zsd_serial1-d_msisdn = i_zsd_serial1-i_msisdn.
APPEND d_zsd_serial1.
dup = 'D:\Duplicate_MSISDN.TXT'.
ENDIF.
ELSE.
iv_zsd_serial1-iv_serial_num = i_zsd_serial1-i_serial_num.
iv_zsd_serial1-iv_msisdn = i_zsd_serial1-i_msisdn.
APPEND iv_zsd_serial1.
iv = 'D:\Invalid_MSISDN.TXT'.
ENDIF.
ENDLOOP.
Bluesky
