How to rerieve records from the table starting with character 'D'

Hi Folks,
How to get the records from the table starting with character 'D'.
Select Max (fld1) fron tab1 into tab1-fld1 where fld 2 = l_fld2 and starting character of fld(1) is 'D'.
last record in the table starting with character 'D'
How can i do that??
Pl explain.
Thanks,
Matt

Hi,
Select Max (fld1) fron tab1 into tab1-fld1 where fld 2 = l_fld2 and starting character of fld(1) is 'D'.
Select MAX (fld1)
From tab1
into table itab
where fld 2 = l_fld2
and fld1 like 'D%'.

Similar Messages

How to speed up the deletion of 11million records from the table

Hi,
How to speed up the deletion of 11million records from the table.
I need expiditious reply. Please do the needfull in advising
Regards

Please try to understand the question.Well it would help if you would answer some of the questions you have been asked as your question is not complete and clear and no matter how hard we try, we really need you to try and ask the question properly.
So as previously asked
Which simply supports the idea that we need:
1) better definition of the business purpose (why)
2) oracle version
3) operating system
4) hardware configuration
to give a moderately accurate answer.
I would like to add
5) How many rows in total in the table to begin with.
6) What is your delete statement
7) Is this a one time operation or will it happen regularly
8) Can you use partitioning.

Incomplete Data on report (report does not show all records from the table)

Hello,
I have problem with CR XI, I'm running the same report on the same data with simple select all records from the table (no sorting, no grouping, no filters)
Sometimes report shows me all records sometimes not. Mostly not all records on the report. When report incomplete sometimes it shows different number of records.
I'm using CR XI runtime on Windows Server 2003
Any help appreciated
Thanks!

Sorry Alexander. I missed the last line where you clearly say it is runtime.
A few more questions:
- Which CR SDK are you using? The Report Designer Component or the CR assemblies for .NET?
- What is the exact version of CR you are using (from help | about)
- What CR Service Pack are you on?
And a troubleshooting suggestion:
Since this works on some machines, it will be a good idea to compare all the runtime (both CR and non CR) being loaded on a working and non working machines.
Download the modules utility from here:
https://smpdl.sap-ag.de/~sapidp/012002523100006252802008E/modules.zip
and follow the steps as described in this thread:
https://forums.sdn.sap.com/click.jspa?searchID=18424085&messageID=6186767
The download also includes instructions on how to use modules.
Ludek

How to update Records from Internal table to u2018Zu2019 table?

Hi Friends,
How to update Records from Internal table to u2018Zu2019 table.
I have records in Internal table , that records want to update on u2018Zmarau2019 Table.
( my internal table & u2018 Zu2019 table structures are same.)
Thanking you.
Regards,
Subash

Hi,
loop at internal table.
modify <Z- table > from values < internal table Workarea>.
if sy-subrc = 0.
COMMIT work.
else.
ROLLBACK waork.
endif.
endloop.
or
UPDATE <Z- table > from table < internal table Workarea>.
if sy-subrc = 0.
COMMIT work.
else.
ROLLBACK waork.
endif.
Prabhudas

How to make records to the table TRFCQIN

hi all,
anyone can tell me
how to make records to the table TRFCQIN
regards

Hi Wanna,
Write a module pool program to enter record into table TRFCQIN.
Take fields to which u want to make entries in module pool.
Use insert command to append data in table TRFCQIN.
Refer this code :
CASE OK_CODE_101.
WHEN 'SAV1'.
TRFCQIN-QNAME = 'XYZ'.
TRFCQIN-QCOUNT = "Screen field name at which user will enter value
INSERT TRFCQIN.
if sy-subrc <> 0.
message e007.
else.
clear TRFCQIN.
clear ok_code_101.
endif.
endcase.
Reward points if helpful.
Regards,
Heamnt

How to handle the failed records from the table when using DB Adapter

Hi,
I am reading some records from table using DB Adapter inside my synchronous BPEL process. Say like reading 100 records from table in between after successful reading of 90 records an error occured in 91st record due some various reasons(like DB down, Connection interrupted etc.). Then how to handle this situation, whether i have to read all the records from the begining and is there any option to continue from where it stopped reading.
Can please anybody help me out in the regard?
Thanks in advance
Regards,
Aejaz

we had the same requirement some time ago and had two option:
1. ask the R/3 development team add a deletion indicator in the table (and thus not actually deleting the record). this deletion indicator could then be used like for any other standard datasource
this option was however refused, due to huge data volume after a while
2. at the end of the load we copied the ZTABLE1 to ZTABLE2. then in the begin of the load (day after) we compare the data of table1 to table2. entries available in table2 but not in table1 are deleted, and we put a 'D'. in deletion indicator; as we only keep the deleted entries for one day, the volume of the new table is acceptable.
M.

How to dispaly datas from the table, base on the selection screen

hi there gurus,
im currently developing a stock aging report,
i have completed one program but it do not allow me to excutes the program althought the syntax is correct.
i would to get some ideas from you, regarding how to extract the datas from the tables?
my selction screen will be, mat number, date, and gl account.
and the out put datas are, mbew-matnr, makt-maktx, mbew-lbkum, mara_meins, mbew-salk3,and the consumptions for the past 12months and the values for it.
can u plz guide me with this,
thank you,.
this is kind of very urgent program that i need to finish , plz help me.

here is the total code the i do
REPORT ZSTK_AGING_REP2.
*TABLES
TABLES: mseg,
 mara,
 makt,
 SKAT,
 SKA1,
 MARV,
 T001,
 T030,
 T149D,
 AM07M,
 MCMSEG,
 T001K,
 T001W,
 T134M,
 vbak,
 mbew,
mcon, rmcb0, marc, t024w, mvke, v134w, t438a, propf, maprf, t000, t024e
, tvko.
DATA: BEGIN OF ta_material OCCURS 2,
 werks LIKE mard-werks,
 lgort LIKE mard-lgort,
 matnr LIKE mard-matnr,
 labst LIKE mard-labst,
 umlme LIKE mard-umlme,
 insme LIKE mard-insme,
 einme LIKE mard-einme,
 speme LIKE mard-speme,
 retme LIKE mard-retme,
 verpr LIKE mbew-verpr,
 maktx LIKE makt-maktx,
 meins LIKE mara-meins,
 bukrs LIKE t001-bukrs,
 konto LIKE t030-konts,
 butxt LIKE t001-butxt,
 txt50 LIKE skat-txt50,
 MABTR LIKE MCMSEG-DMBTR,
 SKBTR LIKE MCMSEG-DMBTR,
 WAERS LIKE T001-WAERS,
 WAER2 LIKE T001-WAERS,
 BWKEY LIKE MBEW-BWKEY,
 LBKUM LIKE MBEW-LBKUM,
 MEINS LIKE MARA-MEINS,
 SALK3 LIKE MBEW-SALK3,
 WAERS1 LIKE T001-WAERS,
 BUKRS1 LIKE T001-BUKRS,
 KONTO1 LIKE T030-KONTS,
 lbkum LIKE mbew-lbkum,
 erdat LIKE vbak-erdat,
 END OF ta_material.
DATA: BEGIN OF ta_mseg OCCURS 2,
 mblnr LIKE mseg-mblnr,
*->Begin of KL02+ -
 mjahr like mseg-mjahr,
 zeile like mseg-zeile,
*->End of KL02+ -
 meins LIKE mseg-meins,
 menge LIKE mseg-menge,
 werks LIKE mseg-werks,
 lgort LIKE mseg-lgort,
 matnr LIKE mseg-matnr,
 budat LIKE mkpf-budat,
 saknr LIKE SKA1-SAKNR,
 END OF ta_mseg.
single recs based on MATNR
DATA: BEGIN OF i_matnr OCCURS 0,
 werks LIKE mard-werks,
 lgort LIKE mard-lgort,
 matnr LIKE mard-matnr,
 maktx LIKE makt-maktx,
 mblnr LIKE mseg-mblnr,
 verpr LIKE mbew-verpr,
 labst LIKE mard-labst, "Valuated stock with
*unrestricted use
 umlme LIKE mard-umlme, "Stock in transfer
*(from one storage location to another)
 insme LIKE mard-insme, "Stock in quality
*inspection
 einme LIKE mard-einme, "Total Stock of All
*Restricted Batches
 speme LIKE mard-speme, "Blocked stock
 retme LIKE mard-retme, "Blocked Stock Returns
 meins LIKE mara-meins, "base unit
 bukrs LIKE t001-bukrs,
 konto LIKE t030-konts,
 butxt LIKE t001-butxt,
 txt50 LIKE skat-txt50,
 MABTR LIKE MCMSEG-DMBTR,
 SKBTR LIKE MCMSEG-DMBTR,
 WAERS LIKE T001-WAERS,
 WAER2 LIKE T001-WAERS,
 BWKEY LIKE MBEW-BWKEY,
 LBKUM LIKE MBEW-LBKUM,
 MEINS LIKE MARA-MEINS,
 SALK3 LIKE MBEW-SALK3,
 WAERS1 LIKE T001-WAERS,
 BUKRS1 LIKE T001-BUKRS,
 KONTO1 LIKE T030-KONTS,
 lbkum LIKE mbew-lbkum,
 END OF i_matnr.
recs based on MBLNR
DATA: BEGIN OF i_mblnr OCCURS 0,
 mblnr LIKE mseg-mblnr,
 werks LIKE mseg-werks,
 lgort LIKE mseg-lgort,
 matnr LIKE mseg-matnr,
 menge LIKE mseg-menge,
 meint LIKE mseg-meins,
 budat LIKE mkpf-budat,
 bukrs LIKE t001-bukrs,
 konts LIKE t030-konts,
 butxt LIKE t001-butxt,
 txt50 LIKE skat-txt50,
 MABTR LIKE MCMSEG-DMBTR,
 SKBTR LIKE MCMSEG-DMBTR,
 WAERS LIKE T001-WAERS,
 WAER2 LIKE T001-WAERS,
 BWKEY LIKE MBEW-BWKEY,
 LBKUM LIKE MBEW-LBKUM,
 MEINS LIKE MARA-MEINS,
 SALK3 LIKE MBEW-SALK3,
 WAERS1 LIKE T001-WAERS,
 BUKRS1 LIKE T001-BUKRS,
 KONTO1 LIKE T030-KONTS,
 END OF i_mblnr.
TYPES: BEGIN OF t_mat,
 lgort LIKE mseg-lgort,
 werks LIKE mseg-werks,
 matnr LIKE mseg-matnr,
 mblnr LIKE mseg-mblnr,
 maktx LIKE makt-maktx,
 meins LIKE mara-meins,
meng0 LIKE mbew-lbkum,
value0 LIKE mbew-salk3,
 meng0 LIKE mard-labst, "0 to 10 days
 value0 LIKE mseg-dmbtr,
 meng1 LIKE mard-labst, "11 to 30 days
 value1 LIKE mseg-dmbtr,
 meng2 LIKE mard-labst, "31 to 60 days
 value2 LIKE mseg-dmbtr,
 meng3 LIKE mard-labst, "61-90
 value3 LIKE mseg-dmbtr,
 meng4 LIKE mard-labst, "90 days onwards
 value4 LIKE mseg-dmbtr,
 END OF t_mat.
DATA: i_mat2 TYPE t_mat OCCURS 0 WITH HEADER LINE.
TYPES: BEGIN OF t_mat2,
 lgort LIKE mard-lgort, " storage location
 cnt0(5),
 cnt1(5),
 cnt2(5),
 cnt3(5),
 cnt4(5),
 meng0 LIKE mbew-lbkum,
value0 LIKE mbew-salk3,
 meng0 LIKE mard-labst, "0 to 10 days
 value0 LIKE mseg-dmbtr,
 meng1 LIKE mard-labst, "11 to 30 days
 value1 LIKE mseg-dmbtr,
 meng2 LIKE mard-labst, "31 to 60 days
 value2 LIKE mseg-dmbtr,
 meng3 LIKE mard-labst, "61-90
 value3 LIKE mseg-dmbtr,
 meng4 LIKE mard-labst, "90 days onwards
 value4 LIKE mseg-dmbtr,
 END OF t_mat2.
DATA: i_matsum TYPE t_mat2 OCCURS 0 WITH HEADER LINE.
DATA: w_mengb TYPE mbew-lbkum,
 w_workqyt TYPE mbew-lbkum,
 w_index TYPE sy-tabix,
*DATA: w_mengb TYPE mard-labst, "tmp Balance qty
 w_workqty TYPE mard-labst, "Work qty
 w_index TYPE sy-tabix,
 w_days(5) TYPE n, "duration difference (days)
 w_mths(5) TYPE n, "duration difference (mths)
 w_dat1 TYPE sy-datum, "date
 w_dat2 TYPE sy-datum, "today's date
 w_detl(1) TYPE c,
 w_summ(1) TYPE c,
 w_denom TYPE i,
 w_numer TYPE i,
 w_conv TYPE i,
 w_ttlcnt TYPE i,
 w_cnt TYPE i,
 v_topofpage(1),
 w_meng LIKE mard-labst,
 w_meng LIKE mbew-lbkum,
*sapscript values
 w_title(20) TYPE c. "Summary / Detail Report
DATA: lv_peinh LIKE mbew-peinh, "Price Unit
 lv_verpr LIKE mbew-verpr. "Moving Price
proram comes here
SELECTION-SCREEN BEGIN OF BLOCK blk1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: s_werks FOR mseg-werks,
 s_lgort FOR mseg-lgort,
 s_matnr FOR mara-matnr,
 s_saknr FOR ska1-saknr,
 S_ERDAT FOR VBAK-ERDAT.
PARAMETERS: pck_detl RADIOBUTTON GROUP rep1,
 pck_summ RADIOBUTTON GROUP rep1,
 pck_dtsm RADIOBUTTON GROUP rep1 DEFAULT 'X'.
SELECTION-SCREEN END OF BLOCK blk1.
top of the page
TOP-OF-PAGE.
PERFORM f_top_of_page.
FORM f_top_of_page .
IF v_topofpage = 'D'.
*-->Report header for detail report
 WRITE:/2 'Printed By :', sy-uname,
 80 'Stock Aging Report - Detail',
 180 'Printed on:', sy-datum, sy-timlo,
 220 'Page:', sy-pagno.
 WRITE:/,/,/.
 WRITE:/2 'Storage',
 10 'Matl ID',
 22 'Matl Description',
 61 'UOM',
 78 '<--=<QTY ON THIS DATE -->',
 78 '<-- =< 10 days -->',
 112 '<--11 to 30 days -->',
 148 '<--31 to 60 days -->',
 181 '<--61 to 90 days -->',
 216 '<-- > 90 days -->',
 /2 'Location',
 76 'Qty',
 92 'Value'.
 112 'Qty',
 128 'Value',
 148 'Qty',
 164 'Value',
 181 'Qty',
 195 'Value',
 216 'Qty',
 231 'Value'.
 WRITE:/2 sy-uline(235).
ELSE.
*-->Report header for Summary report
 WRITE:/2 'Printed By :', sy-uname,
 80 'Stock Aging Report - Summary',
 180 'Printed on:', sy-datum, sy-timlo,
 220 'Page:', sy-pagno.
 WRITE:/,/,/.
 WRITE:/2 'Storage',
 10 'Matl ID',
 22 'Matl Description',
 61 'UOM',
 78 '<--< QTY ON THIS DATE -->',
 78 '<-- < 10 days -->',
 112 '<--11 to 30 days -->',
 148 '<--31 to 60 days -->',
 181 '<--61 to 90 days -->',
 216 '<-- > 90 days -->',
 /2 'Location',
 76 'Qty',
 92 'Value'.
 112 'Qty',
 128 'Value',
 148 'Qty',
 164 'Value',
 181 'Qty',
 195 'Value',
 216 'Qty',
 231 'Value'.
 WRITE:/2 sy-uline(235).
ENDIF.
ENDFORM. " f_top_of_page
*start-of-selection
*PERFOM f_data_selection.
FORM f_data_selection.
SELECT a~werks
 a~lgort
 a~matnr
 a~saknr
 a~lbkum
 a~erdat
 a~labst
 a~umlme
 a~insme
 a~einme
 a~speme
 a~retme
 b~verpr "this field no long been used
 c~maktx
 d~meins
 INTO CORRESPONDING FIELDS OF TABLE ta_material
 FROM mard AS a
 INNER JOIN makt AS c ON amatnr = cmatnr
 INNER JOIN mara AS d ON amatnr = dmatnr
 WHERE a~matnr IN s_matnr
 AND a~werks IN s_werks
 AND a~lgort IN s_lgort
 AND a~saknr IN s_saknr
 AND a~erdat IN s_erdat
 AND c~spras = 'EN'.
*--> SC01 - End of Insertion **
*-->Select material documents
SELECT a~mblnr
 a~mjahr
 a~zeile
 a~meins
 a~menge
 a~werks
 a~lgort
 a~matnr
 b~budat
 INTO CORRESPONDING FIELDS OF TABLE ta_mseg
FROM mseg AS a INNER JOIN mkpf AS b
ON amblnr = bmblnr
AND amjahr = bmjahr
FOR ALL ENTRIES IN ta_material
WHERE matnr = ta_material-matnr
AND a~werks = ta_material-werks
AND a~lgort = ta_material-lgort
AND algort NE aumlgo
AND a~shkzg = 'S'
AND a~smbln EQ space
AND a~smblp EQ space.
*--> SC03 - Start of Insertion **
If MBLNR exist in MSEG-SMBLN and this
record's SHKZG = 'H'. Remove it from the table.
This is becuase this particular record has already been reverse.
LOOP AT ta_mseg.
 SELECT SINGLE *
 FROM mseg
 WHERE smbln = ta_mseg-mblnr
*->Begin of KL02+ -
 and SMBLP = ta_mseg-zeile.
 AND shkzg = 'H'. "return. " KL02-
*->End of KL02+ -
 IF sy-subrc = 0.
 DELETE ta_mseg.
 ENDIF.
ENDLOOP.
*--> SC03 - Enf of Insertion **
ENDFORM. " f_data_selection
*IMPORTANT , NEED TO CHECK LATER
FORM f_data_preparation.
*-->Append data for report details
LOOP AT ta_material.
 DATA: ta_msegtemp LIKE ta_mseg OCCURS 2 WITH HEADER LINE.
*-->Loop at all material documents into a temp table
 REFRESH ta_msegtemp. CLEAR ta_msegtemp.
 LOOP AT ta_mseg WHERE matnr = ta_material-matnr AND
 werks = ta_material-werks AND
 lgort = ta_material-lgort.
 ta_msegtemp = ta_mseg. APPEND ta_msegtemp.
 ENDLOOP.
*-->Add up all the stock for the material
 CLEAR w_mengb.
 w_mengb = ta_material-labst +
 ta_material-umlme +
 ta_material-insme +
 ta_material-einme +
 ta_material-speme +
 ta_material-retme.
 IF w_mengb IS INITIAL.
 CONTINUE.
 ENDIF.
*-->sort msegtemp by posting date
 SORT ta_msegtemp BY budat DESCENDING.
*-->get the values from the material documents into the report output
 LOOP AT ta_msegtemp.
*->Begin of KL02- -
 CALL FUNCTION 'HRCM_TIME_PERIOD_CALCULATE'
 EXPORTING
 begda = ta_msegtemp-budat
 endda = sy-datum
 IMPORTING
 NOYRS =
 nomns = w_mths
 nodys = w_days
 EXCEPTIONS
 invalid_dates = 1
 overflow = 2
 OTHERS = 3
*->End of KL02- -
*->Begin of KL02+ -
*-->Get the days difference btw two dates
 clear w_days.
 w_days = sy-datum - ta_msegtemp-budat.
*--> Include today's date into calculation
 w_days = w_days + 1.
*->End of KL02+ -
check base unit, do conversion
 IF ta_material-meins <> ta_msegtemp-meins.
 CALL FUNCTION 'MD_CONVERT_MATERIAL_UNIT'
 EXPORTING
 i_matnr = ta_material-matnr
 i_in_me = ta_msegtemp-meins
 i_out_me = ta_material-meins
 i_menge = ta_msegtemp-menge
 IMPORTING
 e_menge = ta_msegtemp-menge
 EXCEPTIONS
 error_in_application = 1
 error = 2
 OTHERS = 3.
 ENDIF.
*--> SC01 - Start of Insertion **
 SELECT SINGLE peinh
 verpr
 INTO (lv_peinh,
 lv_verpr)
 FROM mbew
 WHERE matnr = ta_material-matnr
 AND bwkey = ta_material-werks.
 IF sy-subrc = 0.
 ta_material-verpr = lv_verpr.
 ENDIF.
*--> SC01 - End of Insertion **
*-->check whether the mseg value is LE than the stock value
 IF ta_msegtemp-menge LE w_mengb.
*-->Days < 10 days
 IF w_days LE 1 AND w_days EQ 366.
 i_mat2-meng0 = i_mat2-meng0 + ta_msegtemp-menge.
 IF NOT lv_peinh EQ 0.
 i_mat2-value0 = ( i_mat2-meng0 / lv_peinh ) *
ta_material-verpr."+SC01
 ENDIF.
**-->Days 11 - 30 days
 ELSEIF w_days >= 11 AND w_days =< 30.
 i_mat2-meng1 = i_mat2-meng1 + ta_msegtemp-menge.
 IF NOT lv_peinh EQ 0.
 i_mat2-value1 = ( i_mat2-meng1 / lv_peinh ) *
*ta_material-verpr."+SC01
 ENDIF.
**-->Days 31-60 days
 ELSEIF w_days >= 31 AND w_days =< 60.
 i_mat2-meng2 = i_mat2-meng2 + ta_msegtemp-menge.
 IF NOT lv_peinh EQ 0.
 i_mat2-value2 = ( i_mat2-meng2 / lv_peinh ) *
*ta_material-verpr."+SC01
 ENDIF.
**-->Days 61-90 days
 ELSEIF w_days >= 61 AND w_days =< 90.
 i_mat2-meng3 = i_mat2-meng3 + ta_msegtemp-menge.
 IF NOT lv_peinh EQ 0.
 i_mat2-value3 = ( i_mat2-meng3 / lv_peinh ) *
*ta_material-verpr.
 ENDIF.
**-->Days > 90 days
 ELSEIF w_days > 90.
 i_mat2-meng4 = i_mat2-meng4 + ta_msegtemp-menge.
 IF NOT lv_peinh EQ 0.
 i_mat2-value4 = ( i_mat2-meng4 / lv_peinh ) *
*ta_material-verpr.
 ENDIF.
 ENDIF.
*->End of KL002+
 w_mengb = w_mengb - ta_msegtemp-menge.
 ELSE.
 IF NOT w_mengb LE 0 .
 IF NOT lv_peinh EQ 0.
**->End of KL001+
 i_mat2-value0 = ( i_mat2-meng0 / lv_peinh )
*ta_material-verpr."+SC01
**->Begin of KL001+
 ENDIF.
 ELSEIF w_days GE 22.
 i_mat2-meng3 = i_mat2-meng3 + w_mengb.
 IF NOT lv_peinh EQ 0.
 i_mat2-value3 = ( i_mat2-meng3 / lv_peinh )
*ta_material-verpr.
 ENDIF.
**->End of KL001+
 ENDIF.
**--> SC02 - End of Insertioin **
 ENDIF.
*->End of KL002-
*->Begin of KL002+
*--> < 10 days
 IF w_days EQ 1 AND w_days LE 366.
 i_mat2-meng0 = i_mat2-meng0 + ta_msegtemp-menge.
 IF NOT lv_peinh EQ 0.
 i_mat2-value0 = ( i_mat2-meng0 / lv_peinh ) *
ta_material-verpr."+SC01
 ENDIF.
 ELSEIF w_days >= 11 AND w_days =< 30.
 i_mat2-meng1 = i_mat2-meng1 + w_mengb.
 IF NOT lv_peinh EQ 0.
 i_mat2-value1 = ( i_mat2-meng1 / lv_peinh ) *
*ta_material-verpr.
 ENDIF.
**--> 31 - 60 days
 ELSEIF w_days >= 31 AND w_days =< 60.
 i_mat2-meng2 = i_mat2-meng2 + w_mengb.
 IF NOT lv_peinh EQ 0.
 i_mat2-value2 = ( i_mat2-meng2 / lv_peinh ) *
*ta_material-verpr.
 ENDIF.
**--> 61 - 90 days
 ELSEIF w_days >= 61 AND w_days =< 90.
 i_mat2-meng3 = i_mat2-meng3 + w_mengb.
 IF NOT lv_peinh EQ 0.
 i_mat2-value3 = ( i_mat2-meng3 / lv_peinh ) *
*ta_material-verpr.
 ENDIF.
**--> > 90 days
 ELSEIF w_days > 90.
 i_mat2-meng4 = i_mat2-meng4 + w_mengb.
 IF NOT lv_peinh EQ 0.
 i_mat2-value4 = ( i_mat2-meng4 / lv_peinh ) *
*ta_material-verpr.
 ENDIF.
 ENDIF.
*->End of KL002+
 w_mengb = 0.
 ENDIF. " check stock value NE zero
 ENDIF. "check Mat doc amount is LE than the stock value
ENDIF.
 ENDLOOP. " msegtemp
*-->append i_mat2 values
 i_mat2-werks = ta_material-werks.
 i_mat2-lgort = ta_material-lgort.
 i_mat2-matnr = ta_material-matnr.
 i_mat2-maktx = ta_material-maktx.
 i_mat2-meins = ta_material-meins.
 APPEND i_mat2. CLEAR i_mat2.
ENDLOOP. " ta_material
*-->Append data for summary data
DATA: i_lgort LIKE i_mat2 OCCURS 2 WITH HEADER LINE.
i_lgort[] = i_mat2[].
SORT i_lgort BY werks lgort.
DELETE ADJACENT DUPLICATES FROM i_lgort COMPARING werks lgort.
DATA: v_cnt0(5), v_cnt1(5), v_cnt2(5), v_cnt3(5), v_cnt4(5),
 v_value0 LIKE i_matsum-value0.
 v_value1 LIKE i_matsum-value1,
 v_value2 LIKE i_matsum-value2,
 v_value3 LIKE i_matsum-value3,
 v_value4 LIKE i_matsum-value4.
LOOP AT i_lgort.
 CLEAR v_cnt0. CLEAR v_value0.
CLEAR v_cnt1. CLEAR v_value1.
 CLEAR v_cnt2. CLEAR v_value2.
 CLEAR v_cnt3. CLEAR v_value3.
 CLEAR v_cnt4. CLEAR v_value4.
 LOOP AT i_mat2 WHERE lgort = i_lgort-lgort AND
 werks = i_lgort-werks.
 IF NOT i_mat2-meng0 IS INITIAL.
 v_cnt0 = v_cnt0 + 1.
 v_value0 = v_value0 + i_mat2-value0.
 ENDIF.
 IF NOT i_mat2-meng1 IS INITIAL.
 v_cnt1 = v_cnt1 + 1.
 v_value1 = v_value1 + i_mat2-value1.
 ENDIF.
 IF NOT i_mat2-meng2 IS INITIAL.
 v_cnt2 = v_cnt2 + 1.
 v_value2 = v_value2 + i_mat2-value2.
 ENDIF.
 IF NOT i_mat2-meng3 IS INITIAL.
 v_cnt3 = v_cnt3 + 1.
 v_value3 = v_value3 + i_mat2-value3.
 ENDIF.
 IF NOT i_mat2-meng4 IS INITIAL.
 v_cnt4 = v_cnt4 + 1.
 v_value4 = v_value4 + i_mat2-value4.
 ENDIF.
 ENDLOOP.
 CLEAR i_matsum.
 i_matsum-lgort = i_mat2-lgort.
 IF v_cnt0 NE space.
 i_matsum-cnt0 = v_cnt0.
 i_matsum-value0 = v_value0.
 APPEND i_matsum.
 ENDIF.
 CLEAR i_matsum.
 i_matsum-lgort = i_mat2-lgort.
 IF v_cnt1 NE space.
 i_matsum-cnt1 = v_cnt1.
 i_matsum-value1 = v_value1.
 APPEND i_matsum.
 ENDIF.
 CLEAR i_matsum.
 i_matsum-lgort = i_mat2-lgort.
 IF v_cnt2 NE space.
 i_matsum-cnt2 = v_cnt2.
 i_matsum-value2 = v_value2.
 APPEND i_matsum.
 ENDIF.
 CLEAR i_matsum.
 i_matsum-lgort = i_mat2-lgort.
 IF v_cnt3 NE space.
 i_matsum-cnt3 = v_cnt3.
 i_matsum-value3 = v_value3.
 APPEND i_matsum.
 ENDIF.
 CLEAR i_matsum.
 i_matsum-lgort = i_mat2-lgort.
 IF v_cnt4 NE space.
 i_matsum-cnt4 = v_cnt4.
 i_matsum-value4 = v_value4.
 APPEND i_matsum.
 ENDIF.
ENDLOOP.
ENDFORM. "f_data_preparation
*IMPORTANT , NEED TO CHECK LATER
FORM f_display_data .
IF pck_dtsm = 'X'.
*-->Display detail
 v_topofpage = 'D'.
 PERFORM f_display_detail.
*-->display summary
 v_topofpage = 'S'.
 NEW-PAGE.
 PERFORM f_display_summary.
ELSEIF pck_detl = 'X'.
*-->Display detail
 v_topofpage = 'D'.
 PERFORM f_display_detail.
ELSEIF pck_summ = 'X'.
*-->display summary
 v_topofpage = 'S'.
 PERFORM f_display_summary.
ENDIF.
ENDFORM. " f_display_data
FORM f_display_detail .
v_topofpage = 'D'.
SORT i_mat2 BY werks lgort.
*DATA: v_count(5),
DATA: v_count,
 v_va1 LIKE i_mat2-value0.
 v_va2 LIKE i_mat2-value0,
 v_va3 LIKE i_mat2-value0,
 v_va4 LIKE i_mat2-value0,
 v_va5 LIKE i_mat2-value0.
LOOP AT i_mat2.
 WRITE:/2 i_mat2-lgort,
 10 i_mat2-matnr,
 22 i_mat2-maktx(38),
 61 i_mat2-meins,
 64 i_mat2-meng0,
 82 i_mat2-value0.
 100 i_mat2-meng1,
 118 i_mat2-value1,
 136 i_mat2-meng2,
 154 i_mat2-value2,
 169 i_mat2-meng3,
 186 i_mat2-value3,
 204 i_mat2-meng4,
 222 i_mat2-value4.
*-->Set counter and add up all values by lgort
 v_count = v_count + 1.
 v_va1 = v_va1 + i_mat2-value0.
 v_va2 = v_va2 + i_mat2-value1.
 v_va3 = v_va3 + i_mat2-value2.
 v_va4 = v_va4 + i_mat2-value3.
 v_va5 = v_va5 + i_mat2-value4.
 AT END OF lgort.
 WRITE:/10 'Cnt:',
 15 v_count,
 55 'Subtotal',
 82 v_va1.
 118 v_va2,
 154 v_va3,
 186 v_va4,
 222 v_va5.
 CLEAR v_count. CLEAR v_va1.
 CLEAR v_va2. CLEAR v_va3. CLEAR v_va4. clear v_va5.
 ENDAT.
ENDLOOP.
ENDFORM. " f_display_detail
FORM f_display_summary .
v_topofpage = 'S'.
LOOP AT i_matsum.
 IF NOT i_matsum-cnt0 IS INITIAL.
 WRITE:/2 i_matsum-lgort,
 10 'Cnt:',15 i_matsum-cnt0,
 82 i_matsum-value0.
 ENDIF.
 IF NOT i_matsum-cnt1 IS INITIAL.
 WRITE:/2 i_matsum-lgort,
 10 'Cnt:',15 i_matsum-cnt1,
 118 i_matsum-value1.
 ENDIF.
 IF NOT i_matsum-cnt2 IS INITIAL.
 WRITE:/2 i_matsum-lgort,
 10 'Cnt:',15 i_matsum-cnt2,
 154 i_matsum-value2.
 ENDIF.
 IF NOT i_matsum-cnt3 IS INITIAL.
 WRITE:/2 i_matsum-lgort,
 10 'Cnt:', 15 i_matsum-cnt3,
 186 i_matsum-value3.
 ENDIF.
 IF NOT i_matsum-cnt4 IS INITIAL.
 WRITE:/2 i_matsum-lgort,
 10 'Cnt:', 15 i_matsum-cnt4,
 222 i_matsum-value4.
 ENDIF.
ENDLOOP.
ENDFORM. " f_display_summary

How to exclude records from one table that is contained in a second table

I am trying to create a Crystal report that excludes records from one Table that is contained in a second table using the != link option and it is not working. I've tried all of the different enforce options, and it is still not excluding those records. Does anyone have any suggestions of what I'm doing wrong or any other suggestions how I can obtain the results I need?
Thanks in advance!

Have you tried by Command ?
Thanks,
Gordon

How to count records from 2 tables and show in RDLC Report

hi all,
its being a one day searching for the solution but No Luck.
I have two SQL tables tblstudetail and tblfeereceiptdetail.
i just want to count records from both tables and show in RDLC report.
I tried SQl Query Like This:
select a.session, a.course,
Count(CASE a.ADstatus WHEN 'OK' THEN 1 ELSE 0 END ) AS Admission,
Count(CASE s .I_receiptstatus WHEN 'OK' THEN 1 ELSE 0 END) AS Feeprint
from
tblstudetail a
FULL join
tblfeereceiptdetail s on s.studentID = a.studentID
where a.session = '2015' AND s.Fsession = '2015' AND a.adcat = 'Regular'
GROUP BY a.session,a.course
ORDER by a.course
The result Show the Same Value in Both columns
Session    Course      Admission       FeeDetail
2015          B.A. I               275              275
2015          B.A. II              307             307
2015         B.A. III             255            255
2015          B.Sc. I             110             110
2015   B.Sc. II           105            105
2015          B.Sc. III            64               64
Actully I want to Count How many ADMISSION have been Taken(FROM tblstudetail) and How many FEE RECEIPT have been Print (From tblfeereceiptdetail).
please guide me for this as soon as possible.
thanks in advance...

I am counting 'OK' in both the table columns I.e 'ADstatus' in tblstudetail and 'feereceiptstatus' in tblfeereceiptdetail
please suggest me

How to delete records from MTL_SYSTEM_ITEMS table

Hello Experts,
BANNER
=======
Oracle8i Enterprise Edition Release 8.1.7.4.0 - Production
PL/SQL Release 8.1.7.4.0 - Production
CORE     8.1.7.0.0     Production
TNS for IBM/AIX RISC System/6000: Version 8.1.7.4.0 - Production
NLSRTL Version 3.4.1.0.0 - Production
I am working on Oracle Apps - 11.5.8 version.
I have some doubts in deleting the records from MTL_SYSTEM_ITEMS table.
There are few records which have junk characters and currently resides in table.
I need to delete those records.
But as per the approach; we should not delete any data directly from MTL table as it would cause huge impact.
I have followed the below approach; but didnt worked out well.
Script
=======
1)
I have modified the below parameter in the MTL_SYSTEM_ITEMS_INTERFACE table --> SET_PROCESS_ID =0,TRANSACTION_TYPE ='DELETE',PROCESS_FLAG=1 .
Apart from that; everything remains the same as in MTL_SYSTEM_ITEM table.
2) Called the "Import Items" concurrent program.
It got successfully completed. But record still exists in MTL_SYSTEM_ITEMS_INTERFACE table
Your help is highly appreciated.
Insert into MTL_SYSTEM_ITEMS_INTERFACE
   (SET_PROCESS_ID ,TRANSACTION_TYPE,PROCESS_FLAG ,INVENTORY_ITEM_ID, ORGANIZATION_ID, LAST_UPDATE_DATE, LAST_UPDATED_BY, CREATION_DATE, CREATED_BY, LAST_UPDATE_LOGIN,
SUMMARY_FLAG, ENABLED_FLAG, DESCRIPTION, BUYER_ID, SEGMENT1, ATTRIBUTE3, ATTRIBUTE4, ATTRIBUTE9, ATTRIBUTE15, PURCHASING_ITEM_FLAG, SHIPPABLE_ITEM_FLAG,
CUSTOMER_ORDER_FLAG, INTERNAL_ORDER_FLAG, SERVICE_ITEM_FLAG, INVENTORY_ITEM_FLAG, ENG_ITEM_FLAG, INVENTORY_ASSET_FLAG, PURCHASING_ENABLED_FLAG,
CUSTOMER_ORDER_ENABLED_FLAG, INTERNAL_ORDER_ENABLED_FLAG, SO_TRANSACTIONS_FLAG, MTL_TRANSACTIONS_ENABLED_FLAG, STOCK_ENABLED_FLAG, BOM_ENABLED_FLAG, BUILD_IN_WIP_FLAG,
REVISION_QTY_CONTROL_CODE, CATALOG_STATUS_FLAG, RETURNABLE_FLAG, TAXABLE_FLAG, QTY_RCV_EXCEPTION_CODE, ALLOW_ITEM_DESC_UPDATE_FLAG, RECEIPT_REQUIRED_FLAG,
RFQ_REQUIRED_FLAG, QTY_RCV_TOLERANCE, LIST_PRICE_PER_UNIT, PRICE_TOLERANCE_PERCENT, ENFORCE_SHIP_TO_LOCATION_CODE, ALLOW_SUBSTITUTE_RECEIPTS_FLAG,
ALLOW_UNORDERED_RECEIPTS_FLAG, DAYS_EARLY_RECEIPT_ALLOWED, DAYS_LATE_RECEIPT_ALLOWED, RECEIPT_DAYS_EXCEPTION_CODE, RECEIVING_ROUTING_ID, LOT_CONTROL_CODE,
SHELF_LIFE_CODE, SHELF_LIFE_DAYS, SERIAL_NUMBER_CONTROL_CODE, RESTRICT_SUBINVENTORIES_CODE, RESTRICT_LOCATORS_CODE, LOCATION_CONTROL_CODE, ACCEPTABLE_EARLY_DAYS,
PLANNING_TIME_FENCE_CODE, LEAD_TIME_LOT_SIZE, ACCEPTABLE_RATE_INCREASE, ACCEPTABLE_RATE_DECREASE, PLANNING_TIME_FENCE_DAYS, END_ASSEMBLY_PEGGING_FLAG,
REPETITIVE_PLANNING_FLAG, BOM_ITEM_TYPE, PICK_COMPONENTS_FLAG, REPLENISH_TO_ORDER_FLAG, ATP_COMPONENTS_FLAG, ATP_FLAG, WIP_SUPPLY_TYPE, PRIMARY_UOM_CODE,
PRIMARY_UNIT_OF_MEASURE, ALLOWED_UNITS_LOOKUP_CODE, COST_OF_SALES_ACCOUNT, SALES_ACCOUNT, DEFAULT_INCLUDE_IN_ROLLUP_FLAG, INVENTORY_ITEM_STATUS_CODE,
INVENTORY_PLANNING_CODE, PLANNING_MAKE_BUY_CODE, FIXED_LOT_MULTIPLIER, ROUNDING_CONTROL_TYPE, CARRYING_COST, POSTPROCESSING_LEAD_TIME, PREPROCESSING_LEAD_TIME,
FULL_LEAD_TIME, MRP_SAFETY_STOCK_CODE, FIXED_DAYS_SUPPLY, RESERVABLE_TYPE, VENDOR_WARRANTY_FLAG, SERVICEABLE_COMPONENT_FLAG, SERVICEABLE_PRODUCT_FLAG,
PREVENTIVE_MAINTENANCE_FLAG, PRORATE_SERVICE_FLAG, INVOICEABLE_ITEM_FLAG, INVOICE_ENABLED_FLAG, MUST_USE_APPROVED_VENDOR_FLAG, OUTSIDE_OPERATION_FLAG,
COSTING_ENABLED_FLAG, AUTO_CREATED_CONFIG_FLAG, CYCLE_COUNT_ENABLED_FLAG, ITEM_TYPE, SHIP_MODEL_COMPLETE_FLAG, MRP_PLANNING_CODE, RETURN_INSPECTION_REQUIREMENT,
EFFECTIVITY_CONTROL, CHECK_SHORTAGES_FLAG, EQUIPMENT_TYPE, WEB_STATUS, BULK_PICKED_FLAG, LOT_STATUS_ENABLED, SERIAL_STATUS_ENABLED, LOT_SPLIT_ENABLED,
LOT_MERGE_ENABLED, DUAL_UOM_CONTROL, SERV_BILLING_ENABLED_FLAG, LOT_TRANSLATE_ENABLED, DEFAULT_SO_SOURCE_TYPE, CREATE_SUPPLY_FLAG)
Values
   (0,'DELETE',1,464852, 102, TO_DATE('01/11/2007 16:15:11', 'MM/DD/YYYY HH24:MI:SS'), 3443, TO_DATE('08/24/2006 14:13:03', 'MM/DD/YYYY HH24:MI:SS'), 3443, 21069398,
'N', 'Y', 'pentaseal 6 X 320 SL-807202 Klockner', 4223, '0006320161', 'No', 'No', 'MRPM', 'N', 'Y', 'N', 'N', 'N', 'N', 'Y', 'N', 'Y', 'Y', 'N', 'N', 'N', 'N', 'Y',
'Y', 'Y', 1, 'N', 'Y', 'N', 'WARNING', 'Y', 'Y', 'N', 3, 0, 20, 'WARNING', 'Y', 'Y', 5, 5, 'WARNING', 3, 1, 2, 1825, 1, 2, 2, 2, 10, 4, 1, 0, 0, 1, 'B', 'N', 4, 'N',
'N', 'N', 'N', 2, 'EA', 'EACH', 3, 12916, 14296, 'Y', 'Uncosted', 6, 1, 100, 1, 2, 0, 5, 50, 1, 20, 1, 'N', 'N', 'N', 'N', 'N', 'N', 'N', 'N', 'N', 'Y', 'N', 'Y',
'CMPC', 'N', 3, 2, 1, 'N', 2, 'UNPUBLISHED', 'N', 'N', 'N', 'N', 'N', 1, 'N', 'N', 'INTERNAL', 'Y');---------

Hi,
You have to use the delete item utility of Oracle Inventory.
Responsibility: Inventory Superuser or similar
Navigation: Items -> Delete Items
Enter a meaningful name in the Group field.
Type - Item
Select the organization you want to delete the item from.
In the details section, enter the items you want to delete.
Once all the items entered, click on the "Chcek Group" button. This will validate whether the items you have entered are eligible to delete (i.e. whether any child record such as transactions exist).
It will submit a concurrent program and once the program finishes you will be able to see the result in the Results tab.
Finally click on the "Delete Group" button to delete the eligible items.
Thanks,
PS.

How to fetch records from the database into a combo box?

Hi:
I´m really new with ABLBPM and I´m trying to fetch records from the database to display them into a combo box as valid values for a presentation but I´m using a dynamic method with this code:
for each row in SELECT campo1, campo2 from TABLE
do
solicitudes[] = [row.campo1, row.campo2]
end
return solicitudes
And the debugger says that SQL instructions can be used only in fuctions and procedures that are executed on the server.
Do you know another way to do it?
P.D. Sorry for my terrible english
Greetings

Hi Steve,
Thank you, your idea is perfect, but when I try to run the screenflow where the combo should be filled I get this error:
fuego.lang.ComponentExecutionException: No se ha podido ejecutar correctamente la tarea.
Motivo: 'java.lang.NullPointerException'.
 at fuego.web.execution.InteractiveExecution.setExecutionError(InteractiveExecution.java:307)
 at fuego.web.execution.InteractiveExecution.process(InteractiveExecution.java:166)
 at fuego.web.execution.impl.WebInteractiveExecution.process(WebInteractiveExecution.java:54)
 at fuego.webdebugger.servlet.DebuggerServlet.redirect(DebuggerServlet.java:136)
 at fuego.webdebugger.servlet.DebuggerServlet.doPost(DebuggerServlet.java:85)
 at fuego.webdebugger.servlet.DebuggerServlet.doGet(DebuggerServlet.java:66)
 at javax.servlet.http.HttpServlet.service(HttpServlet.java:689)
 at javax.servlet.http.HttpServlet.service(HttpServlet.java:802)
 at org.apache.catalina.core.ApplicationFilterChain.internalDoFilter(ApplicationFilterChain.java:252)
 at org.apache.catalina.core.ApplicationFilterChain.doFilter(ApplicationFilterChain.java:173)
 at org.apache.catalina.core.ApplicationDispatcher.invoke(ApplicationDispatcher.java:672)
 at org.apache.catalina.core.ApplicationDispatcher.processRequest(ApplicationDispatcher.java:463)
 at org.apache.catalina.core.ApplicationDispatcher.doForward(ApplicationDispatcher.java:398)
 at org.apache.catalina.core.ApplicationDispatcher.forward(ApplicationDispatcher.java:301)
 at fuego.web.execution.servlet.ServletExternalContext.forwardInternal(ServletExternalContext.java:197)
 at fuego.web.execution.servlet.ServletExternalContext.processAction(ServletExternalContext.java:110)
 at fuego.webdebugger.servlet.DebuggerExecution.dispatchComponentExecution(DebuggerExecution.java:64)
 at fuego.web.execution.InteractiveExecution.invokePrepare(InteractiveExecution.java:351)
 at fuego.web.execution.InteractiveExecution.process(InteractiveExecution.java:192)
 at fuego.web.execution.impl.WebInteractiveExecution.process(WebInteractiveExecution.java:54)
 at fuego.web.execution.InteractiveExecution.process(InteractiveExecution.java:223)
 at fuego.webdebugger.servlet.DebuggerServlet.doDebug(DebuggerServlet.java:148)
 at fuego.webdebugger.servlet.DebuggerServlet.doPost(DebuggerServlet.java:82)
 at fuego.webdebugger.servlet.DebuggerServlet.doGet(DebuggerServlet.java:66)
 at javax.servlet.http.HttpServlet.service(HttpServlet.java:689)
 at javax.servlet.http.HttpServlet.service(HttpServlet.java:802)
 at org.apache.catalina.core.ApplicationFilterChain.internalDoFilter(ApplicationFilterChain.java:252)
 at org.apache.catalina.core.ApplicationFilterChain.doFilter(ApplicationFilterChain.java:173)
Any ideas??
Thanks and greetings

How to read records from Relationship table using ABAP API's

Hi All,
I need to retrieve the records from Relationship table. In Java API's I came to know there is an option to retrieve this. I could not find anything in ABAP API's. Is there any option in ABAP API's to do this.
Please Suggest.
Thank You,
Gajendra.

Hi Gajendra,
You can mainly read records from MDM (in a DDIC structure) using ABAP API's using the following function modules/methods:
1. RETRIEVE: This is used to generically retrieve records from tables. Attributes and Values can also be retrieved.
2. RETRIEVE SIMPLE: Retrieve records from MDM in a simple way.( simple data types).
3. RETRIEVE CHECKOUT: Retrieves all checked out ID's.
4. RETRIEVE ATTRIBUTES: Retrieves attribute(s) from a Taxanomy table.
You will find all these methods in the following interface
Interface : IF_MDM_CORE_SERVICES
Hope it helps.
*Please reward points if found useful.
Thanks and Regards
Nitin Jain

DB poller to poll the record by ordering the available records from the table

We are using DB Adapter poller to poll 50 records from table order by one column "EEVNT_ID".
The expected action is to sort the records in ascending order based on EVENT_ID from the table and then to return the first 50 records.
But the actual behavior noticed is, 50 records being picked randomly and then these records are being sorted in ascending order.
We identified this using the DB AWR report. Is there any way within the adapter to prioritize the execution in a way that it will sort the records first and then poll the first 50 records?
Any suggestions at the earliest would be much appreciated.
Many Thanks.

We are using DB Adapter poller to poll 50 records from table order by one column "EEVNT_ID".
The expected action is to sort the records in ascending order based on EVENT_ID from the table and then to return the first 50 records.
But the actual behavior noticed is, 50 records being picked randomly and then these records are being sorted in ascending order.
We identified this using the DB AWR report. Is there any way within the adapter to prioritize the execution in a way that it will sort the records first and then poll the first 50 records?
Any suggestions at the earliest would be much appreciated.
Many Thanks.

How I can extract from the table KONM?

Hi Experts,
I need to extract information from the table KONM.
Somebody know any standard extractor?
Thanks a lot!

Hi Leticia,
I think SAP does'nt deliver any standard extractor or Datasource related to the table KONM. The datasources delivered by SAP and related to the pricing are 2lis_11_VAKON and 2lis_13_VDKON but linked to the table KOMV.
In your case you have to create a generic datasource using the T-Code RSO2 and you link it to the table KONM with a View, Infoset query or a function module.
Regards.
Yacine

How to display name of the employees start with any letter?

Hi Developer,
Please guide me in solving the issues, that i need to display names of the employee starting with any letter.
example:
if i provide name of the employee starting letter 'A' it should display only those name in the database table with starting letter.
parameters: a*
it should display name with starting letter a.
example:
abdi
akbar
akash
akilesh
thanks,
ravi.

Hi Ravinder,
You can use Ranges for this purpose:
RANGES: r_name FOR type_name.
r_name-sign = 'I'.
r_name-option = 'CP'.
r_name-low = 'a*'.
INSERT r_name.
SELECT name FROM table_name INTO TABLE it_name WHERE name IN r_name.
Regards.

How to rerieve records from the table starting with character 'D'

Similar Messages

Maybe you are looking for