Logic needed pls...
Hi,
In my ALV report i need to display some data on top of page depending on the selection criterian. everything is working fine, but there is one field which has four check boxes. I need to display these (checked) checkboxes description on top of page. for example, if first and second checked only those two shld be displayed. if first and last only those two and if all are checked, all check boxes description should be displayed on top of page. Any easy way to acheive this..pls helpme....
Thanks
Ram.
Hi Santhosh,
Is that field (with 4 check boxes) belonging to selection screen or ALV?
If it is from selection screen then we have to follow Bujji's suggestion.
we need to check whether first check box is checked or not if it is yes display its description using event print_top_of_page of cl_gui_alv_grid..
same for remaining three check boxes.
here combination check is not necessary i think.U r saying that individual description of check boxes has to display.right.
Hope this will helpful.
Edited by: sushama Vivek on Jun 3, 2008 12:15 PM
Similar Messages
-
Hi
I have to add 'Upload excel file' option in Material consumption program. Current logic is Uploading Unix file. Can any one give me some idea pls.
following is my coding
PROGRAM ZMDM0081 MESSAGE-ID ZM.
TABLES: MARA.
* Resource file record structure
DATA: BEGIN OF RECORD,
MATERIAL_NUMBER(10),
PLANT(5),
CORRECTED_VALUE_19(11),
CORRECTED_VALUE_18(11),
CORRECTED_VALUE_17(11),
CORRECTED_VALUE_16(11),
CORRECTED_VALUE_15(11),
CORRECTED_VALUE_14(11),
CORRECTED_VALUE_13(11),
CORRECTED_VALUE_12(11),
CORRECTED_VALUE_11(11),
CORRECTED_VALUE_10(11),
CORRECTED_VALUE_09(11),
CORRECTED_VALUE_08(11),
CORRECTED_VALUE_07(11),
CORRECTED_VALUE_06(11),
CORRECTED_VALUE_05(11),
CORRECTED_VALUE_04(11),
CORRECTED_VALUE_03(11),
CORRECTED_VALUE_02(11),
CORRECTED_VALUE_01(11),
END OF RECORD.
* Working variables
DATA: RECORD_READ(6) TYPE P,
RECORD_INSERT(6) TYPE P,
RECORD_OMIT(6) TYPE P,
MATERIAL_NUMBER LIKE MARA-MATNR,
G_BRGEW LIKE MARA-BRGEW,
N_NTGEW LIKE MARA-NTGEW,
PLANT LIKE MARC-WERKS,
REMARKS(50),
FLAG(1),
RECORD_FLAG(1),
INTENSIFIED_FLAG(1),
NUMBER(6) TYPE P.
* Constant variables
CONSTANTS: VALID VALUE '1',
INVALID VALUE '0',
ON VALUE '1',
OFF VALUE '0'.
* Reporting groups
FIELD-GROUPS HEADER.
* Insert into groups
INSERT MATERIAL_NUMBER
PLANT
REMARKS
INTO HEADER.
* BDC parameters
SELECTION-SCREEN BEGIN OF BLOCK ONE WITH FRAME TITLE TEXT-010.
PARAMETERS: FILE(30) TYPE C
DEFAULT '/export/remote/data.txt'
LOWER CASE
OBLIGATORY,
SESSION LIKE RL04I-MAPPE
OBLIGATORY
DEFAULT '8301_MM02',
UNAME LIKE SY-UNAME DEFAULT SY-UNAME.
SELECTION-SCREEN END OF BLOCK ONE.
* Data conversion parameters
SELECTION-SCREEN BEGIN OF BLOCK TWO WITH FRAME TITLE TEXT-020.
PARAMETERS MONTH(2) TYPE N DEFAULT 1.
SELECTION-SCREEN END OF BLOCK TWO.
* Notes to user
SELECTION-SCREEN BEGIN OF BLOCK THREE WITH FRAME TITLE TEXT-030.
SELECTION-SCREEN COMMENT /5(70) TEXT-040.
SELECTION-SCREEN COMMENT /5(70) TEXT-050.
SELECTION-SCREEN END OF BLOCK THREE.
MOVE UNAME TO SY-UNAME.
* Including SAP R/3 BDC customized include
INCLUDE ZSIN0001.
* Verifying the path & file name
AT SELECTION-SCREEN ON FILE.
PERFORM RESOURCE_FILE_OPEN.
* Processing BDC
START-OF-SELECTION.
PERFORM SESSION_OPEN.
PERFORM SESSION_GENERATION.
PERFORM SESSION_CLOSE.
CLOSE DATASET FILE.
* Printing execution report
END-OF-SELECTION.
SKIP.
WRITE /15 'BDC & SYSTEM PARAMETERS -' COLOR 3.
SKIP.
WRITE: /15 'Resource path & filename ..........', FILE,
/15 'Session name ......................', SESSION,
/15 'ABAP/4 Program name ...............', SY-REPID,
/15 'Client ............................', SY-MANDT,
/15 'SAP System ID .....................', SY-SYSID,
/15 'SAP Release .......................', SY-SAPRL,
/15 'Host ..............................', SY-HOST,
/15 'Operating system ..................', SY-OPSYS,
/15 'Database system ...................', SY-DBSYS,
/15 'User ID ...........................', SY-UNAME,
/15 'Date ..............................', SY-DATUM,
/15 'Time ..............................', SY-UZEIT.
SKIP 3.
WRITE /15 'DATA CONVERSION DEFAULT PARAMETERS -' COLOR 3.
SKIP.
WRITE: /15 'Start at previous month ............', MONTH.
SKIP 3.
WRITE /15 'EXECUTION REPORT -' COLOR 3.
SKIP.
WRITE: /15 'Total records read form file ......', RECORD_READ,
/15 'Total records insert to BDC .......', RECORD_INSERT,
/15 'Total records omitted .............', RECORD_OMIT.
NEW-PAGE.
SORT.
LOOP.
ADD 1 TO NUMBER.
IF INTENSIFIED_FLAG EQ ON.
FORMAT COLOR 2 INTENSIFIED ON.
MOVE OFF TO INTENSIFIED_FLAG.
ELSE.
FORMAT COLOR 2 INTENSIFIED OFF.
MOVE ON TO INTENSIFIED_FLAG.
ENDIF.
WRITE: /1 NUMBER, MATERIAL_NUMBER, PLANT, REMARKS.
POSITION SY-LINSZ.
WRITE ' '.
ENDLOOP.
* Reading resource file and generating BDC session
FORM SESSION_GENERATION.
DO.
READ DATASET FILE INTO RECORD.
IF SY-SUBRC NE 0 OR RECORD IS INITIAL.
EXIT.
ENDIF.
ADD 1 TO RECORD_READ.
PERFORM RECORD_CONDENSATION.
PERFORM RECORD_VERIFICATION.
CHECK RECORD_FLAG EQ VALID.
REFRESH BDCDATA.
PERFORM SCREEN_SEQUENCE.
PERFORM BDC_TRANSACTION USING 'MM02'.
IF SY-SUBRC EQ 0 .
ADD 1 TO RECORD_INSERT.
ELSE.
ADD 1 TO RECORD_OMIT.
ENDIF.
ENDDO.
ENDFORM. "SESSION_GENERATION
* Condensing the record fields
FORM RECORD_CONDENSATION.
CONDENSE: RECORD-MATERIAL_NUMBER,
RECORD-PLANT,
RECORD-CORRECTED_VALUE_19,
RECORD-CORRECTED_VALUE_18,
RECORD-CORRECTED_VALUE_17,
RECORD-CORRECTED_VALUE_16,
RECORD-CORRECTED_VALUE_15,
RECORD-CORRECTED_VALUE_14,
RECORD-CORRECTED_VALUE_13,
RECORD-CORRECTED_VALUE_12,
RECORD-CORRECTED_VALUE_11,
RECORD-CORRECTED_VALUE_10,
RECORD-CORRECTED_VALUE_09,
RECORD-CORRECTED_VALUE_08,
RECORD-CORRECTED_VALUE_07,
RECORD-CORRECTED_VALUE_06,
RECORD-CORRECTED_VALUE_05,
RECORD-CORRECTED_VALUE_04,
RECORD-CORRECTED_VALUE_03,
RECORD-CORRECTED_VALUE_02,
RECORD-CORRECTED_VALUE_01.
ENDFORM. "RECORD_CONDENSATION
* Verifying record fields
FORM RECORD_VERIFICATION.
MOVE VALID TO RECORD_FLAG.
UNPACK RECORD-MATERIAL_NUMBER TO MATERIAL_NUMBER.
SELECT SINGLE * FROM MARA
WHERE MATNR EQ MATERIAL_NUMBER.
IF SY-SUBRC NE 0.
ADD 1 TO RECORD_OMIT.
MOVE: RECORD-PLANT TO PLANT,
TEXT-060 TO REMARKS,
INVALID TO RECORD_FLAG.
EXTRACT HEADER.
EXIT.
ELSE.
IF MARA-NTGEW > MARA-BRGEW. "add to check for net weight > grow
MOVE '1' TO FLAG.
ELSE.
MOVE ' ' TO FLAG.
ENDIF.
ENDIF.
MOVE RECORD-PLANT TO PLANT.
SELECT SINGLE MATNR WERKS INTO (PLANT, MATERIAL_NUMBER)
FROM ('MARC')
WHERE MATNR EQ MATERIAL_NUMBER
AND WERKS EQ PLANT.
IF SY-SUBRC NE 0.
ADD 1 TO RECORD_OMIT.
MOVE: TEXT-070 TO REMARKS,
INVALID TO RECORD_FLAG.
EXTRACT HEADER.
ENDIF.
ENDFORM. "RECORD_VERIFICATION
* Performing the screen sequence
FORM SCREEN_SEQUENCE.
PERFORM SCREEN_SAPLMGMM_0060.
PERFORM SCREEN_SAPLMGMM_0070.
PERFORM SCREEN_SAPLMGMM_3005.
PERFORM SCREEN_SAPLMGMM_0081.
PERFORM SCREEN_SAPLMGMM_3006.
PERFORM SCREEN_SAPLMGMM_3110.
ENDFORM. "SCREEN_SEQUENCE
* Change Material: Initial Screen
FORM SCREEN_SAPLMGMM_0060.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '0060'.
PERFORM BDC_FIELD USING 'RMMG1-MATNR' RECORD-MATERIAL_NUMBER.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '/5'. " Select view(s)
ENDFORM. "SCREEN_SAPLMGMM_0060
* Select view(s)
FORM SCREEN_SAPLMGMM_0070.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '0070'.
PERFORM BDC_FIELD USING 'MSICHTAUSW-KZSEL(01)' 'X'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '/0'. " Enter
ENDFORM. "SCREEN_SAPLMGMM_0070
* Change Material: Basic data
FORM SCREEN_SAPLMGMM_3005.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '3005'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' 'SP08'. " MRP 1
IF FLAG EQ '1'.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '3005'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '/0'.
ENDIF.
ENDFORM. "SCREEN_SAPLMGMM_3005
* Organizational levels
FORM SCREEN_SAPLMGMM_0081.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '0081'.
PERFORM BDC_FIELD USING 'RMMG1-WERKS' RECORD-PLANT.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '=ENTR'. "Continue
ENDFORM. "SCREEN_SAPLMGMM_0081
* Change Material: MRP 1
FORM SCREEN_SAPLMGMM_3006.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '3006'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' 'ZU11'. " Consumption
ENDFORM. "SCREEN_SAPLMGMM_3006
* Change Material: Consumption
FORM SCREEN_SAPLMGMM_3110.
CONSTANTS: PREVIOUS_MONTH VALUE 'X',
THIS_MONTH VALUE ' '.
DATA: ROW_POSITION(2) TYPE N VALUE 0,
WS_POSITION(2) TYPE C,
FIELDNAME LIKE BDCDATA-FNAM,
CONSUMPTION_QUANTITY LIKE RECORD-CORRECTED_VALUE_01.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '3110'.
* if month eq previous_month.
* move 1 to row_position.
* elseif month eq this_month.
* move 0 to row_position.
* endif.
MOVE MONTH TO ROW_POSITION.
DO 19 TIMES VARYING CONSUMPTION_QUANTITY
FROM RECORD-CORRECTED_VALUE_01
NEXT RECORD-CORRECTED_VALUE_02.
IF ROW_POSITION GT 11.
MOVE 1 TO ROW_POSITION.
PERFORM BDC_FIELD USING 'BDC_OKCODE' 'VWNP'. " Page down
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '3110'.
ENDIF.
UNPACK ROW_POSITION TO WS_POSITION.
CONCATENATE 'RM03M-VBWRT(' WS_POSITION ')' INTO FIELDNAME.
IF CONSUMPTION_QUANTITY+0(1) EQ '-'.
SHIFT CONSUMPTION_QUANTITY LEFT BY 1 PLACES.
CONCATENATE CONSUMPTION_QUANTITY '-' INTO CONSUMPTION_QUANTITY.
ENDIF.
PERFORM BDC_FIELD USING FIELDNAME CONSUMPTION_QUANTITY.
ADD 1 TO ROW_POSITION.
ENDDO.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '3110'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '/11'. " Save
ENDFORM. "SCREEN_SAPLMGMM_3110
Include Program
* BDC data table and record structure defination
DATA BDCDATA LIKE BDCDATA OCCURS 0 WITH HEADER LINE.
* Opening a resource file
FORM RESOURCE_FILE_OPEN.
DATA ERROR_MESSAGE(40).
*Begin of changes Mod01
* OPEN DATASET FILE FOR INPUT IN TEXT MODE MESSAGE ERROR_MESSAGE.
OPEN DATASET FILE FOR INPUT IN TEXT MODE ENCODING DEFAULT MESSAGE
ERROR_MESSAGE.
*End of changes Mod01
IF SY-SUBRC NE 0.
MESSAGE E000 WITH FILE ERROR_MESSAGE.
ENDIF.
ENDFORM.
* Opening of BDC session
FORM SESSION_OPEN.
CALL FUNCTION 'BDC_OPEN_GROUP'
EXPORTING CLIENT = SY-MANDT
DEST = SY-HOST
GROUP = SESSION
USER = SY-UNAME
KEEP = 'X'
EXCEPTIONS CLIENT_INVALID = 01
DESTINATION_INVALID = 02
GROUP_INVALID = 03
HOLDDATE_INVALID = 04
INTERNAL_ERROR = 05
QUEUE_ERROR = 06
RUNNING = 07
USER_INVALID = 08.
CASE SY-SUBRC.
WHEN 01. MESSAGE E001 WITH SY-MANDT.
WHEN 02. MESSAGE E002.
WHEN 03. MESSAGE E003.
WHEN 04. MESSAGE E004.
WHEN 05. MESSAGE E005.
WHEN 06. MESSAGE E006.
WHEN 07. MESSAGE E007.
WHEN 08. MESSAGE E007.
ENDCASE.
ENDFORM.
* Closing BDC session
FORM SESSION_CLOSE.
CALL FUNCTION 'BDC_CLOSE_GROUP'
EXCEPTIONS NOT_OPEN = 01
QUEUE_ERROR = 02.
CASE SY-SUBRC.
WHEN 01. MESSAGE E009.
WHEN 02. MESSAGE E010.
ENDCASE.
ENDFORM.
* Inserting data into BDC
FORM BDC_TRANSACTION USING TRANSACTION_CODE.
CALL FUNCTION 'BDC_INSERT'
EXPORTING TCODE = TRANSACTION_CODE
TABLES DYNPROTAB = BDCDATA
EXCEPTIONS INTERNAL_ERROR = 1
NOT_OPEN = 2
QUEUE_ERROR = 3
TCODE_INVALID = 4
OTHERS = 5.
ENDFORM.
* Insert program name & screen number
FORM BDC_DYNPRO USING PROGRAM DYNPRO.
CLEAR BDCDATA.
MOVE: PROGRAM TO BDCDATA-PROGRAM,
DYNPRO TO BDCDATA-DYNPRO,
'X' TO BDCDATA-DYNBEGIN.
APPEND BDCDATA.
ENDFORM.
* Inserting field name/BDC_OKCODE/BDC_CUESOR and value
FORM BDC_FIELD USING FNAM FVAL.
CLEAR BDCDATA.
MOVE: FNAM TO BDCDATA-FNAM,
FVAL TO BDCDATA-FVAL.
APPEND BDCDATA.
ENDFORM.i have changed the selection screen as follows
SELECTION-SCREEN BEGIN OF BLOCK one WITH FRAME TITLE text-010.
* "1)
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS p_unix RADIOBUTTON GROUP rad1 . "
SELECTION-SCREEN COMMENT 5(26) text-008.
SELECTION-SCREEN POSITION 33. "
PARAMETERS: file(128) TYPE c
DEFAULT '/export/remote/data.txt' LOWER CASE.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS p_xls RADIOBUTTON GROUP rad1 . "excel file
SELECTION-SCREEN COMMENT 5(26) text-009.
SELECTION-SCREEN POSITION 33. "
PARAMETERS: filf(128).
SELECTION-SCREEN END OF LINE.
*>>
*PARAMETERS: file(128) TYPE c
* DEFAULT '/export/remote/data.txt' LOWER CASE OBLIGATORY,
PARAMETERS: session LIKE rl04i-mappe OBLIGATORY
DEFAULT '8301_MM02',
uname LIKE sy-uname DEFAULT sy-uname.
SELECTION-SCREEN END OF BLOCK one.
* Data conversion parameters
SELECTION-SCREEN BEGIN OF BLOCK two WITH FRAME TITLE text-020.
PARAMETERS month(2) TYPE n DEFAULT 1.
SELECTION-SCREEN END OF BLOCK two.
* Notes to user
SELECTION-SCREEN BEGIN OF BLOCK three WITH FRAME TITLE text-030.
SELECTION-SCREEN COMMENT /5(70) text-040.
SELECTION-SCREEN COMMENT /5(70) text-050.
SELECTION-SCREEN END OF BLOCK three. -
Logic needed - pls help me urgent
Hi
p_werks , p_vstel, s_vbeln are my selection screen.
I want to extract following fields into one internal table.
How to extract the fields using inner join or outer join?
LIKP --- vkorg,vstel, kunag, lfdat,wadat,lifnr
LIPS --- vbeln,posnr,werks,matnr,lfimg,meins,
VBKD --- bstkd, posex_e (vbkd -vbeln = lips-vgbel)
sydatum, ernam,rundate, runtime.
Pls help mehi,
Select vkorg vstel kunag lfdat wadat lifnr from likp into table t_likp where
Vbeln = p_vbeln and werks = p_werks.
If not t_likp [] is initial.
Select vbeln posnr werks matnr lfimg meins into table t_lips fronm lips for all entries in table t_likp where vbeln = t_likp-vbeln.
Endif.
If not t_lips [] not initial.
Select bstkd posex_e into table t_vbkd from vbkd for all entries in t_lips where vgbel = t_lips-vbeln.
Endif.
check with this code.
Regards,
Narasimha
Edited by: narasimha marella on Jun 11, 2008 6:14 AM
Edited by: narasimha marella on Jun 11, 2008 6:18 AM -
Why does logic need to be "warmed up"?
Whenever I start logic pro 7.1.1 and load up my most recent song, I always have to go through a series of core overloads. Most of my softsynths ( I typically use around 25 ) are EXS24 samples, and it seems as though whenever I load up an instrument I have a huge spike in CPU when a new note is played for the first time, and then it plays fine after that. The problem is when I load up a song and press play, I have to go through an annoying and tedious series of core overloads every time a new note is played until logic cashes all of the notes and I can actualy get to work. Is there any settings that I should change so logic will play the song the first time?
My core audio settings
256mb buffer
larger disk buffer
medium process buffer range
power book g4 1.5ghz 512mb ram logic 7.1.1 pro512mb ram
That's problem #1
larger disk buffer
Not a good idea, in view of your low RAM.
Are you using an external drive for your projects?
Having said that, I know this has been mentioned here before, so you might want to search for EXS24+missing notes. I think it was iSchwartz that had a theory about this - but I know that even with plenty of memory it seems that Logic needs its pump primed sometimes. -
Things that Logic needs to be #1!!!!
I think Logic needs to do some work on the waveform edit.
More like Pro Tools.
Right now, the main thing i miss is not to be able to quantize an Apple Loop. I mean, some parts of the loop that are offbeat are impossible to quantize.
Message was edited by: Bob AntisYes,i mean the blue apple loops.
I wouldn't even mind if i could tweak the normal aiff loops like Ableton Live or Pro Tools, to be able to quantize by yourself with precision!
I think Apple should include that in their next update, it's so important for waveform editing. My self, i edit a loop in Pro Tools,then export it and work it in Logic, it's so frustrating!!! -
Hi All
following is my code. It_bseg table have the following records
Bukrs Blart Aufnr hkont amount
010 |0001801059| |0000461100|10-DE-080006| 31325.57|
010 |0001801059| |0000461100|10-DE-080007| 31325.57
010 |0001801059| |0000461100|10-DE-080008| 31325.58
010 |0001801063| |0000461100|10-ML-080010| 282.24
010 |0004011697| |0000461100|10-MC-082000| 10000.00
I need all the records
But i got the following records only
Bukrs Blart Aufnr hkont amount
010 |0001801059| |0000461100|10-DE-080006| 31325.57|
010 |0001801063| |0000461100|10-ML-080010| 282.24
010 |0004011697| |0000461100|10-MC-082000| 10000.00
Pls help me.
FORM get_data.
Extract Data from BKPF table
SELECT bukrs budat gjahr belnr monat blart waers
INTO TABLE it_bkpf
FROM bkpf
WHERE bukrs = p_bukrs
AND blart IN s_blart
AND budat IN s_budat.
SORT it_bkpf by belnr ascending.
IF NOT it_bkpf[] IS INITIAL.
Extract Data from BSEG table
SELECT bukrs belnr werks hkont aufnr dmbtr sgtxt
INTO TABLE it_bseg
FROM bseg
FOR ALL ENTRIES IN it_bkpf
WHERE belnr = it_bkpf-belnr
AND GJAHR = it_bkpf-gjahr
AND valut = it_bkpf-budat
AND bukrs = p_bukrs
AND werks = p_werks
AND hkont IN s_hkont
AND aufnr IN s_aufnr.
AND shkzg = 'H'.
ENDIF.
SORT it_bseg by belnr ascending.
DELETE ADJACENT DUPLICATES FROM it_bseg.
LOOP AT it_bkpf.
READ TABLE it_bseg WITH KEY
belnr = it_bkpf-belnr BINARY SEARCH.
IF sy-subrc = 0.
it_detail-budat = it_bkpf-budat.
it_detail-period = it_bkpf-budat+0(6).
it_detail-hkont = it_bseg-hkont.
it_detail-aufnr = it_bseg-aufnr.
it_detail-sgtxt = it_bseg-sgtxt.
it_detail-blart = it_bkpf-blart.
it_detail-dmbtr = it_bseg-dmbtr.
it_detail-waers = it_bkpf-waers.
APPEND it_detail.
CLEAR it_detail.
ENDIF.
ENDLOOP.Hello Kumar-
Code below.
FORM get_data.
Extract Data from BKPF table
SELECT bukrs budat gjahr belnr monat blart waers
INTO TABLE it_bkpf
FROM bkpf
WHERE bukrs = p_bukrs
AND blart IN s_blart
AND budat IN s_budat.
*SORT it_bkpf by belnr.
IF NOT it_bkpf[] IS INITIAL.
Extract Data from BSEG table
SELECT bukrs belnr werks hkont aufnr dmbtr sgtxt
INTO TABLE it_bseg
FROM bseg
FOR ALL ENTRIES IN it_bkpf
WHERE belnr = it_bkpf-belnr
AND GJAHR = it_bkpf-gjahr
AND valut = it_bkpf-budat
AND bukrs = p_bukrs not required
AND werks = p_werks
AND hkont IN s_hkont
AND aufnr IN s_aufnr.
AND shkzg = 'H'.
ENDIF.
SORT it_bseg by belnr .
DELETE ADJACENT DUPLICATES FROM it_bseg. not required
***Changes done by srini
loop at it_bseg into wa_bseg.
collect wa_bseg into it_final.
endloop.
Cheers,
~Srini.. -
Hi all,
I have a requirement regarding data processing in a internal table,
internal table consists of filelds Vendor,Material and Scheduling Dates and Total Qty.
Here i need to fill the field Total Quantity, individual addition of quanties of that material for a particular vendor .
Let us consider intitially my internal table consists of data like this with these fields.
Vendor , Material , qty(individual), Total qty , Schedule dates
v1 , m1 , 10
v1 , m1 , 10
v1 , m1 , 20
v1 , m2 , 5
v1 , m2 , 10
v2 , m2 , 20
v2 , m2 , 15
v2 , m3 , 20
v2 , m3 , 10
Initiall the total qty field is empty i need to fill tht field for the last item for a particular material Like M1
for vendor v1 and total qty of m2 for vendor v1, total qty of m1 for v2, total qty of m2 for v2 and so on.
Requied output should be like this.
Vendor , Material , qty(individual) Total qty Schedule dates
v1 , m1 , 10 , 0
v1 , m1 , 10 , 0
v1 , m1 , 20 , 40(101020)
v1 , m2 , 5 , 0
v1 , m2 , 10 , 15(5+10)
v2 , m2 , 20 , 0
v2 , m2 , 15 , 35(20+15)
v2 , m3 , 20 , 0
v2 , m3 , 10 , 30(20+10)
Here i made one thing , i calculated the total qty of material for particular vendor.
Like
Vendor Material Total Qty
v1 , m1 , 40
v1 , m2 , 15
v2 , m2 , 35
v2 , m3 , 30
Finally i need the logic by using Control Events(At New , At End of ) to adjust that total qty of a material for a particular vendor by Modifying the internal table.
i hope my problem is clear , pls let me know if any clarifications needed. and
code for the same .
Thannks in advance,
Niranjan.Hi,
Solution is here.
sort itab by vendor material.
field-symbols: <itab> like line of itab.
loop at itab assigning <itab>.
on change of vendor.
clear flag.
endon.
add <itab>-quanity to lw_quantiy.
*--here pdate internal table end of each similar kind of record
at end of.
flag = 'x'.
<itab>-totalqty = lw_quantiy.
clear lw_quantiy
endat.
*--rest of record update zero by checking flag
if flag is initial.
<itab>-totalqty = 0.
endif.
endloop.
close this thread if you got solution.
Regards,
Peranandam -
Hi all
i have a table with columns
SUN MON TUE WED THU FRI SAT
Y................ ........Y..................
i need to selected the column SUN which is Sunday,
along with this i need to select the columns MON,TUE
THU is having value so i don't needed that
if i select WED then i needed THU, FRI, SAT also
can u pls help on this.
Edited by: 881121 on Apr 5, 2013 11:13 PMuser648773 wrote:
You need to return the name of days? or you need to return the values of the colum?
You have onley two cases? or could be more? could you describe the logic in general?
one query always return the same number of colums. So, in your case you should return one column and concatenate the values as you need.
here is an example with concatenate, and return the correspondig values:
select out
from
select case
when SUN = 'Y' THEN SUN||MON||TUE
WHEN WED = 'Y' THEN WED||THU||FRI
END out
from table
here is an example that return the name of days:
select out
from
select case
when SUN = 'Y' THEN 'SUN,MON,TUE'
WHEN WED = 'Y' THEN 'WED, THU, FRI'
END out
from table
May be you could do these things to describe us what you need:
- make a desc of you table to know the structure.
- describe each case with an imput and it corresponding outpu.Maybe everything would be easy if you would post:
1) CREATE TABLE and INSERT statement
2) Expected output.
You question is vague and not clear. Please read SQL and PL/SQL FAQ
This will avoid people here trying to guess what you are trying to say.
Also keep in mind: when you put some code or output please enclose it between two lines starting with {noformat}{noformat}
i.e.:
{noformat}{noformat}
SELECT ...
{noformat}{noformat}
Regards.
Al
Edited by: Alberto Faenza on Apr 8, 2013 2:09 PM -
Urgent help needed pls regarding LOGO
hello friends this is sudhakar . i really need help
pls urgent
i wrote scjp 5.0 certification in august and cleared succesfully
i got all certificates but for logo i have to send the mail which cost me around 620/- rupess to them. but,
can u any one tell how can v say to sun pupil tat i got all my cetificaties and i need the logo for my resume
i heard we can do with online in www.sun.com only so can u help me out pls it is urgent.....http://www.sun.com/training/certification/faq/index.html#logos
This part should be relevant to you -
All customers that reside outside US and Canada: Once you have successfully passed one of our Java platform exams, a certification kit will be mailed to you that includes a Sun Logo Agreement. Please sign the agreement and mail it back to the address supplied. Depending from which country you mail the agreement, it may take up to month for you to receive the logo. We are currently working to provide an online logo for our International customers.
This means you send the mail to them or wait for them to go online (which might mean months). -
Fail safe logic needed for purchase order upload program
Hello all,
i am working on creating PO's by reading data from a text file. I need to implement fail safe logic in it, which is to make sure this program uploads all the records in the text file successfully. For example, i have 1000 records in my text file and while running the upload program if the program times out while creating the 500th PO or if SAP is down at that time, then we have 499 PO's created and 501 yet to be created. But if we run the same program again, we will generate duplicate PO's for 499 again. I want to avoid this kind of problem.
How do i implement this idea?
Kindly guide me on this.
Thanks.Ok ..
Then I would suggest you use Application Log to keep the success and error messages of PO processing.
You can check trsnaction SLG0 and create your own application log object.
Then you need to use FMs BAL_LOG_* to crate and add messages to it.
This way you will have a facility to check as which of your records are converted to PO for a run.
In case SAP gets down in between , still you can find the details using Xn SLG1 and then accordingly remove the records from your file which are already converted to PO.
Thanks,
Ram -
Logic needed to print blank line in alv report
hi experts,
can anyone please tell me the logic for this
i want to logic one is
1) in alv report contains
a set of data contains 100 (5 datas)
and a set of data contain 200(5 datas)
i want to have one coloum containing serial no
ex for 100 i want to move no '5' to one coloumn ,but it should display only ones not for all 5 records.
same for 200 also i want to move 7 to this ,it should b displayed ones
i used for at new command alos its not working
2)suppose for particular date, 200 related records is not there
it should conatin blank line,displaying 'NIL'.
SO THE OPT FROMAT MUST BE
MATNR DOCNO
100 1000
100 1000
100 "
100 "
100 "
200 2000
200 "
200 "
200 "
200 "
SUPPOSE 200 RECORD IS NOT THERE THE OPT SHLD B
100 1000
100 1000
200 NILArun,
1)
If you are using the function module REUSE_ALV_GRID_DISPLAY, then use the internal table it_sort with a row for the column where you want the suppression of repeated values.
2)
If you are using the function module REUSE_ALV_GRID_DISPLAY, then simply ensure that your internal table t_outtab has the rows that you need containing 'NIL'.
John -
Logic needed in selection screen
hi experts,
in a selection screen i have one field S_budat ( it contains the range ) the user enters the date in it .the problum is we need to check the following condition .
if sy-datum> s_budat+13 months if it is ok we need get the values from the archive db else r/3 data .but in the mean while we have to check residency limit ( for ex: the data is archived till 22-03-2007. but in the selection screen the user entered the range 20-2-2006 to 24-5-2007 this falls in the both .so for this how to write the logic .till 22-03-2007 we have to take the data from the archive DB after thatwe have to take online data )
points will be reworded.You can check whether the Achive date lies between the range.
If it does, then create 2 records in the select-option table
1) from s_budat-low to arcive date
2) from archive date to s_budat-high.
Now you can do 2 selects 1 on archived tables , other on R/3 data using these 2 date ranges.
For the 2nd select , you can use the "appending" addition in the select statement -
Soundtrack Pro making a LOT of files - used to working in Logic, need help
So I'm used to working with Logic Studio/7.2/etc, and it's my first foray into working with Soundtrack Pro at work. My questions are this: When I use the razorblade tool (since I can't find an equivalent to the split tool in logic) in soundtrack to cut up a sequence, it seems to be creating a LOT of extra files:
http://www.1217design.com/pics/stp_question.png is an example of what I mean. Is this supposed to happen? The recorded files themselves were done in FCP and sent to Soundtrack Pro via the Send to STP Multitrack session function.
What I'm trying to find out is: Is this supposed to be happening? How can I stop this from happening? Are all of these extra files necessary in order to export the final project? And what will happen if I delete them?
I just want to know because the folder is now 4.71gb for a 30 second audio file (the final aif export is roughly 30mb), and there's over 200 of these extra files that have been created in the process of working on this project.
If this is what is necessary to work in Final Cut then I won't be able to work with FCP due to size issues (which is a shame as I feel so much more comfortable working within that environment than I do working in FCP).
Thanks for the help in advance,
SeanSean A wrote:
By doing this, will it still create all of those extra files? That's what I'm trying to figure out. Is it just from the blade tool being used?
For all edits, yeah, baby, STP will generate more files than cows create methane.
First, I know what works for me, but I'm still learning, so I strongly encourage you to keep a COMPLETE BACKUP of all projects until you know your workflow. Also, you may have Preferences set up differently than I do, so you may not find the same paths as what I describe here.
When you have an audio file the way you want it, and you're confident that you won't need those edit files again (be SURE) Process > Flatten All Actions (or Audible Actions) and Save that audio file. Then -- as I understand it so far -- you can safely trash all the edits related to that file. (If you use Photoshop or similar visual programs, it's the same idea.)
During my first few weeks of intensive STP work, my drive grew more and more sluggish, for no reasons known to me. I saw disk space shrinking rapidly. Finally I figured it had to have something to do with STP, so I started searching and eventually I found my edits piling up in home/Documents/Soundtrack Pro Documents, especially (for me) in Edited Media. Since they all came from projects I'd finished and exported to AAC and MP3, I was comfortable trashing them all. Suddenly, whoa, I had an extra 12 GB of disk space available.
Just keep those edit files until you are CERTAIN that you know what you're doing and that you're DONE. Otherwise, when some project needs one precious little 3MB turn of a phrase, you may find yourself confronting suicidal or homicidal tendencies.
I welcome further clarification and/or correction from people who know more and can explain it better.
Best,
chuck -
Hi Experts
I am having a list of TAXCODES like.
"CA" "CC" "CD" "DA" "DE" "WS"
Now in purchase orders if i am having different line items having the above TAX CODES.
i need to pass a variable &XXX& which is having text to sap script form.
And if the Purchase order having line items which is having one of the taxcode above for one line item and the other line item having diifferent taxcode like V0 etc { for these case i dont need to send text data }
and if the PO having one tax code for all line items.{ i need to send the data }
how to achive this
i am trying in this way
SELECT ebeln
ebelp
mwskz "Tax code
FROM ekpo
INTO TABLE lt_ekpo
WHERE ebeln = v_ebeln
AND mwskz in r_mwskz
AND loekz = ''.
DESCRIBE TABLE lt_ekpo LINES lv_count.
lt_ekpo1[] = lt_ekpo[].
SORT lt_ekpo1 BY ebelp DESCENDING.
READ TABLE lt_ekpo1 INTO wa_ekpo INDEX 1.
v_ebelp1 = wa_ekpo-ebelp.
CLEAR wa_ekpo.
LOOP AT lt_ekpo INTO wa_ekpo.
IF sy-tabix = 1.
lv_taxcode = wa_ekpo-mwskz.
ELSE.
IF lv_taxcode NE wa_ekpo-mwskz.
lv_diff_tax = 'X'.
if lv_taxcode EQ 'CA' or lv_taxcode EQ 'CC' or lv_taxcode EQ 'CD' OR lv_taxcode EQ 'DA' OR lv_taxcode EQ 'DE' or lv_taxcode EQ 'WS'.
ELSE.
ENDIF.
ENDIF.
please provide the logic for the above case.
Edited by: suribabu124 on Apr 26, 2010 4:13 PMhi
this can be done using rages
Regards
Suresh -
Hi Friends,
I need logic (code for the following requirement.
1. Bank guarantees received are entered by F-57 transaction as a noted item in system and the following data will be captured in the respective field.
Document date: Bank Guarantee date
Posting date: Date of entry
Reference field: BG Number
Document header text: Bank guarantee type
Assignment: Bank name
Special G/L Assignment: Bank account number
Text: Bank address
Due date: Claim end date
2. Posting keys (BSEG-BSCHL) 39 & 29 are used in F-57 transaction with special G/L Indicator (BSEG-UMSKZ) at time of Entering statistical postings and Reversal respectively
3. Cross check the period of validity of bank guarantee by comparing the due date (BSEG-ZFBDT) at the time of entering statistical postings and Document date (BKPF-BLDAT) at the time of Reversal.
4. If the bank guarantee cancels or reversed before due date (BSEG-ZFBDT) cancellation date i.e. Document date of reversal is to be populated in the report and in other case the due date is to be populated in the report.
Selection screen has the fields
BKPF-BUKRS Mandatory
LFA1/BSEG-LIFNR Optional
BSEG-ZFBDT Optional
BKPF-BLADT Optional
The o/p structure has the following fields
BKPF-XBLNR BG NO(Reference)
BSEG-LIFNR Vendor code
LFA1-NAME1 Vendor Name
BKPF-BLDAT Start date(Document date)
BSEG-ZFBDT End date(Due date)
BSEG-WRBTR Amount
BKPF-WAERS Currency
BSEG-ZUONR Bank Name(Assignment)
BSEG-SGTXT Bank Address
BSEG-HZUON Account Number
BKPF-BKTXT BG Type
BSEG-ZFBDT Claim end dateHi,
define internal table
It_bseg with fields BURKS, BELNR,GJAHR, BUZEI and other field (look the output fields).
it_bkpf with fields BURKS, BELNR,GJAHR anmd other required fields.
it_lfa1 with fields LIFNR and NAME1.
NOw
SELECT BURKS, BELNR,GJAHR ,<other required fileds>
into table it_bkpf from BKPF
where BUKRS in/= <selectionscreen-burks>
and bladt in/= <selectionscreen--bladt>.
If it_bkpf[] is not initial.
select BURKS, BELNR,GJAHR, BUZEI and other fields
into table it_bseg from bseg
for all entries in it_bkpf
where burks = it_bkpf-burks
and belnr = it_bkpf-belnr
and gjahr = it_bkpf-gjahr
and ZFBDT in/= <selection screen ZFBDT>
endif.
Now
select lifnr name1 from lfa1 into it_lfa1
where lifnr in <selection scfreen lifnr>.
YOu have three tables now..
you can loop at 1st table get the output fields put in into work area
read 2nd table relevant to first one and then read IT_LFA1 table with lifnr same as lifnr in BSEG and fill the final internal table.
Any doubts in retrieving please feel free to post your question
rewards if useful,
regards,
nazeer
Message was edited by:
'Nazeer'
Maybe you are looking for
-
Color management question on having separate profiles in one document
I have a document with images in it that have attached printer profiles with different separations, I'd like to print without further conversion of these images since they are profiled to be printed with no color management, how do I go about this? D
-
Inserting upside down question marks/Inverted Question marks into database
Hi All, When I am inserting any special character into database it is inserted as upside down question marks/Inverted Question marks. When I am trying to display the same string throgh the application the special characters are displaying as small sq
-
How can I calculate all members of a dimension except one?
I have an accounts dense dimension with one member that is a percentage, and as a result, should not be aggregated through other dimensions (product, client, country).I use CALC DIM command, and could clear afterwards the upper-blocks for that member
-
Hi, Any documentation about ALF (ABAP List format) ? Especially ALF specifications? Thanks
-
Cannot find where to download Gateway for SQL Server
I have searched OTN every which way to find the Oracle Transparent Gateway for SQL Server. I have checked my CD's and I have every one imaginable but not the one for SQL server. Why? Where is it hidden? I am trying to connect to a SQL Server 6.0 and