Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 8937

Re: not all of intenal table rows inserted to ztable

$
0
0

I updated my code using filed-symbols and i found that the following AIDs did not inserted to database

0000000024 0000000039 0000000055 0000000065 0000000066 0000000068 0000000070 0000000071 0000000081 0000000092 0000000099 0000000100 0000000102 0000000105 0000000106 0000000107 0000000108

and other 93  rows inserted successfully.

TYPES: ITT_ZADRFINAL TYPE  STANDARD TABLE OF ZADR .
 DATA: IT_ZADRFINAL TYPE   ITT_ZADRFINAL .
 FIELD-SYMBOLS : <WA_ZADRFINAL> like  LINE OF   IT_ZADRFINAL .
 DATA: IT_ZADRFINAL2 TYPE  STANDARD TABLE OF ZADR ,       WA_ZADRFINAL2 like LINE OF IT_ZADRFINAL2.
 SORT  IT_ADRC BY  TEL_NUMBER DESCENDING.
 DATA: COUNTER TYPE I VALUE 1.   LOOP AT IT_ADRC INTO WA_ADRC.  ON CHANGE OF WA_ADRC-TEL_NUMBER.
 APPEND INITIAL LINE TO IT_ZADRFINAL ASSIGNING <WA_ZADRFINAL>.          <WA_ZADRFINAL>-AID = COUNTER .          <WA_ZADRFINAL>-FIRSTNAME = WA_ADRC-NAME1.          <WA_ZADRFINAL>-SECONDNAME = WA_ADRC-NAME2.          <WA_ZADRFINAL>-NATIONALID ="".          <WA_ZADRFINAL>-STREET = WA_ADRC-STREET.          <WA_ZADRFINAL>-HOUSENUMBER = WA_ADRC-HOUSE_NUM1.          <WA_ZADRFINAL>-REGION = WA_ADRC-REGION.          <WA_ZADRFINAL>-POSTALCODE = WA_ADRC-POST_CODE1.          <WA_ZADRFINAL>-CITY = WA_ADRC-CITY1.          <WA_ZADRFINAL>-TELEPHONE = WA_ADRC-TEL_NUMBER.          READ TABLE IT_ADR2 INTO WA_ADR2  with key  ADDRNUMBER =  WA_ADRC-ADDRNUMBER   R3_USER = '3'." TO GET MOBILE NUMBER          <WA_ZADRFINAL>-MOBILE = WA_ADR2-TEL_NUMBER.          <WA_ZADRFINAL>-FAX = WA_ADRC-FAX_NUMBER.          <WA_ZADRFINAL>-FUNLOC = ''.          <WA_ZADRFINAL>-FUNLOCDESC = '' .          <wA_ZADRFINAL>-CREATED = '' .          <WA_ZADRFINAL>-CREATED ='' .
 COUNTER = COUNTER + 1.
 CLEAR :  WA_ADR2.
 *CLEAR : WA_ADRC, WA_ADR2.
 ENDON.        ENDLOOP.
 SORT IT_ZADRFINAL by AID ASCENDING.
 DELETE ADJACENT DUPLICATES FROM  IT_ZADRFINAL COMPARING AID .
 LOOP AT IT_ZADRFINAL ASSIGNING <WA_ZADRFINAL>.
 INSERT  ZADR FROM  <WA_ZADRFINAL>.
 IF SY-SUBRC <> 0.   WRITE : <WA_ZADRFINAL>-AID.   ENDIF.
 ENDLOOP.

Viewing all articles
Browse latest Browse all 8937

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>