ABAP Code to BSP Conversion

Hi ,
I have Several Programs Created in
ABAP (with Associated TCodes)which i am calling in Portal Using SAP Transation iView.
Now i want to convert them in to BSP.
Instead of Rewriting the Code , Is there
any Tool , Program ,TCode available
which will Convert the Existing Code
to BSP ?
i am on NW2004s ECC6 .
Regards
Rajendra

NO, there is no such tool.
if you dont worry about the look and feel and you want HTML view in portal for SAP Transation iView use SAPGUI for HTML option instead of WIGUI while creating the iview.
Raja

Similar Messages

Calling ABAP Code From BSP

Hello all,
I dont have much idea of BSP ans would like to have some inputs from you all.
I would like to know that can I call ABAP transaction from BSP page ?
I have got a set of column entries just as an ALV column on my BSP page and I would like to provide hotspot or double click functionality so that for each of the entries in the table , the BSP page navigates to ABAP tcode and back to BSP page.Is this functionality possible?
any help would highly be appreciated.
Regards
Amruta

Hi Amruta ,
You can't call an R/3 transaction directly from BSP.
But you can achieve all the functionalities it does .
for ex ..if an r/3 transaction is a report , u hav to code in BSP editor .u can call function modules from BSP .
But one thing u hav to concern is ,,in BSP Apllication logic is seperatd from Business logic .
U hav to move all your results into an itab / params and display that inside HTML tables .
Start ur journey from here .......
http://help.sap.com/saphelp_erp2004/helpdata/en/e6/e23fd8c47e11d4ad320000e83539c3/frameset.htm
All the best .
Regards,
J

SQL Command conversion in abap code

Hi,
I want to implement the UNION, INTERSECT and MINUS SQL commands in abap code. Please give me the appropriate solutions asap.
For Example:
select field1, field2, . field_n
from tables
UNION
select field1, field2, . field_n
from tables;
select field1, field2, . field_n
from tables
MINUS
select field1, field2, . field_n
from tables;
select field1, field2, . field_n
from tables
INTERSECT
select field1, field2, . field_n
from tables;
Thanks,
Ravi

Hi Ravi
Check out this procedure...
DATA: FRANKFURT(4) TYPE X,
 FRISCO(4) TYPE X,
 INTERSECT(4) TYPE X,
 UNION(4) TYPE X,
 BIT TYPE I.
DATA: CARRID TYPE SPFLI-CARRID,
 CARRIER LIKE SORTED TABLE OF CARRID
 WITH UNIQUE KEY TABLE LINE.
DATA WA TYPE SPFLI.
SELECT CARRID FROM SCARR INTO TABLE CARRIER.
SELECT CARRID CITYFROM FROM SPFLI
 INTO CORRESPONDING FIELDS OF WA.
WRITE: / WA-CARRID, WA-CITYFROM.
READ TABLE CARRIER FROM WA-CARRID TRANSPORTING NO FIELDS.
CASE WA-CITYFROM.
 WHEN 'FRANKFURT'.
 SET BIT SY-TABIX OF FRANKFURT.
 WHEN 'SAN FRANCISCO'.
 SET BIT SY-TABIX OF FRISCO.
ENDCASE.
ENDSELECT.
INTERSECT = FRANKFURT BIT-AND FRISCO.
UNION = FRANKFURT BIT-OR FRISCO.
SKIP.
WRITE 'Airlines flying from Frankfurt and San Francisco:'.
DO 32 TIMES.
GET BIT SY-INDEX OF INTERSECT INTO BIT.
 IF BIT = 1.
 READ TABLE CARRIER INDEX SY-INDEX INTO CARRID.
 WRITE CARRID.
 ENDIF.
ENDDO.
SKIP.
WRITE 'Airlines flying from Frankfurt or San Francisco:'.
DO 32 TIMES.
GET BIT SY-INDEX OF UNION INTO BIT.
 IF BIT = 1.
 READ TABLE CARRIER INDEX SY-INDEX INTO CARRID.
 WRITE CARRID.
 ENDIF.
ENDDO.
This produces the following output list:
The program uses four hexadecimal fields with length 4 - FRANKFURT, FRISCO, INTERSECT, and UNION. Each of these fields can represent a set of up to 32 elements. The basic set is the set of all airlines from database table SCARR. Each bit of the corresponding bit sequences representes one airline. To provide an index, the external index table CARRIER is created and filled with the airline codes from table SCARR. It is then possible to identify an airline using the internal index of table CARRIER.
In the SELECT loop for database table SPFLI, the corresponding bit for the airline is set either in the FRANKFURT field or the FRISCO field, depending on the departure city. The line number SY-TABIX is determined using a READ statement in which no fields are transported.
The intersection and union of FRANKFURT and FRISCO are constructed using the bit operations BIT-AND and BIT-OR.
The bits in INTERSECT and UNION are read one by one and evaluated in two DO loops. For each position in the fields with the value 1, a READ statement retrieves the airline code from the table CARRIER.
Comparing Bit Sequences
Use the following three operators to compare the bit sequence of the first operand with that of the second:
<operator>
Meaning
O
bits are one
Z
bits are zero
M
bits are mixed
The second operand must have type X. The comparison takes place over the length of the second operand. The first operand is not converted to type X.
The function of the operators is as follows:
O (bits are one)
The logical expression
<f> O <hex>
is true if the bit positions that are 1 in <hex>, are also 1 in <f>. In terms of set operations with bit sequences, this comparison is the same as finding out whether the set represented by <hex> is a subset of that represented by <f>.
Z (bits are zero)
The logical expression
<f> Z <hex>
is true if the bit positions that are 1 in <hex>, are 0 in <f>.
M (bits are mixed)
The logical expression
<f> M <hex>
is true if from the bit positions that are 1 in <hex>, at least one is 1 and one is 0 in <f>.
Caution: The following programs are no longer supported in Unicode systems:
REPORT demo_log_expr_bits .
DATA: text(1) TYPE c VALUE 'C',
 hex(1) TYPE x,
 i TYPE i.
hex = 0.
DO 256 TIMES.
i = hex.
IF text O hex.
 WRITE: / hex, i.
ENDIF.
hex = hex + 1.
ENDDO.
The output is as follows:
00 0
01 1
02 2
03 3
40 64
41 65
42 66
43 67
Here, the bit structure of the character 'C' is compared to all hexadecimal numbers HEX between '00' and 'FF' (255 in the decimal system), using the operator O. The decimal value of HEX is determined by using the automatic type conversion during the assignment of HEX to I. If the comparison is true, the hexadecimal number and its decimal value are displayed on the screen. The following table shows the bit sequences of the numbers:
Thanks
Ashok

Possi. for ABAP code instead of JAVA Script for creating searachhelp in BSP

Hi Consultants i have a doubt that is there a possibility to use ABAP coding in BSP object for creating search help
instead of JAVA Script if so please reply me with the procedure or else with some sample coding.

Hi Consultants i have a doubt that is there a possibility to use ABAP coding in BSP object for creating search help
instead of JAVA Script if so please reply me with the procedure or else with some sample coding.

How to delete cube old request by using abap code?

Dear experts,
Here is one thing need your help:
We have one cube need to delete the old request. This cube is loaded daily and only need to delete the request of that month.
I know there is one "Delete Overlap Requet" type in the process chain, but my concern is: in our DTP filter, different day the selection will have different values, let's say A and B, and A and B are not even overlap at all.
So my question is:
1. Can I still use "Delete Overlap Request" to delete the old request?
2. If so, I see it can be implemented by abap routine, can anyone give me some sample code? Like how to delete request only in this month. And how to delete request whose selection is equal to a specific value.
Note: one of the source cube is real time cube so can not delete the request from infopackage.
Any post will be appreciated and thank you all for your time in advance!
Regards.
Tim

Here is the intial code when I choose "Request Selection through Routine", please help me on how to choose the specific request and delete them in this routine.
program conversion_routine.
Type pools used by conversion program
Global code used by conversion rules
$$ begin of global - insert your declaration only below this line -
TABLES: ...
DATA:   ...
$$ end of global - insert your declaration only before this line   -
    InfoCube        = ZPC_DEL_REQ_ZBPS_C01
form compute_ZPC_DEL_REQ_ZBPS_C01
tables l_t_request_to_delete structure rsreqdelstruc
using l_request like rsreqdone-rnr
changing p_subrc like sy-subrc.
*Insert Source Code to decide if requests should be deleted.
*All Requests in table l_t_request_to_delete will be deleted
*from Infocube ZPC_DEL_REQ_ZBPS_C01.
*Add new requests if you want to delete more (from this cube).
*Remove requests you did not want to be deleted.
$$ begin of routine - insert your code only below this line        -
     loop at l_t_request_to_delete.
     endloop.
     clear p_subrc.
$$ end of routine - insert your code only before this line         -
endform.

ABAP code in update rules to convert the date

Hi,
Could any one send me the ABAP code that is written in the update rules to convert the date (DD/MM/YYYY -- lenght 10) to YYYYMMDD --- length 8 format.
Also please let me know where I should write this code; while creating update rules or while creating infosource.
Thanks,

Hi Bharath,
Hi Bharath,
I suggest you do the conversion of dates in the transfer rules. Here is the correct code you need:
* Assuming the source data field is called MYDATE
* Place the ff. in the routine in the transfer rules:
concatenate tran_structure-mydate+6(4) tran_structure-mydate+3(2) tran_structure-mydate(2) into result.
replace MYDATE with the name of the source field (10 chars) in the transfer structure. Hope this helps.

In ABAP, come from BSP or SAPGUI ?

Hi,
The question is when we are in ABAP code, is there a way to know if we came in from a BSP or from the SAP GUI ?
Thank you for your help in advance.

can you specify what is the requirement?
if you use same piece of program for both ur BSP and non-BSP apps then the BSP app can pass a parameter via URL which u can use to differentiate between and BSP or a ABAP call.

LSMW (ABAP Code Rule)

Hi All,
I have to upload data in transaction code MD61 (Planned Independent Requirement) for a year, that is, 12 months.
The requirement date and planned quantity have fields EDATU & PLNMG, respectively. If I'm going to input 12 months, the fields will become EDATU_01, EDATU_02... EDATU_12 and PLNMG_01 to PLNMG_12. However, the screen during background processing only has 10 rows, resulting to an incorrect session in SM35 with error: "Field RM60E-EDATU(11) does not exist in the screen SAPLM60E 0200".
Is there a way that I can use ABAP Code in LSMW's conversion rules for me to be able to upload 12 entries in MD61?
Thanks a lot in advance!
Best regards,
Olyn

Hi,
While recording did you come across the 11th and 12th row as well?
if not, once the recording is done try to insert those two in the recording list manually. And then in the field mapping try to map this with the 11th and 12th field you have in your structure.

How to insert abap code in LSMW generated program?

hi,
i m working on LSMW for loading data in SAP
i would like to insert abap code into the generated program....
it's because i have 1 BKPF segment (header data), 2 BSEG segments, but i cannot define rules by customizing for the second BSEG segment(LSMW doesn't permitt).
i already tried to insert code directly into the program, but obviously it disapears at each time i generate the program.
i saw that apparently a code insertion has already be made into this program and the subject of this insertion is to define rules for the second BSEG (exactly what i want to do....) and this modification doesn't disapear at new prog generation.....
Any idea ?

Hi
Why dont you use the FORM provided by LSMW
To use this please do the following
1.Goto option Maintain Field Mapping and Conversion Rules
2.Goto menu EXTRAS->LAYOUT->Form Routines
Here you will now get many options like
Global Data
Begin of Transaction
Begin of Processing
Begin of Record
like wise the End of these also.
Please put a breakpoint and check where you want to insert your code.
Note:
This is only for the Conversion Program and does not affect the main program used to update the Standard Tables
Hi , I was reading your earlier post .. It seems that you have worked on EMIGALL. Consider a similar situation, it is like writing the code in the events till CALL01...
Thanks
DOminic
Message was edited by: Dominic Pappaly

Call of BW queries from ABAP code

Has anybody information about how is it possible to call a BW query from ABAP code with parametrization (specifying characteristics) ? In our development project it's a crucial part, beacuse we have to provide interim function modules to carry out some conversion routine on BW provided data, before we put it on the screen embedded in a Visual composer Iview.

Have a look at this:
Calling BW queries programatically (also posted on BW forum)
Hope it helps.
Regards

How do I seperate code in BSP ?

Hi,
How do I seperate code in BSP ?
(I do not want to make classes or "external" FM.)
In abap I can use the form-statement.
form ShowConfirmedPO.
endform
//Martin

Hi Martin,
I am a little bit curious. Why you don't want to create any classes/FMs? Believe me if you want to write complex bsp applications which are easily maintainable, extendable and have a good testability you should always use MVC and MVC needs classes. You have all the cool tools available use them
And regarding your question I don't think there is another way to structure your code when you don't want to use classes.
regards
Thomas

ABAP Code Date Selection for InfoPackage Scheduler

Hello Group
I need to automate the selection of valid condition records for an extraction that have a From and To date range.
I noticed there is an option (Routine for time interval) to write ABAP code along with a template that is available in the InfoPackage.
I think the logic for the selection would be any record
Valid from <= today
Valid to >= today
Can anyone help with the ABAP code?
The template is as follows:
program conversion_routine.
Type pools used by conversion program
type-pools: rsarc, rsarr, rssm.
tables: rsldpsel.
Global code used by conversion rules
$$ begin of global - insert your declaration only below this line -
TABLES: ...
DATA: ...
$$ end of global - insert your declaration only before this line -
form compute_time_dependent_dates
changing p_datefrom type d
 p_dateto type d
 p_subrc like sy-subrc.
 Insert source code to current selection field
$$ begin of routine - insert your code only below this line -
 p_datefrom =
 p_dateto =
 p_subrc = 0.
$$ end of routine - insert your code only before this line -
endform.
Thank You for your help!!
Frank

I resolved the problem . I have changed the order of read table l_t_range because I need the header .
In the loop at datos I add the line l_t_range-iobjnm = 'ZXGE_UNO'.
The problem wasn't the call RFC it was that I built l_t_range bad. I need the infoObject name.
This is correct!!
READ TABLE L_T_RANGE WITH KEY
 FIELDNAME = '/BIC/ZXGE_UNO'.
LOOP AT DATOS.
 L_T_RANGE-FIELDNAME = '/BIC/ZXGE_UNO'.
 L_T_RANGE-IOBJNM = 'ZXGE_UNO'.
 L_T_RANGE-SIGN = 'I'.
 L_T_RANGE-OPTION = 'EQ'.
 CONCATENATE '00' DATOS-WA+3(4) INTO L_T_RANGE-LOW.
 APPEND L_T_RANGE.
 ENDLOOP.
*READ TABLE L_T_RANGE WITH KEY+
+*FIELDNAME = '/BIC/ZXGE_UNO'.+
+* L_IDX = SY-TABIX.+
+* MODIFY L_T_RANGE INDEX L_IDX
Thanks a lot
Ana

Setting value in cookie using ABAP code

Hai All,
Is it possible to set value in a cookie using ABAP code.
Regards,
H.K.Hayath Basha.

Hai Thomas Jung,
In Enterprise portal SAP has standard functionality to set inactivity timeout. We can set whatever time we want, say for example if we set the time as 15 minutes. If the user is not interacting with the system for 15 minutes then portal will logout the user automatically without any information.
Our user wants a popup to be shown that the system will be logged out due to inactivity.
Since Portal logout the user automatically without any information. I want to put in my own framework to handle inactivity timeout.
What idea I have is, when ever user interacts with any function in portal. I will set current time in a cookie. Someother application will read this cookie at regular interval, if the time difference between the cookie and system is 15, then I will force the user to logout by showing a popup screen.
In our portal we have three different type of application, they are, Java Webdynpro, ABAP-Webdynpro and BSP.
I think that from Java Webdynpro and BSP we can call a javascript to set value in a cookie, from ABAP-Webdynpro I don't know how to set a value in cookie.
This is my business requirement. Is there anyother solution to fullfill this business requirement.
Thanks & Regards,
H.K.Hayath Basha.
Let me tell the business requirement. Our user want to give a popup message when

Urgent!! How to call a custom transaction or an ABAP program in BSP?

Urgent!! How to call a custom transaction or an ABAP program in BSP?
We are pretty new on BSP. Would be very appreciated if any expert here give us the detailed steps on how to build up the application to just call a custom transaction (e.g., t-code: ztest) or an ABAP program. Would we have to create a button or event handler to do that? And the detailed steps?
Thanks in advance and we will definately give you reward points!

hi Durairaj,
During the time to wait for your answer, we copied Bernd's code from your last link, but when activating it, get the 1st error msg:
Field "CLIENT" is unknown. It is neither in one of the specified tables nor defined by a "DATA" statement. "DATA" statement."DATA" statement. The error shows up here:
<td>
<htmlb:inputField id = "client"
value = "<%= client %>" />
</td>
Then we added Client to the page attribute and define it as type String, then get another error:
The field "EVENT" is unknown, but there is a field with the similar name "EVENT_ID"."EVENT_ID". This error shows up at the beginning in the Event Handler:
OnInputProcessing:
code
event handler for checking and processing user input and
for defining navigation
event handler for data retrieval
event = cl_htmlb_manager=>get_event( runtime->server->request ).
IF event->name = 'button' AND event->event_type = 'click'.
button_event ?= event.
How to resolve this unknown Event error, need to define in Page Attribute tab? but with what type?
Actually we only want to run an ABAP4 program in BSP, the code is complicated, could you show us an easy way of doing this in BSP?

ABAP code to submit RFBIBL00 prog .

Can anyone help me with the ABAP code to submit RFBIBL00 prog .

Conversion program for RFBIBL00 to post financial Documents using *
TCode FB01
This program is getting only one line item for one transaction...Logic is
applied for reconcilialtion
reconciliation - to make balance zero *
REPORT zrfbib_conv .
DATA: BEGIN OF bgr00. "BI strucutre in RFBIBL00
 INCLUDE STRUCTURE bgr00.
DATA: END OF bgr00.
DATA: BEGIN OF bbkpf. " Header Structure in RFBIBL00
 INCLUDE STRUCTURE bbkpf.
DATA: END OF bbkpf.
DATA: BEGIN OF bbseg. " Line Item Structure in RFBIBL00
 INCLUDE STRUCTURE bbseg.
DATA: END OF bbseg.
*File in Application Server
DATA: output_file_name LIKE rfpdo-rfbifile VALUE 'J:\EXCER'.
*Data declaration for passing values to screen of RFBIBL00
DATA: callmode VALUE 'B', "BDC MODE
 max_comm(4) VALUE '1000', "COMMIT
 pa_xprot,
 anz_mode LIKE rfpdo-allgazmd VALUE 'N', Display Mode
 update LIKE rfpdo-allgvbmd VALUE 'S', Update Mode
 tab1 TYPE i,
 in_tab TYPE i,
 fl_check,
 flag TYPE c.
CONSTANTS: exp_acc(3) VALUE '800'.
DATA: BEGIN OF itab1 OCCURS 0,
 bldat LIKE bkpf-bldat,
 blart LIKE bkpf-blart, Document Type
 bukrs LIKE bkpf-bukrs, Company Code
 budat LIKE bkpf-budat,
 waers LIKE bkpf-waers, Currency Key
 bschl LIKE bseg-bschl, posting Key
 hkont LIKE bseg-hkont, Account Number
 wrbtr(17) TYPE c, Transactional Amount
 sgtxt LIKE bseg-sgtxt, Text
 END OF itab1.
DATA: itab LIKE itab1 OCCURS 0 WITH HEADER LINE,
 wa_itab LIKE itab1.
SELECTION-SCREEN: BEGIN OF BLOCK blk.
PARAMETERS: fname TYPE rlgrap-filename,
 poutput LIKE rfpdo1-f05xicpd DEFAULT 'PAY',
 pgroup LIKE bgr00-group DEFAULT 'FBPRAC',
 pusnam LIKE bgr00-usnam DEFAULT sy-uname,
 pxkeep LIKE bgr00-xkeep DEFAULT 'X',
 pstart LIKE bgr00-start DEFAULT space,
 ptcode LIKE blf00-tcode DEFAULT 'FB01',
 XLOG(1) TYPE C DEFAULT 'X'.
SELECTION-SCREEN: END OF BLOCK blk.
Select File to upload data into internal table
AT SELECTION-SCREEN ON VALUE-REQUEST FOR fname.
CALL FUNCTION 'F4_FILENAME'
 EXPORTING
 program_name = 'ZRFBIB_CONV'
 dynpro_number = '1000'
 field_name = 'FNAME'
 IMPORTING
 file_name = fname.
START-OF-SELECTION.
*Upload data from legacy to itab
PERFORM upload_data.
Open App File
 OPEN DATASET output_file_name FOR OUTPUT IN TEXT MODE.
IF sy-subrc <> 0.
 WRITE:/ 'FILE COULD NOT BE OPENED'.
ENDIF.
Populate data into bgr00 structure
PERFORM populate_bgr00.
*Load data
PERFORM load_data.
*& Form upload_data
FORM upload_data.
CALL FUNCTION 'WS_UPLOAD'
 EXPORTING
 filename = fname
 filetype = 'DAT'
 TABLES
 data_tab = itab1
ENDFORM. " upload_data
*& Form populate_bgr00
Subroutine to populate data in bgr00 structure
FORM populate_bgr00.
bgr00-stype = '0'. "BI Record
bgr00-group = pgroup. "BDC Group
bgr00-mandt = sy-mandt. "Client
bgr00-usnam = pusnam. "User Id
bgr00-start = pstart. "Queue Start Date
bgr00-xkeep = pxkeep. "Keep Session
bgr00-nodata = '/'.
TRANSFER bgr00 TO output_file_name.
ENDFORM. " populate_bgr00
*& Form load_data
Actual load logic start in this subroutine
FORM load_data.
LOOP AT itab1.
 REFRESH itab.
***For the purpose of reconciliation,split the bschl and HKONT into 2
***line items
 MOVE-CORRESPONDING: itab1 TO wa_itab.
 APPEND wa_itab TO itab.
**For the purpose of reconciliation,do as below
 IF wa_itab-bschl = '50'.
 wa_itab-bschl = '40'.
 ELSE.
 wa_itab-bschl = '50'.
 ENDIF.
 APPEND wa_itab TO itab.
 READ TABLE itab INDEX 1.
*populate data in bbkpf
 PERFORM populate_bbkpf.
 LOOP AT itab.
*populate data in bbseg.
 PERFORM populate_bbseg.
ENDLOOP.
 CLEAR: itab, itab1.
*Submit to program rfbibl00
 SUBMIT rfbibl00 WITH ds_name = output_file_name "File name
 WITH fl_check = fl_check "File check
 WITH callmode = callmode "BDC Mode
 WITH max_comm = max_comm "Max Commit
 WITH pa_xprot = pa_xprot "Extended Log
 WITH anz_mode = anz_mode " Display Mode
 WITH update = update "Update Mode
 WITH XLOG = XLOG "Display Log
 AND RETURN.
ENDLOOP.
ENDFORM. " load_data
*& Form populate_bbkpf
 text
FORM populate_bbkpf.
TRANSLATE bbkpf USING ' /'.
bbkpf-stype = '1'. " BI Interface Record
bbkpf-tcode = ptcode. " Transaction Code
bbkpf-bldat = '31122004'. " Document Date
bbkpf-budat = '31122004'. " Posting Date
bbkpf-blart = itab-blart. " Document Type
bbkpf-bukrs = itab-bukrs. " Company Code
bbkpf-waers = itab-waers. " Currency
BBKPF-XBLNR = 'PAYROLL'. " Reference Document
bbkpf-sende = '/'. " Record End Indicator
TRANSFER bbkpf TO output_file_name. "Transfer to App Server File
ENDFORM. " populate_bbkpf
*& Form populate_bbseg
FORM populate_bbseg.
CLEAR bbseg.
TRANSLATE bbseg USING ' /'.
*Document Detail For Accounting Document
bbseg-stype = '2'. "Batch Input Interface Record
bbseg-tbnam = 'BBSEG'.
bbseg-wrbtr = itab-wrbtr. "Amount in Local Currency
bbseg-sgtxt = itab-sgtxt. "Line Item Text
bbseg-newbs = itab-bschl. "Posting Key for Next Line
bbseg-newko = itab-hkont.
bbseg-sende = '/'. "Record End Indicator
TRANSFER bbseg TO output_file_name. Transfer data from itab to App file
ENDFORM. " populate_bbseg

ABAP Code to BSP Conversion

Similar Messages

Maybe you are looking for