Checking internal table

Hi Experts,
i have a scenario like this:
move a to b.
But before doing this i have to check whether 'a' is contained in the it1 internal table's field val.( ie 'a' is contained in it1-val).
without looping is there any method.
Points will be rewarded.
Regards,
Soumya.

hi
try this
Read itab into wa.with key itab-val = 'a'.
if sy-subrc = 0.
valuer is in itab
else
move a to b.
endif.
hope it clears ur doubt
regards
ravish
plz dont forget to reward points if useful

Similar Messages

How to check internal table sorted or not

Hi all
I need to check internal table sorted or not which is without header line and having only one field and six values. please let me know how to check it is sorted or not because i need to display message if it is not sorted.
thanks,
Minal

Hi Minal,
Go through this info.
Sorted tables
This is the most appropriate type if you need a table which is sorted as you fill it. You fill sorted tables using the INSERT statement. Entries are inserted according to the sort sequence defined through the table key. Any illegal entries are recognized as soon as you try to add them to the table. The response time for key access is logarithmically proportional to the number of table entries, since the system always uses a binary search. Sorted tables are particularly useful for partially sequential processing in a LOOP if you specify the beginning of the table key in the WHERE condition.
Stable sort
The option
SORT <itab> ... STABLE.
allows you to perform a stable sort, that is, the relative sequence of lines that are unchanged by the sort is not changed. If you do not use the STABLE option, the sort sequence is not preserved. If you sort a table several times by the same key, the sequence of the table entries will change in each sort. However, a stable sort takes longer than an unstable sort.
Examples
DATA: BEGIN OF LINE,
 LAND(3) TYPE C,
 NAME(10) TYPE C,
 AGE TYPE I,
 WEIGHT TYPE P DECIMALS 2,
 END OF LINE.
DATA ITAB LIKE STANDARD TABLE OF LINE WITH NON-UNIQUE KEY LAND.
LINE-LAND = 'G'. LINE-NAME = 'Hans'.
LINE-AGE = 20. LINE-WEIGHT = '80.00'.
APPEND LINE TO ITAB.
LINE-LAND = 'USA'. LINE-NAME = 'Nancy'.
LINE-AGE = 35. LINE-WEIGHT = '45.00'.
APPEND LINE TO ITAB.
LINE-LAND = 'USA'. LINE-NAME = 'Howard'.
LINE-AGE = 40. LINE-WEIGHT = '95.00'.
APPEND LINE TO ITAB.
LINE-LAND = 'GB'. LINE-NAME = 'Jenny'.
LINE-AGE = 18. LINE-WEIGHT = '50.00'.
APPEND LINE TO ITAB.
LINE-LAND = 'F'. LINE-NAME = 'Michele'.
LINE-AGE = 30. LINE-WEIGHT = '60.00'.
APPEND LINE TO ITAB.
LINE-LAND = 'G'. LINE-NAME = 'Karl'.
LINE-AGE = 60. LINE-WEIGHT = '75.00'.
APPEND LINE TO ITAB.
PERFORM LOOP_AT_ITAB.
SORT ITAB.
PERFORM LOOP_AT_ITAB.
SORT ITAB.
PERFORM LOOP_AT_ITAB.
SORT ITAB STABLE.
PERFORM LOOP_AT_ITAB.
SORT ITAB DESCENDING BY LAND WEIGHT ASCENDING.
PERFORM LOOP_AT_ITAB.
FORM LOOP_AT_ITAB.
LOOP AT ITAB INTO LINE.
 WRITE: / LINE-LAND, LINE-NAME, LINE-AGE, LINE-WEIGHT.
ENDLOOP.
SKIP.
ENDFORM.
************rewords some points if it is helpful.
Rgds,
P.Naganjana Reddy

Query to check internal table

hi all,
I have to check an internal table data(it_tab)
It holds records like
A      B     C       D       E        F
325     1     1     512     0     0010
325     1     1     548     36     0010
325     1     1     554     42     0010
325     2     2     512     0     0011
325     2     2     548     36     0011
325     2     2     554     42     0011
325     3     3     512     0     0012
325     3     3     554     42     0012
800     3     1     512     0     0011
800     3     1     530     18     0011
800     4     2     512     0     0012
800     4     2     532     20     0012
800     4     2     533     21     0012
800     4     2     538     26     0012
800     4     2     556     44     0012
800     5     3     512     0     0013
800     5     3     532     20     0013
800     5     3     538     26     0013
800     5     3     556     44     0013
I have to check whether the number generated in D is increasing one by one
for eg D : 512, 513, 514,...
Here it is not in the sequence
So i need to check whther it is in sequence if not so i should delete the record
Could you suggest the way to check the in_tab?
Regards
senthil

Hi,
Try the follwoing:
You just need to use AT NEW control break after the loop statement.
DATA: Var1(5)    TYPE n.
DATA: Var2(5)    TYPE n.
DATA: Count(5) TYPE n.
DATA: it_tab2     type table of it_tab.
clear: count.
LOOP at it_tab.
AT NEW a
Clear: count, Var1, Var2.
Count = Count + 1.
IF Count >= 2.
var2 = it_tab-D.
If var2 = var1 + 1.
append it_tab to it_tab2.
endif.
endif.
var1 = it_tab-D.
ENDAT
Endloop.
Reward points if helpful answer.
Ashvender

How to check if all values from a dataset has come to an internal table

How to check if all values from a dataset has come to an internal table ?

Hi,
After OPEN DATASET statement check if sy-subrc = 0 if its success then proceed with split statement and save the dataset values into a internal table and while debugging the internal table you will find that whether all values get into internal table.
Checking sy-subrc after OPEN DATASET statement is must to fill up the values in the internal table.
For e.g.
OPEN DATASET p_inpfile FOR INPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc NE 0.
    WRITE :/ 'No such input file' .
    EXIT.
ELSE.
READ DATASET p_inpfile INTO loc_string.
      IF sy-subrc NE 0.
        EXIT.
      ELSE.
        CLEAR loc2.
*Spliting fields in the file-
        REPLACE ALL OCCURRENCES OF '#' IN wa_string WITH ' '.
       SPLIT wa_string AT const INTO loc2-pernr
                                       loc2-werks
                                       loc2-persk
                                       loc2-vdsk1.
Hope you get some idea.
Thanks,
Sakthi C

I need to add check whether 21 fields of a internal table are empty or not.

Hello,
I need to add check whether 21 fields of a internal table are empty or not.How can we write a code for the same wand what would be the correct syntax for it.
I tried entering all the fields in the IF loop with AND condition but its giving syntax error.Perhaps this is because the lenght of the IF condition would be more than the allowed one.

Hi,
After the select quiery.
If not itab is initial.
Message 'Table is not empty' type 'I'.
Endif.
Regards,
Jagadish.

Capturing check box value into internal table

Hi all,
I am displaying the output including check box through following internal table.
The checkbox is displayed before every record.
LOOP AT it_qals.
 WRITE:/ it_qals-t_val AS CHECKBOX,
 5 it_qals-werk,
 12 it_qals-prueflos,
 30 it_qals-matnr,
 50 it_qals-charg,
 62 it_qals-lagortchrg.
 hide: it_qals .
ENDLOOP.
I selected some of the records through check the checkboxes. when i click the PUSHBUTTON TRANSFER, those selected records only should transfer. i don't know how to modify the internal table with latest checkbox values. Initially checkbox values are blank.
Is there any solution except Function Module.
i would appreciate an earlier reply.
Regards
Prabhu

Hello,
Create one more table and transfer your entries into new table.
I have attached my code for you.
Regards,
Naimesh
REPORT ZTEST_NP NO STANDARD PAGE HEADING.
TABLES: MARA, MAKT.
DATA: BEGIN OF IT_MARA OCCURS 0,
 MATNR LIKE MARA-MATNR,
 MAKTX LIKE MAKT-MAKTX,
 SEL,
 END OF IT_MARA.
DATA: IT_MARA1 LIKE IT_MARA OCCURS 0 WITH HEADER LINE.
START-OF-SELECTION.
SET PF-STATUS 'ZTEST'.
PERFORM GET_DATA.
PERFORM WRITE_DATA.
TOP-OF-PAGE.
PERFORM HEADER.
AT USER-COMMAND.
CASE SY-UCOMM.
WHEN 'SELECT'.
 PERFORM GET_DATA_SELECTED.
 PERFORM WRITE_DATA_SELE.
WHEN 'SELALL'.
 PERFORM SELECT_ALL.
 SY-LSIND = 0.
 PERFORM HEADER.
 PERFORM WRITE_DATA.
WHEN 'DESEL'.
 PERFORM DESELECT_ALL.
 SY-LSIND = 0.
 PERFORM HEADER.
 PERFORM WRITE_DATA.
ENDCASE.
*& Form GET_DATA
FORM GET_DATA.
SELECT MATNR
 INTO TABLE IT_MARA
 FROM MARA
 WHERE MATNR LIKE 'IN10020%'.
LOOP AT IT_MARA.
 SELECT SINGLE MAKTX
 INTO IT_MARA-MAKTX
 FROM MAKT
 WHERE MATNR = IT_MARA-MATNR
 AND SPRAS = SY-LANGU.
 MODIFY IT_MARA.
 CLEAR IT_MARA.
ENDLOOP.
ENDFORM. " GET_DATA
*& Form WRITE_DATA
FORM WRITE_DATA.
ULINE /(50).
LOOP AT IT_MARA.
 WRITE: / '|' NO-GAP, IT_MARA-SEL AS CHECKBOX NO-GAP,
 '|' NO-GAP, (10) IT_MARA-MATNR NO-GAP,
 '|' NO-GAP, (35) IT_MARA-MAKTX NO-GAP,
 '|' NO-GAP.
ENDLOOP.
ULINE /(50).
ENDFORM. " WRITE_DATA
*& Form HEADER
FORM HEADER.
ULINE /(50).
WRITE: / '|' NO-GAP, (1) ' ' NO-GAP,
 '|' NO-GAP, (10) 'Material' NO-GAP,
 '|' NO-GAP, (35) 'Description' NO-GAP,
 '|' NO-GAP.
ENDFORM. " HEADER
*& Form GET_DATA_SELECTED
FORM GET_DATA_SELECTED.
DATA: L_CNT TYPE I.
DO.
 L_CNT = L_CNT + 1.
 READ LINE L_CNT FIELD VALUE IT_MARA-MATNR INTO IT_MARA1-MATNR
 IT_MARA-MAKTX INTO IT_MARA1-MAKTX
 IT_MARA-SEL INTO IT_MARA1-SEL.
 IF SY-SUBRC = 0.
 IF IT_MARA1-SEL = 'X'.
 APPEND IT_MARA1.
 CLEAR IT_MARA1.
 ENDIF.
 ELSE.
 EXIT.
 ENDIF.
ENDDO.
ENDFORM. " GET_DATA_SELECTED
*& Form WRITE_DATA_SELE
FORM WRITE_DATA_SELE.
PERFORM HEADER.
ULINE /(50).
LOOP AT IT_MARA1.
 WRITE: / '|' NO-GAP, IT_MARA1-SEL AS CHECKBOX,
 '|' NO-GAP, (10) IT_MARA1-MATNR NO-GAP,
 '|' NO-GAP, (35) IT_MARA1-MAKTX NO-GAP,
 '|' NO-GAP.
ENDLOOP.
ULINE /(50).
ENDFORM. " WRITE_DATA_SELE
*& Form SELECT_ALL
FORM SELECT_ALL.
LOOP AT IT_MARA.
 IT_MARA-SEL = 'X'.
 MODIFY IT_MARA.
 CLEAR IT_MARA.
ENDLOOP.
ENDFORM. " SELECT_ALL
*& Form DESELECT_ALL
FORM DESELECT_ALL.
LOOP AT IT_MARA.
 IT_MARA-SEL = ' '.
 MODIFY IT_MARA.
 CLEAR IT_MARA.
ENDLOOP.
ENDFORM. " DESELECT_ALL

Check the range of values of an internal table with the statement IN

Hi,
I'd like to know how to check if the current contents of a field are in the set described by an internal table.
I know I have to use the statement IN, but I don't know exactly how to define the internal table. In my case, I have a single field (tipo_doc) in my internal table which stores 4 different values: C, I, K, L.
I want to use the statement IN as shown next:
SELECT * FROM VBFA APPENDING CORRESPONDING FIELDS OF TABLE it_flujo_docs WHERE ( VBELN = it_total_fact-vbeln )
 AND ( VBTYP_V IN itab).
Then I'd like to know how the internal table itab should be defined. It should be something like this I think, but it doesn't work:
DATA: BEGIN OF itab OCCURS 0,
 tipo_doc LIKE zpedidos-tipo_doc,
 tipo_doc-sign = 'I',
 tipo_doc-option = 'EQ',
 tipo_doc-low = C,
 tipo_doc-high = L,
 END OF it_tipo_doc_ped.
I'd appreciate if someone could tell me the proper way to define it.
Thanks in advance,
Gerard

Hi,
Please follow this.
RANGES R_VBTYP FOR VBFA-VBTYP_V.
R_VBTYP-SIGN = 'I'.
R_VBTYP-OPTION = 'EQ'.
R_VBTYP-LOW = 'C'.
CLEAR R_VBTYP-HIGH.
APPEND R_VBTYP.
Do the same for value 'I', 'K' and 'L'.
Now in the SELECT statement replace the following
VBTYP_V IN itab
with
VBTYP_V IN R_VBTYP.
Thanks
Vinod

Extended Program check for internal table

TYPES:BEGIN OF TY_FINAL,
        VBELN TYPE VBAP-VBELN,
        VBELV TYPE VBAP-VBELV,
        POSNV TYPE VBAP-POSNV,
        WERKS TYPE VBAP-WERKS,
        ZZ_MODEL_NO TYPE VBAP-ZZ_MODEL_NO,
        VKORG TYPE VBAK-VKORG,
        TEXT(70) TYPE C,
      END OF TY_FINAL.
Declaration of Variables                                            *
DATA: IT_VBAK TYPE STANDARD TABLE OF TY_VBAK ,
      IT_VBAP TYPE STANDARD TABLE OF TY_VBAP ,
      IT_FINAL TYPE STANDARD TABLE OF TY_FINAL WITH HEADER LINE.
DATA: W_VBAK         TYPE TY_VBAK            ,
      W_VBAP         TYPE TY_VBAP            ,
      W_FINAL        TYPE TY_FINAL           ,
      W_LAYOUT       TYPE SLIS_LAYOUT_ALV    ,
      W_VARIANT_SAVE TYPE C                  ,
      W_REPID        TYPE SY-REPID          .
In the above code i have declared IT_FINAL TYPE STANDARD TABLE OF TY_FINAL WITH HEADER LINE. in extended program check iam getting error as( Tables with headers are no longer supported in the OO context.
can any one plz suggest me to avoid this error.
Thanks in Advance.
Moderator message - Duplicate post locked
Edited by: Rob Burbank on May 19, 2009 9:12 AM

Hi,
DATA: IT_VBAK TYPE STANDARD TABLE OF TY_VBAK ,
IT_VBAP TYPE STANDARD TABLE OF TY_VBAP ,
" If you declare the internal table with header line in OO context it wll give you error. As OO wil not
" support the header line concept. Declare Internal table without header line and create the work area
" for the internal table
IT_FINAL TYPE STANDARD TABLE OF TY_FINAL. " WITH HEADER LINE.
DATA: W_VBAK TYPE TY_VBAK ,
W_VBAP TYPE TY_VBAP ,
W_FINAL TYPE TY_FINAL ,                    " Use this work area
W_LAYOUT TYPE SLIS_LAYOUT_ALV ,
W_VARIANT_SAVE TYPE C ,
W_REPID TYPE SY-REPID

Internal table record checking (Urgent)

Hi Experts,
I have an internal table having records. I want to check each record of the table with every other record to find out if there exist same record for more then one key field.
Can anybody help me to place the logic for how i can check the records with each record? Like
lifnr banks
1 12
2 34
3 12
4 12
5 76
I want to find out 1,3 and 4.
Thanks a ton in advance

Hi Moni,
IF in my First Reply the Second technique was working then this should solve your Problem:
DATA:
w_index TYPE i,
w_lines TYPE i,
w_duplicate(10) TYPE c.
DESCRIBE itab LINES w_lines.
LOOP AT itab INTO wa.
w_index = sy-tabix + 1.
DO.
READ TABLE itab INTO wa1 INDEX w_index.
 IF w_index <= w_lines.
 IF wa-banks EQ wa1-banks.
 CONCATENATE w_duplicate wa1-lifnr INTO w_duplicate SEPARATED BY SPACE.
 wa-duplicate = w_duplicate.
 MODIFY itab FROM wa.
 ENDIF.
 ELSE.
 EXIT.
 ENDIF.
 ADD 1 TO w_index.
ENDDO.
ENDLOOP.
LOOP AT itab INTO wa.
write:
 / wa-lifnr,
 wa-banks,
 wa-duplicates.
ENDLOOP.
ELSE try the below code it is same as above except one more Internal Table is used:
DATA:
w_index TYPE i,
w_lines TYPE i,
jtab LIKE itab,
w_duplicate(10) TYPE c.
DESCRIBE itab LINES w_lines.
LOOP AT itab INTO wa.
w_index = sy-tabix + 1.
DO.
READ TABLE jtab INTO wa1 INDEX w_index.
 IF w_index <= w_lines.
 IF wa-banks EQ wa1-banks.
 CONCATENATE w_duplicate wa1-lifnr INTO w_duplicate SEPARATED BY SPACE.
 wa-duplicate = w_duplicate.
 MODIFY itab FROM wa.
 ENDIF.
 ELSE.
 EXIT.
 ENDIF.
 ADD 1 TO w_index.
ENDDO.
ENDLOOP.
LOOP AT itab INTO wa.
write:
 / wa-lifnr,
 wa-banks,
 wa-duplicates.
ENDLOOP.
Regards,
Sunil.

Checking naming convention of internal tables in code inspector

Can anyone please explain how in the code inspector can I check names of internal tables (like it_) that I use in a report program ? I know that I can specify it_ in Programming Convention -> Naming Convention->Program Global -> Data but this entry is not specific to internal tables as it also applies to variables and work areas. Apart from this is there any entry I can maintain in the Extended Naming Conventions for Programs(introduced in ECC 6.0)? Kindly reply at the earliest.

Hi,
Check these links for implementing the custom conventions in the code inspector
https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/com.sap.km.cm.docs/library/nw/how%20to%20build%20a%20new%20check%20for%20the%20code%20inspector
https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/com.sap.km.cm.docs/library/webas/abap/evaluating%20the%20quality%20of%20your%20abap%20programs%20and%20other%20repository%20objects%20with%20the%20code%20inspector
hope it helps you.
Thanks!

How to check two internal table fields

Hi all,
I need to check two internal table fields are equal or not means which statement i can use.
Not internal table ,table contents i need to check i.e
it1-pernr = it2-pernr.
like this
if i put loop it'll check one table field for one loop.
if i put two loop means some fields reflecting 2 in it1 then it'll pring 4 times like that.i want to print whatever in internal table only .
pernr(0001) two times there in it1 means
it1-pernr = it2-pernr then
it's printing
0001
0001
0001
0001
like this but actually in it1 only two records.
Anybody know solution.tell me.
Thanks
Regards,
Nandha

Hi,
code for your view
data : begin of it1 occurs 0,
       z_pernr like pa9012-pernr,
       z_fac_c like pa9012-zz_fac_c,
       end of it1.
data : it2 like Zsc1 occurs 0 with header line,
It1 data
pernr   FAC C
0001   5555
0001   5555
0002   4444
0003   3333
0006   8888
It2 data
pernr   FAC C
0001   5555
0001   5555
0005   6666
0003   3333
output(My code)
loop at it2 .
loop at it1 where pernr = it2-pernr.
write:/01 it1-1pernr,
        10 it1-z_fac_c.
endloop.
endloop.
out put i need.
0001   5555
0001   5555
0002   4444
0003   3333
Thanks,
Nandha

How to check if internal table exists in dynamical called subroutine ?

Hi,
in a dynamically called subroutine i'm using a internal table, but in some calls this table is not exist.
How can i check in the code whether the internal table exist or not ?
regards,
Hans

In Horst Keller's blog /people/horst.keller/blog/2005/05/27/abap-geek-10--everything-functions-150-but-how my issue is talked about :
All other parameters are handled in a way as they were declared as global data objects in the top include of the function group, that can be used only during the execution of the function module: They are visible throughout the function group but you can access them only while the function module is active. If you access such a parameter and the respective function module is not executed, you get the runtime error GETWA_NOT_ASSIGNED (Why? Well, technically thos guys are represented via field symbols which are valid only during the runtime of the function module).
The code is in SD pricing. Sometimes the code is called from function module PRICING_BUILD_XKOMV or PRICING_SUBSCREEN_PBO where TKOMV is defined as globalized parameter.
And sometimes it is called from function module PRCING_CHECK where TKOMV is NOT defined as parameter.
In the call of last function the dump occures on the ASSIGN statement :
 data: ls_tkomv like line of tkomv,
 lv_tablename(30) type c value 'TKOMV[]'.
 field-symbols: <lfs> type any table.
 assign (lv_tablename) to <lfs>.
 if <lfs> is assigned.
Any suggestions to solve the issue ?
regards,
Hans

Check an internal table is initial or not..

Hello experts,
I need to check whether an internal table is initial or not in AMDP.....
Lets say i have an internal table IT_TAB[].
I need a statement similar to IT_TAB[] IS NOT INITIAL (in ABAP)
I already tried with COUNT(*), but it returns me an internal table with a column name COUNT with the total number of entries and found it not useful.
Thanks in Advance,
Ramesh

Well do it by below way.
DECLARE LV_LINE VARCHAR(3);
SELECT COUNT(*) INTO LV_LINE FROM :IT_TAB;
Regards,
Amol

How to check duplicate entries in internal table??

Dear Friends,
How to check duplicate entries in internal table??
Exp: In my internal table if I am having the same records more then ones then I need to print the error message, here I am using steploop for selecting the values from screen, and the values are coming into my internal table if user enter the same value more then ones I need to print the error message.
Thanks,
Sridhar

Hi,
After storing the data into internal table say ITAb, move the data into another internal table.
t_dup[] = itab[].
LOOP AT itab.
    count1 = count1 + 1.
    itab-count1 = count1.
    MODIFY itab.
ENDLOOP.
LOOP AT t_dup.
    count2 = count2 + 1.
    t_dup-count2 = count2.
    MODIFY t_dup.
ENDLOOP.
DELETE ADJACENT DUPLICATES FROM itab.
LOOP AT t_dup.
    record_dup = 'N'.
    READ TABLE itab WITH KEY count1 = t_dup-count2.
    IF sy-subrc = 0.
      record_dup = 'Y'.
    ENDIF.
    IF record_dup NE 'Y'.
      t_dup-message = 'DUPLICATE ENTRY'.
      t_dup-flag = 1.
      MODIFY t_dup.
    ENDIF.
ENDLOOP.
Use this sample code.
Reward pts if it is helpfull.
Regards
Srimanta

Where I can check the internal table memory that have the system?

Hi
I have some jobs that cancel with this error: No storage space available for extending an internal table.
Where I can check the amount of space memory that have the system and if I can resolve this problem if I put a commit work or something like that?
The dump stop when I make a import:
IMPORT TIMES DHIST3 SUM3 FROM DATABASE MONI(DB) ID MONIKEY.
Thanks for the help!

hi,
goto:
sm04 - goto- memory
A.
Message was edited by:
Andreas Mann

Checking internal table

Similar Messages

Maybe you are looking for