Plz check the report ?

hi,
i writen the report by using bolck alvs then iam not getting the field value in RS_SELFELD structure so that iam not able to check condition like
if rs_selfield-fieldname = 'vbeln'.
so that to rectify this is there any other solution plz send with code. iam also sending source code.
REPORT ZSSALV_BLOCKED.
TYPE-POOLS : SLIS.
TYPES: BEGIN OF ST_VBAK,
       VBELN TYPE VBAK-VBELN,
       ERDAT TYPE VBAK-ERDAT,
       VBTYP TYPE VBAK-VBTYP,
       NETWR TYPE VBAK-NETWR,
       WAERK TYPE VBAK-WAERK,
       END OF ST_VBAK.
TYPES: BEGIN OF ST_VBAP,
       VBELN TYPE VBAP-VBELN,
       POSNR TYPE VBAP-POSNR,
       MATNR TYPE VBAP-MATNR,
       MATKL TYPE VBAP-MATKL,
       POSAR TYPE VBAP-POSAR,
       MEINS TYPE VBAP-MEINS,
       END OF ST_VBAP.
DATA: IT_VBAK     TYPE TABLE OF ST_VBAK,
      W_VBAK      TYPE ST_VBAK,
      IT_VBAP     TYPE TABLE OF ST_VBAP,
      IT_TABLE    TYPE SLIS_TABNAME,
      W_VBAP      TYPE ST_VBAP,
      IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
      W_FIELDCAT TYPE SLIS_FIELDCAT_ALV,
      W_IS_LAYOUT TYPE SLIS_LAYOUT_ALV,
      IT_EVENT    TYPE SLIS_T_EVENT,
      REPID       TYPE SY-REPID.
REPID = SY-REPID.
REFRESH IT_VBAK.
SELECT VBELN ERDAT VBTYP NETWR WAERK FROM VBAK INTO TABLE IT_VBAK UP TO 10 ROWS.
W_FIELDCAT-FIELDNAME = 'VBELN'.
W_FIELDCAT-COL_POS    = '1'.
W_FIELDCAT-SELTEXT_L = 'SALES_DOCU_NO'.
APPEND W_FIELDCAT TO IT_FIELDCAT.
CLEAR W_FIELDCAT.
W_FIELDCAT-FIELDNAME = 'ERDAT'.
W_FIELDCAT-COL_POS    = '2'.
W_FIELDCAT-SELTEXT_L = 'SALES_DOCU_DATE'.
APPEND W_FIELDCAT TO IT_FIELDCAT.
CLEAR W_FIELDCAT.
W_FIELDCAT-FIELDNAME = 'VBTYP'.
W_FIELDCAT-COL_POS    = '3'.
W_FIELDCAT-SELTEXT_L = 'SALES_DOCU_TYPE'.
APPEND W_FIELDCAT TO IT_FIELDCAT.
CLEAR W_FIELDCAT.
W_FIELDCAT-FIELDNAME = 'NETWR'.
W_FIELDCAT-COL_POS    = '4'.
W_FIELDCAT-SELTEXT_L = 'NET_VALUE'.
APPEND W_FIELDCAT TO IT_FIELDCAT.
CLEAR W_FIELDCAT.
W_FIELDCAT-FIELDNAME = 'WAERK'.
W_FIELDCAT-COL_POS    = '5'.
W_FIELDCAT-SELTEXT_L = 'CURRENCY'.
APPEND W_FIELDCAT TO IT_FIELDCAT.
CLEAR W_FIELDCAT.
W_IS_LAYOUT-ZEBRA = 'X'.
W_IS_LAYOUT-NO_VLINE = 'X'.
      CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
        EXPORTING
          I_CALLBACK_PROGRAM             = REPID
        I_CALLBACK_PF_STATUS_SET       = ' '
         I_CALLBACK_USER_COMMAND        = 'USER_COMMAND'
        IT_EXCLUDING                   =
   CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
    EXPORTING
      IS_LAYOUT                        = W_IS_LAYOUT
      IT_FIELDCAT                      = IT_FIELDCAT
      I_TABNAME                        = IT_TABLE
      IT_EVENTS                        = IT_EVENT
    TABLES
      T_OUTTAB                         = IT_VBAK
   EXCEPTIONS
     PROGRAM_ERROR                    = 1
     MAXIMUM_OF_APPENDS_REACHED       = 2
     OTHERS                           = 3.
     CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'
     EXCEPTIONS
        PROGRAM_ERROR                 = 1
        OTHERS                        = 2
FORM user_command USING r_ucomm LIKE sy-ucomm
                      rs_selfield TYPE slis_selfield.
DATA: IT_TABLE1     TYPE SLIS_TABNAME,
       IT_EVENT1     TYPE SLIS_T_EVENT,
       IT_FIELDCAT1 TYPE SLIS_T_FIELDCAT_ALV,
       W_FIELDCAT1 TYPE SLIS_FIELDCAT_ALV,
       W_IS_LAYOUT1 TYPE SLIS_LAYOUT_ALV.
CASE R_UCOMM.
WHEN '&IC1'.
    IF RS_SELFIELD-FIELDNAME = 'VBELN' .
    REFRESH IT_VBAP.
    SELECT VBELN POSNR MATNR MATKL POSAR MEINS FROM VBAP INTO TABLE IT_VBAP WHERE VBELN = RS_SELFIELD-VALUE.
   ENDIF.
ENDCASE.
W_FIELDCAT1-FIELDNAME = 'VBELN'.
W_FIELDCAT1-COL_POS    = '1'.
W_FIELDCAT1-SELTEXT_L = 'SALES'.
APPEND W_FIELDCAT1 TO IT_FIELDCAT1.
CLEAR W_FIELDCAT1.
W_FIELDCAT1-FIELDNAME = 'POSNR'.
W_FIELDCAT1-COL_POS    = '2'.
W_FIELDCAT1-SELTEXT_L = 'ITEM_NOS'.
APPEND W_FIELDCAT1 TO IT_FIELDCAT1.
CLEAR W_FIELDCAT1.
W_FIELDCAT1-FIELDNAME = 'MATNR'.
W_FIELDCAT1-COL_POS    = '3'.
W_FIELDCAT1-SELTEXT_L = 'MATERIAL_TYPE'.
APPEND W_FIELDCAT1 TO IT_FIELDCAT1.
CLEAR W_FIELDCAT1.
W_FIELDCAT1-FIELDNAME = 'MATKL'.
W_FIELDCAT1-COL_POS    = '4'.
W_FIELDCAT1-SELTEXT_L = 'MATKL'.
APPEND W_FIELDCAT1 TO IT_FIELDCAT1.
CLEAR W_FIELDCAT1.
W_FIELDCAT1-FIELDNAME = 'POSAR'.
W_FIELDCAT1-COL_POS    = '5'.
W_FIELDCAT1-SELTEXT_L = 'POSAR'.
APPEND W_FIELDCAT1 TO IT_FIELDCAT1.
CLEAR W_FIELDCAT1.
W_FIELDCAT1-FIELDNAME = 'MEINS'.
W_FIELDCAT1-COL_POS    = '6'.
W_FIELDCAT1-SELTEXT_L = 'MEINS'.
APPEND W_FIELDCAT1 TO IT_FIELDCAT1.
CLEAR W_FIELDCAT1.
W_IS_LAYOUT1-ZEBRA = 'X'.
W_IS_LAYOUT1-NO_VLINE = 'X'.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
    IS_LAYOUT                        = W_IS_LAYOUT1
    IT_FIELDCAT                      = IT_FIELDCAT1
    I_TABNAME                        = IT_TABLE1
    IT_EVENTS                        = IT_EVENT1
TABLES
    T_OUTTAB                         = IT_VBAP
EXCEPTIONS
   PROGRAM_ERROR                    = 1
   MAXIMUM_OF_APPENDS_REACHED       = 2
   OTHERS                           = 3.
ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'
   EXCEPTIONS
     PROGRAM_ERROR                 = 1
     OTHERS                        = 2.
REFRESH IT_VBAP.
ENDFORM.
bye.

Hi Abhay,
check if you are taking work area for every Internal Table in Smartform or not .
just have to drag and drop that work area field into the position you want to display
Reward Points if it helps solves query .
Regards,
Amber S

Similar Messages

How to Check the report is Finished while calling a report from Forms 6i

Dear All,
I am Calling a report from oracle forms 6i, after runing report in " Run_Product(REPORTS,:fn_cntl.nb_report_name,ASYNCHRONOUS, RUNTIME, FILESYSTEM,pl_id, NULL);"
I need to copy the pdf to store it in another place once the report is generated.
My Problem is : that i want ot Check first the report has generated after " Run_Product(REPORTS,:fn_cntl.nb_report_name,ASYNCHRONOUS, RUNTIME, FILESYSTEM,pl_id, NULL);" is executed ? How to check the report is generated ot not?
As i tried to use the below procedure after "Run_Product(REPORTS,:fn_cntl.nb_report_name,ASYNCHRONOUS, RUNTIME, FILESYSTEM,pl_id, NULL);"" but his does not work... nothing happens
{code}
PROCEDURE FPC_COPY_REPORT (p_report_name varchar2) IS
     repid REPORT_OBJECT;
     v_rep VARCHAR2(100);
     rep_status varchar2(20);
     lv_id varchar2(1000);
BEGIN
repid := find_report_object('AMTP_995.RDF');
v_rep := RUN_REPORT_OBJECT(repid);
rep_status := REPORT_OBJECT_STATUS(v_rep);
     if rep_status = 'FINISHED' then
     message('Report Completed'); message('Report Completed');
     else
          message('Error when running report.');           message('Error when running report.');
     end if;
END;
{code}
Any Help

actually My code is this:
declare
     ln_alert          number;
     pl_id               ParamList;
     lv_report_name varchar2(10000);
     lv_path varchar2 (100) := 'C:\';
     lv_shared_path varchar2(1000);
     lv_copy_file varchar2(10000);
cursor cr_dir_path IS
select v_dir_path
from md_directory
where v_dir_code ='SHR';
lv_file_name varchar2(1000);
BEGIN
open cr_dir_path;
fetch cr_dir_path into lv_shared_path;
close cr_dir_path;
lv_report_name := lv_path||:fn_cntl.nb_ref_no||'_M08600000_'||to_char(sysdate,'YYYYMMDD-HHmmss')||'.pdf';
if ffn_check_fields THEN
     pl_id := Get_Parameter_List('LAI');
         IF NOT Id_Null(pl_id) THEN
             Destroy_Parameter_List( pl_id );
          END IF;
          pl_id := Create_Parameter_List('LAI');
       if :fn_cntl.nb_report_name ='MMAT_REPORT'
            then
                 if :fn_cntl.nb_report_desc ='EXPORT'
                      then
                     Add_Parameter(pl_id, 'PARAMFORM',TEXT_PARAMETER, 'NO');
         Add_Parameter(pl_id, 'DESTYPE', TEXT_PARAMETER,'File');
        Add_Parameter(pl_id, 'DESNAME', TEXT_PARAMETER, lv_report_name);
        Add_Parameter(pl_id, 'DESFORMAT',TEXT_PARAMETER,'PDF');
        Add_Parameter(pl_id, 'p_mat_no',TEXT_PARAMETER, :fn_cntl.nb_mat_no);
        Add_Parameter(pl_id, 'p_ref_no',     TEXT_PARAMETER, :fn_cntl.nb_ref_no);
        Add_Parameter(pl_id, 'p_verified_by',TEXT_PARAMETER, user);
                 Run_Product(REPORTS,:fn_cntl.nb_report_name,ASYNCHRONOUS, RUNTIME, FILESYSTEM,pl_id, NULL);
      DECLARE
           repid REPORT_OBJECT;     v_rep VARCHAR2(100);     rep_status varchar2(20);BEGIN
                     /* REP_OBJ= REPORT OBJECT CREATED UNDER REPORT NODE AT FORM */
         repid := find_report_object('MMAT_REPORT');      v_rep := RUN_REPORT_OBJECT(repid);
                    rep_status := REPORT_OBJECT_STATUS(v_rep);
      if rep_status = 'FINISHED' then
          message('Report Completed');          message('Report Completed');
         --copy_report_object_output(v_rep,'c:\local.pdf');
         -- host('netscape c:\tlocal.pdf');
     else          message('Error when running report.');
                                      message('Error when running report.');
     end if;
             END;
     end if;
end if;
       if :fn_cntl.nb_report_desc ='EXPORT'
            then
              error_handler('This report will be Storde in ' ||lv_report_name||' and '||lv_shared_path|| ' Location',3);
                 lv_copy_file :='copy '||' "'||lv_report_name||'" "'||lv_shared_path||'"';
                 host(lv_copy_file,no_screen);
              error_handler('Report Has been Generated Sucessfully.',3);
       end if;
    end if;
END;I will try first the another solution you have replied perviously... and will let you no the results... thanks a lot...

Check the report

Please check the output of this report.
*& Report YCLASSICALREPORT4
REPORT YCLASSICALREPORT4 NO STANDARD PAGE HEADING MESSAGE-ID ZMSG20 LINE-SIZE 100 LINE-COUNT 65(3).
TABLES : EKKO,MARC,EKPO.
DATA : BEGIN OF I_MARC OCCURS 0,
       MATNR LIKE MARC-MATNR,
       WERKS LIKE MARC-WERKS,
       PSTAT LIKE MARC-PSTAT,
       EKGRP LIKE MARC-EKGRP,
       END OF I_MARC.
DATA : BEGIN OF I_EKPO OCCURS 0,
       EBELN LIKE EKKO-EBELN,
       EBELP LIKE EKPO-EBELP,
       MATNR LIKE EKPO-MATNR,
       MENGE LIKE EKPO-MENGE,
       END OF I_EKPO.
*******SELECTION SCREEN*********
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETER : P_WERKS LIKE MARC-WERKS OBLIGATORY VALUE CHECK.
SELECT-OPTIONS : S_EBELN FOR I_EKPO-EBELN OBLIGATORY NO INTERVALS NO-EXTENSION.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-002.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : R1 RADIOBUTTON GROUP G1 DEFAULT 'X'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : R2 RADIOBUTTON GROUP G1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK B2.
***************INITIALIZATION**************
INITIALIZATION.
P_WERKS = 1000.
S_EBELN-LOW = '414-0100'.
S_EBELN-SIGN = 'I'.
S_EBELN-OPTION = 'EQ'.
APPEND S_EBELN.
CLEAR S_EBELN.
****************AT SELECTION OUTPUT****************
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF R1 = ' X ' AND SCREEN-NAME = 'S_EBELN-LOW'.
      SCREEN-INPUT = 0.
      MODIFY SCREEN.
    ENDIF.
    IF R2 = ' X ' AND SCREEN-NAME = 'P_WERKS'.
      SCREEN-INPUT = 0.
      MODIFY SCREEN.
    ENDIF.
ENDLOOP.
AT SELECTION SCREEN***********************
AT SELECTION-SCREEN.
SELECT SINGLE *
         FROM EKKO
         INTO EKKO
         WHERE EBELN IN S_EBELN.
IF SY-SUBRC NE 0.
    SET CURSOR FIELD 'S_EBELN-LOW'.
    MESSAGE E999 WITH 'ENTER VALID ENTRY'.
ENDIF.
************START OF SELECTION**************************
*START-OF-SELECTION.
IF R1 = 'X'.
    SELECT MATNR
           WERKS
           PSTAT
           EKGRP
           FROM MARC
           INTO TABLE I_MARC
           WHERE WERKS = P_WERKS.
    IF SY-SUBRC NE 0.
      MESSAGE 'NO DATA FOUND' TYPE 'I'.
      SUBMIT (SY-REPID) VIA SELECTION-SCREEN.
    ENDIF.
    WRITE : / 'Material Number',20 'Plant',30 'Maintenance status',50 'Purchasing Group'.
    SKIP.
    LOOP AT I_MARC.
      WRITE : / I_MARC-MATNR,I_MARC-WERKS,I_MARC-PSTAT,I_MARC-EKGRP.
    ENDLOOP.
ENDIF.
IF R2 = 'X'.
    SELECT EBELN
           EBELP
           MATNR
           MENGE
           FROM EKPO
           INTO TABLE I_EKPO
           WHERE EBELN IN S_EBELN.
    WRITE : / 'PD NUMBER',20 'ITEM NUMBER',35 'MATERIAL',50 'PO QUANTITY'.
    LOOP AT I_EKPO.
      WRITE : / I_EKPO-EBELN,I_EKPO-EBELP,I_EKPO-MATNR,I_EKPO-MENGE.
    ENDLOOP.
ENDIF.
*******************TOP OF PAGE**************
TOP-OF-PAGE.
IF R1 = 'X'.
ULINE AT / 0(70).
WRITE : / 'Material Number',20 'Plant',30 'Maintenance status',50 'Purchasing Group'.
ULINE AT / 0(70).
ENDIF.
IF R2 = ' X '.
WRITE : / 'PD NUMBER',20 'ITEM NUMBER',35 'MATERIAL',50 'PO QUANTITY'.
ENDIF.
******************END OF PAGE***************
WRITE : /20 'PAGE NUMBER',SY-PAGNO.

HI,
use like this.
ULINE AT /0(70).
do't leave any space between / and 0.
rgds,
bharat.

How to check the report builder version from the rdf file

Hi,
I have a rdf file but I don't the developer using which version of report builder to develop the rdf file. So, does anyone knows how to check the rdf file is developed by which version of report builder?
When I try to use the notepad to open the rdf file, it shows the string "ROS.60050". So, does it means that the rdf file is developed by Oracle report 6i?
Besides, do anyone knows if Oracle report 6i are still offer from Oralce (as I know, the latest verison of oracle report is 11g). So, in case Oralce not offer oracle 6i and I need to buy oracle report 11g, do u know it is compatiable or I need to do the migration from 6i to 11g?
Thanks!

Hi,
The ROS version you are seeing in the RDF file does not mean the version where that RDF was developed. I am not aware of a way to check this but something that may help is that when you try to open a RDF developed in a higher version
of Reports with a lower version of Reports builder the following warning will be displayed
Warning. Opening a report saved with a newer version of Reports Builder.
Functionality may be lost. Continue?
"You tried to open a report with a version of Reports Builder older than the version used to
create the report. If the report uses functionality unavailable in the older version, that
functionality will be eliminated from the report.
Regarding Oracle Developer 6i. This version is not supported any more. Regarding how to upgrade Reports 6i to 11g and what to have in mind during the upgrade please review the following documentation.
References
http://docs.oracle.com/cd/E24269_01/doc.11120/e24478/toc.htm
How To Migrate Forms and Reports From 6i and/or 9i To 11g? (Doc ID 1275515.1)
Hope it helps.
Regards, RZ

Dear kuljeet ..plz check the results of the query

Hi,
check with following query and post the output
COLUMN tsname FORMAT a12
COLUMN extents FORMAT 9999
COLUMN bytes FORMAT 999,999,999
COLUMN largest FORMAT 999,999,999
COLUMN Tot_Size FORMAT 9,999,999 HEADING "TOTAL(M)"
COLUMN Tot_Free FORMAT 9,999,999 HEADING "FREE (M)"
COLUMN Pct_Free FORMAT 999 HEADING "FREE %"
COLUMN Fragments FORMAT 999,999
COLUMN Large_Ext FORMAT 9,999,999 HEADING "BIG EXT(M)"
SELECT a.tablespace_name TSNAME, SUM(a.tots)/1048576 Tot_Size,
SUM(a.sumb)/1048576 Tot_Free,
SUM(a.sumb)*100/sum(a.tots) Pct_Free,
SUM(a.largest)/1048576 Large_Ext, SUM(a.chunks) Fragments
FROM (SELECt tablespace_name, 0 tots, SUM(bytes) sumb,
MAX(bytes) largest, COUNT(*) chunks
FROM dba_free_space a
GROUP BY tablespace_name
UNION
SELECT tablespace_name, SUM(bytes) tots, 0, 0, 0
FROM dba_data_files
GROUP BY tablespace_name) a
GROUP BY a.tablespace_name
i am also working on 10g AS and i notice application server generated Huge size of log files some are even in GB. so should also look on that.
Thanks
Kuljeet
Dear kuljeet I have runn the above query and got this result.
TSNAME TOTAL(M) FREE (M) FREE % BIG EXT(M) FRAGMENTS
B2B_DT 64 3 5 3 1
B2B_IDX 16 2 11 2 1
B2B_LOB 12 1 11 1 1
B2B_RT 40 2 6 2 1
DCM 242 22 9 21 2
DISCO_PTM5_C 2 1 34 1 1
ACHE
DISCO_PTM5_M 2 1 34 1 1
ETA
TSNAME TOTAL(M) FREE (M) FREE % BIG EXT(M) FRAGMENTS
DSGATEWAY_TA 6 1 8 1 1
B
IAS_META 7,268 7 0 7 2
OCATS 2 0 13 0 1
OLTS_ATTRSTO 3 1 24 1 2
RE
OLTS_BATTRST 1 1 69 1 1
ORE
TSNAME TOTAL(M) FREE (M) FREE % BIG EXT(M) FRAGMENTS
OLTS_CT_STOR 30 0 0 0 0
E
OLTS_DEFAULT 5 1 19 1 2
OLTS_SVRMGST 3 1 27 1 1
ORE
PORTAL 95 23 24 22 2
PORTAL_DOC 2 1 50 1 1
PORTAL_IDX 22 2 7 2 1
PORTAL_LOG 1 1 69 1 1
TSNAME TOTAL(M) FREE (M) FREE % BIG EXT(M) FRAGMENTS
SYSAUX 450 12 3 5 9
SYSTEM 800 11 1 10 2
UDDISYS_TS 46 27 58 26 2
UNDOTBS 4,169 0 0 0 0
USERS 1 0 31 0 1
WCRSYS_TS 242 12 5 12 2
25 rows selected.
Please guide me now..what I have to do further.
Thanks
Message was edited by:
[email protected]

>>i am also working on 10g AS and i notice application server generated Huge size of log files some are even in GB. so should also look on that.
This following query gives you to the details of tablespaces.and its not concern with any log files.its only related with database level not for OS or logfiles.
for 10g AS i also notice that it generate very large size of logs files and some functionality will be disable when the size of logfile is reached to 2gb.
so first check the contents of log files and move ,purge or compress it, as you needed but first check why its generated with such large size by checking the contents of logfiles.
Kuljeet

Plz check the code

Hi all,
Friends please tell me what is the problem with this code.....
It is not giving what i want.......
I want only that row in the table to have orange background which contains the value 'check'..
but what it does is that it sets all the other rows as orange too....
but when i select all the rows in the table.....it does show the color of the cell which contains 'check' and the color of the rest of the cells which are set to highlight color...
please chk the following code and let me know if there is any error...
public class ErrorEntryCellRenderer extends DefaultTableCellRenderer {
    /** Creates a new instance of ErrorEntryCellRenderer */
    public ErrorEntryCellRenderer() {
    public Component getTableCellRendererComponent(JTable table, Object value, boolean isSelected, boolean hasFocus, int row, int column) {
        Component retValue;
        retValue = super.getTableCellRendererComponent(table, value, isSelected, hasFocus, row, column);
        if(value instanceof String) {
            if(((String)value).equalsIgnoreCase("check")) {
                setBackground(Color.ORANGE);
                validate();
        return retValue;
}Thank you..
Message was edited by:
vaibhavpingle

it doesnt work then...it does not paint any thing......
i did the following changes
public Component getTableCellRendererComponent(JTable table, Color c, Object value, boolean isSelected, boolean hasFocus, int row, int column) {
        Component retValue;
        retValue = super.getTableCellRendererComponent(table, value, isSelected, hasFocus, row, column);
        if(value instanceof String) {
            if(((String)value).equalsIgnoreCase("check")) {
                setBackground(Color.ORANGE);
                validate();
            } else {
                setBackground(c);
                validate();
        return retValue;
    }

Plz check the code and tell me necessary modifications

report Z_PHANIBDC2
 no standard page heading line-size 255.
include bdcrecx1.
PARAMETERS:P_FILE LIKE RLGRAP-FILENAME DEFAULT
'C:Documents and Settingssarath.vempatiDesktopphani1.TXT' OBLIGATORY
DATA: BEGIN OF RECORD1 OCCURS 0,
 LIFNR(018),
 BURKS(011),
 KTOKK(014),
 ANRED(014),
 NAME1(014),
 SURTL(014),
 STRAS(012),
 ORT01(040),
 LAND1(013),
 SPRAS(019),
 KUNNR(015),
 BANKL(012),
 BANKS(018),
 AKONT(022),
 ZTERM(012),
 MAHNA(016),
END OF RECORD1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILE.
CALL FUNCTION 'WS_FILENAME_GET'
EXPORTING
 DEF_FILENAME = 'P_FILE '
* DEF_PATH = ' '
 MASK = ',*.*,*.*. '
 MODE = 'O'
 TITLE = 'GET FILENAME '
IMPORTING
 FILENAME = P_FILE
* RC =
EXCEPTIONS
 INV_WINSYS = 1
 NO_BATCH = 2
 SELECTION_CANCEL = 3
 SELECTION_ERROR = 4
 OTHERS = 5
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
START-OF-SELECTION.
*LOOP AT RECORD1 FROM 2.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
* CODEPAGE = ' '
 FILENAME = 'P_FILE '
 FILETYPE = 'DAT'
* HEADLEN = ' '
* LINE_EXIT = ' '
* TRUNCLEN = ' '
* USER_FORM = ' '
* USER_PROG = ' '
* DAT_D_FORMAT = ' '
* IMPORTING
* FILELENGTH =
TABLES
 DATA_TAB = RECORD1
EXCEPTIONS
 CONVERSION_ERROR = 1
 FILE_OPEN_ERROR = 2
 FILE_READ_ERROR = 3
 INVALID_TYPE = 4
 NO_BATCH = 5
 UNKNOWN_ERROR = 6
 INVALID_TABLE_WIDTH = 7
 GUI_REFUSE_FILETRANSFER = 8
 CUSTOMER_ERROR = 9
 NO_AUTHORITY = 10
 OTHERS = 11
DATA : RECORD LIKE RECORD1 OCCURS 0 WITH HEADER LINE.
DATA : RECORD3 LIKE RECORD1 OCCURS 0 WITH HEADER LINE.
DATA : LIFNR1 LIKE LFA1-LIFNR.
LOOP AT RECORD1.
 IF RECORD1-LIFNR <> ''.
 LIFNR1 = RECORD1-LIFNR.
 RECORD3-LIFNR = RECORD1-LIFNR.
 RECORD3-BURKS = record1-BURKS.
 APPEND RECORD3.
 ELSE.
 RECORD3-LIFNR = LIFNR1.
 RECORD3-BURKS = record1-BURKS.
 APPEND RECORD3.
 ENDIF.
ENDLOOP.
DELETE RECORD1 WHERE LIFNR = ''.
RECORD[] = RECORD1[].
DATA VAR1(15).
DATA VAR2(15).
DATA COUNT(2).
DATA COUNT1(2) VALUE 1.
DATA VAR3(16).
DATA VAR4(16).
DATA VAR5(16).
DELETE ADJACENT DUPLICATES FROM RECORD COMPARING LIFNR BURKS.
write:/ 'phani'.
*IF SY-SUBRC <> 0.
** MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
** WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
*ENDIF.
perform open_group.
perform bdc_dynpro using 'SAPMF02K' '0100'.
perform bdc_field using 'BDC_CURSOR'
 'RF02K-KTOKK'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_field using 'RF02K-LIFNR'
 record1-lifnr.
perform bdc_field using 'RF02K-BUKRS'
 RECORD1-BURKS.
perform bdc_field using 'RF02K-KTOKK'
 RECORD1-KTOKK.
perform bdc_field using 'RF02K-REF_LIFNR'
 RECORD1-LIFNR.
perform bdc_field using 'RF02K-REF_BUKRS'
 RECORD1-BURKS.
perform bdc_dynpro using 'SAPMF02K' '0110'.
perform bdc_field using 'BDC_CURSOR'
 'LFA1-TELX1'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_field using 'LFA1-ANRED'
 'RECORD1-ANRED'.
perform bdc_field using 'LFA1-NAME1'
 'RECORD1-NAME1'.
perform bdc_field using 'LFA1-SORTL'
 'RECORD1-SORTL'.
perform bdc_field using 'record1-STRAS'
 'RECORD1-STRAS'.
perform bdc_field using 'LFA1-ORT01'
 'RECORD1-ORT01'.
perform bdc_field using 'LFA1-LAND1'
 'RECORD1-LAND1'.
perform bdc_field using 'LFA1-SPRAS'
 'RECORD1-SPRAS'.
perform bdc_dynpro using 'SAPMF02K' '0120'.
perform bdc_field using 'BDC_CURSOR'
 'LFA1-KUNNR'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_field using 'LFA1-KUNNR'
perform bdc_dynpro using 'SAPMF02K' '0130'.
perform bdc_field using 'BDC_CURSOR'
 'LFBK-BANKL(01)'.
perform bdc_field using 'BDC_OKCODE'
 '=ENTR'.
perform bdc_field using 'LFBK-BANKS(01)'
 'IN'.
perform bdc_field using 'LFBK-BANKL(01)'
 'RECORD1-BANKL'.
perform bdc_dynpro using 'SAPMF02K' '0130'.
perform bdc_field using 'BDC_CURSOR'
 'record1-BANKS(01)'.
perform bdc_field using 'BDC_OKCODE'
 '=ENTR'.
perform bdc_dynpro using 'SAPMF02K' '0210'.
perform bdc_field using 'BDC_CURSOR'
 'record1-AKONT'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_dynpro using 'SAPMF02K' '0215'.
perform bdc_field using 'BDC_CURSOR'
 'record1-ZTERM'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_dynpro using 'SAPMF02K' '0220'.
perform bdc_field using 'BDC_CURSOR'
 'record1-MAHNA'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_dynpro using 'SAPLSPO1' '0300'.
perform bdc_field using 'BDC_OKCODE'
 '=YES'.
perform bdc_transaction using 'XK01'.
perform close_group.

report Z_PHANIBDC2
 no standard page heading line-size 255.
include bdcrecx1.
DATA: BEGIN OF RECORD1 OCCURS 0,
 LIFNR(018),
 BURKS(011),
 KTOKK(014),
 ANRED(014),
 NAME1(014),
 SURTL(014),
 STRAS(012),
 ORT01(040),
 LAND1(013),
 SPRAS(019),
 KUNNR(015),
 BANKL(012),
 BANKS(018),
 AKONT(022),
 ZTERM(012),
 MAHNA(016),
END OF RECORD1.
perform upload.
perform open_group.
loop at recored.
perform bdc_dynpro using 'SAPMF02K' '0100'.
perform bdc_field using 'BDC_CURSOR'
 'RF02K-KTOKK'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_field using 'RF02K-LIFNR'
 record1-lifnr.
perform bdc_field using 'RF02K-BUKRS'
 RECORD1-BURKS.
perform bdc_field using 'RF02K-KTOKK'
 RECORD1-KTOKK.
perform bdc_field using 'RF02K-REF_LIFNR'
 RECORD1-LIFNR.
perform bdc_field using 'RF02K-REF_BUKRS'
 RECORD1-BURKS.
perform bdc_dynpro using 'SAPMF02K' '0110'.
perform bdc_field using 'BDC_CURSOR'
 'LFA1-TELX1'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_field using 'LFA1-ANRED'
 'RECORD1-ANRED'.
perform bdc_field using 'LFA1-NAME1'
 'RECORD1-NAME1'.
perform bdc_field using 'LFA1-SORTL'
 'RECORD1-SORTL'.
perform bdc_field using 'record1-STRAS'
 'RECORD1-STRAS'.
perform bdc_field using 'LFA1-ORT01'
 'RECORD1-ORT01'.
perform bdc_field using 'LFA1-LAND1'
 'RECORD1-LAND1'.
perform bdc_field using 'LFA1-SPRAS'
 'RECORD1-SPRAS'.
perform bdc_dynpro using 'SAPMF02K' '0120'.
perform bdc_field using 'BDC_CURSOR'
 'LFA1-KUNNR'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_field using 'LFA1-KUNNR'
perform bdc_dynpro using 'SAPMF02K' '0130'.
perform bdc_field using 'BDC_CURSOR'
 'LFBK-BANKL(01)'.
perform bdc_field using 'BDC_OKCODE'
 '=ENTR'.
perform bdc_field using 'LFBK-BANKS(01)'
 'IN'.
perform bdc_field using 'LFBK-BANKL(01)'
 'RECORD1-BANKL'.
perform bdc_dynpro using 'SAPMF02K' '0130'.
perform bdc_field using 'BDC_CURSOR'
 'record1-BANKS(01)'.
perform bdc_field using 'BDC_OKCODE'
 '=ENTR'.
perform bdc_dynpro using 'SAPMF02K' '0210'.
perform bdc_field using 'BDC_CURSOR'
 'record1-AKONT'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_dynpro using 'SAPMF02K' '0215'.
perform bdc_field using 'BDC_CURSOR'
 'record1-ZTERM'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_dynpro using 'SAPMF02K' '0220'.
perform bdc_field using 'BDC_CURSOR'
 'record1-MAHNA'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_dynpro using 'SAPLSPO1' '0300'.
perform bdc_field using 'BDC_OKCODE'
 '=YES'.
perform bdc_transaction using 'XK01'.
endloop.
perform close_group.
form upload.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
CODEPAGE = ' '
 FILENAME = ' '
 FILETYPE = 'DAT'
HEADLEN = ' '
LINE_EXIT = ' '
TRUNCLEN = ' '
USER_FORM = ' '
USER_PROG = ' '
DAT_D_FORMAT = ' '
IMPORTING
FILELENGTH =
TABLES
 DATA_TAB = RECORD1
EXCEPTIONS
 CONVERSION_ERROR = 1
 FILE_OPEN_ERROR = 2
 FILE_READ_ERROR = 3
 INVALID_TYPE = 4
 NO_BATCH = 5
 UNKNOWN_ERROR = 6
 INVALID_TABLE_WIDTH = 7
 GUI_REFUSE_FILETRANSFER = 8
 CUSTOMER_ERROR = 9
 NO_AUTHORITY = 10
 OTHERS = 11
DATA : RECORD LIKE RECORD1 OCCURS 0 WITH HEADER LINE.
DATA : RECORD3 LIKE RECORD1 OCCURS 0 WITH HEADER LINE.
DATA : LIFNR1 LIKE LFA1-LIFNR.
LOOP AT RECORD1.
 IF RECORD1-LIFNR <> ''.
 LIFNR1 = RECORD1-LIFNR.
 RECORD3-LIFNR = RECORD1-LIFNR.
 RECORD3-BURKS = record1-BURKS.
 APPEND RECORD3.
 ELSE.
 RECORD3-LIFNR = LIFNR1.
 RECORD3-BURKS = record1-BURKS.
 APPEND RECORD3.
 ENDIF.
ENDLOOP.
DELETE RECORD1 WHERE LIFNR = ''.
RECORD[] = RECORD1[].
DATA VAR1(15).
DATA VAR2(15).
DATA COUNT(2).
DATA COUNT1(2) VALUE 1.
DATA VAR3(16).
DATA VAR4(16).
DATA VAR5(16).
DELETE ADJACENT DUPLICATES FROM RECORD COMPARING LIFNR BURKS.
write:/ 'phani'.
*IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
*ENDIF.
endform.

I have uploaded the vlookup files......plz check the error

Dear Members,
i am sorry i am posting third time. my problem is not solved finally i have uploaded both the files (find link below), the vlookup is not working properly, and 80% of my work depends on vlookup. file-1 is the files where i used the vlookup formula
and the file-2 is the file where i have to search the part-number and print the price coulum. one thing these files are copied from different folders so there is something error of data type i think. one thing very important that all the part-numbers in file-1
they exist in file-2. just two of them does not exist, but my vlookup formula just searched for first cell's price. because these files were on another computer there they worked for all part-numbers in file-1 except 2 part numbers.
i have tried to convert part-number coulumns to number in both files,general and text as well but none of them worked for me. i want to know where is the problem actually, because its part of our work we have to copy and paste the data between different
files, what is the solution of this...........
i have uploaded first time on onedrive.live.com and i have shared it if it needs any change please let me know.
Thanks a lot
file-1 link
https://onedrive.live.com/redir?resid=9649FFB5C28F1581!108&authkey=!AA50CuEqUSalXlk&ithint=file%2c.xlsx
file-2 link
https://onedrive.live.com/redir?resid=9649FFB5C28F1581!109&authkey=!AKZLxDAGfFWjlY4&ithint=file%2c.xlsx
Tahir Mehmood

Your vlookup is working perfectly fine. Remaining records are not there in your looked up file. Your Search file contains numbers starting with 8252 only and your looked up file contains only following 8252 series.
8252018
8252019
8252020
8252022
8252419
8252488
8252711
Here, 8252419 is present, hence it is found. Other 8252 series numbers are not present in file 2. Hence, your formula is correct.

Sequence header at the end of the sequence in the report

Good afternoon everyone,
I have a strange issue with my TestStand Report (any kind of report type) : some time ago the headers (with the name, the parameter's values, the module time, the status) of the sequence and sub-sequence were at the begining. Now they are a the end of the sequence, which means instead of having the status of the sequence first, I have the status of all the steps contained in the sequence BEFORE having the status of the sequence.
I have checked and double checked the Report options : nothing tells that the headers must be at the end.
I have 2 bench on which my sequences are running and one of them has the sequence headers upside down in the report and the other has the headers in the proper order. Their report options are exactly the same and I can't find where the configuration is different !
Does anyone have some idea ? Please ?
TestStand revision : 2010

To Norbert :
The steps in the body are ok, in the correct order yes.
I've attached two extract of report (check the Report Correct first), change the extention from ".txt" to ".html", the html one wasn't authorized by the forum.
To jiggawax
I'm not using XML format, only text or html. Where is located the ReportOptions.ini file ? I cannot find it with a basic search, could it be hidden ? As I am not managing this file in the configuration of the benches, it might be the origin of the problem !
Both benches are running the same client sequence indeed : the client sequence are located on a network reachable by the benches.
I doubt that one the client sequence can override a report callback but afterall I should make sure of this possibility.
Thanks for your help !
Attachments:
Report Correct.txt ‏12 KB
Report Upside down.txt ‏15 KB

Scheduling the report from Infoview portal does not show up data

"The crystal report is based on a SAP BI query. The parameters of the report are basically the parameters(SAP variables) of the SAP BI query. When we run the crystal report in the CR Report Designer tool, it runs fine showing all the data correctly. Then we published the crystal report to the Crystal Enterprise Server from the SAP BI system. Through the Infoview portal, the user clicks on the 'Schedule' link for the report and sets the parameters. When the 'Schedule' button is clicked, it runs successfully but no data is seen in the report except for the template. But under the same report, in Infoview portal, if the user selects "View" link, sets the parameters and then clicks the 'Execute' button, it runs successfully showing all correct data.
Dont understand why it works for 'View' link but doesn't work for 'Schedule' link. Is there any setting that needs to be made for this?"
Thanks in advance,
Sri

Hi Sri,
When we are able to see the report and unable to schedule the report with in the Info view, then check with the user rights.
Just try to login with admin account and try to schedule the report.
Also check the report in CMC and see the preview of the report.
If the user doesn't have enough rights to schedule the report, then it doesn't allow it.
Also check with in the Folder rights with in the report is saved.
Regards,
Naveen.

Error while executing the Report( Need your help gurus) !!!

Hi,
Today morning when i was checking the report for monthly data i,e from 1sept to 28th sept.
I got this below error msg. Can you pls guide me why its throwing an error.
Error SQL Error: 1555
Error Error when generating the SQL statement
Error Error reading the data of InfoProvider POS_IS1
Cancel System error in program SAPLRRK0 and form RSRDR;SRRK0F30-01-
Points Assured.
Urs,
RK.

hi,
There is some time limit set for the request to run when you run a program in the foreground or in the background. If the time limit exceeds this will occur, run the program again then this might not happen.
This might be related to table space issue, or roll area or memory. Show the short dump (ST22) to your Basis person and tell me to adjust/increase the respective tablespace .
Regards
Pankaj

"The report is being generated. Please try again later. " for last 4 hours

Hi,
I am try to check the report function which the azure portal has for Azure Active Directory Premium. However, it's showing "The report is being generated. Please try again later." everywhere for
4 hours already.
Is there anybody can help me to figure it out what's happen? Maybe I miss something?
Thanks!
Kevin

Hello,
Since we have not heard back from you we are archiving the thread.
Please let us know if you are still facing the issue.
Regards,
Neelesh

Data not displaying the report (Help me out Urgent)

Hi Folks,
When i am executing the query and web reports for the date 27/11/2007 & 28/11/2007 am not getting the data its saying "No applicable data found"
But i can see the data in the ODS for those dates.
Report is working fine till 26/11/2007.
But when the user is trying to check the reports for the above mentioned dates its not displaying.
Even in checked it the RSRT as well but the same case over there the data is not displaying.
Its bit urgent as its month end user wants to see the reports.
Any help or any clue will be great helpfull and appreciated.
Urs,
RK
*****Points Committed

HI Suchitra,
First check out how many records are there in the ODS as on 27th and 28th
There are totally 750 & 427 records on 27th and 28th.
At the time of executing the query,are using giving any variable entries?
Yes we are using variables entires like PO Date & PO number we usually check the reports giving the date in PO Date variable,
Any other clue please?
Urs,
RK.

Fin year is oct -sep (ie: leading ledger), want to see the report Apr - mar

Dear All
Case 1) Our Company finacial year is Oct2007 - Sep2008,( ie : Leading Ledger) and we have run the dep , and I want to see the effect on Non Leading ldger ( April - March).Please let me know how do i check the report.
With Regards,
kamalnatham

Hi Kamal,
First see to which depreciation area u had assigned the non leading ledger, hopefully it must be for international (dep area 30). Go to OADB in that go to dep area 30 and check whether u had given non leading ledger, if u had given then u can see the same in asset explorer.
Also as you are saying that your non leading ledger is having different fiscal year variant, check SAP Note 844029 for more information.
regards
srikanth.

[Forum FAQ] The Reporting Server cannot be reinstalled on a same SQL Server Reporting Service instance

Symptom: Sometimes, when you want to reinstall the Reporting Server Role for Operation Manager 2012,
but you may encounter an issue that the Reporting Server Role cannot be reinstalled after you successfully uninstall it. When you check the System Center Operation Manager installation log, you can find the following error as shown in Figure 1.
Figure 1: Reporting Server Role cannot be reinstalled
It seems that the SQL Server Reporting Service has not been configured properly. When you open Reporting Services Configuration Manager to check the settings, the settings seem fine though.
Even you recreate Reporting Service Database, the error remains.
After reviewing the OpsMgrSetupWizard.log, we get the following errors when wizard try to connect to SQL Server Reporting Instance (Figure 2).
[07:24:05]: Error: :CheckHttpAddressResponse failed: Threw Exception.Type: System.Net.WebException, Exception Error Code: 0x80131509, Exception.Message:
The remote server returned an error: (500) Internal Server Error.
[07:24:05]: Error: :StackTrace: at System.Net.HttpWebRequest.GetResponse() at Microsoft.EnterpriseManagement.OperationsManager.Setup.ReportingComponent.CheckHttpResponseFromSRSUrl(String
httpSite)
Figure 2: Error Log -1
It indicates the Reporting Service encounters an internal error. The Website cannot handle the request. So you may check the Reporting Service log which is located in C:\Users\Administrator.SCOM2012\AppData\Local\SCOM\LOGS
and the following errors may be found (Figure 3).
library!ReportServer_0-18!1448!03/30/2014-02:53:23:: e ERROR: Throwing Microsoft.ReportingServices.Diagnostics.Utilities.ServerConfigurationErrorException:
Unable to load assembly Microsoft.EnterpriseManagement.Reporting.Security, Microsoft.ReportingServices.Diagnostics.Utilities.ServerConfigurationErrorException: The report server has encountered a configuration error. ---> System.IO.FileNotFoundException:
Could not load file or assembly 'Microsoft.EnterpriseManagement.Reporting.Security' or one of its dependencies. The system cannot find the file specified.
File name: 'Microsoft.EnterpriseManagement.Reporting.Security'
Figure 3: Error Log -2
Reason: After the Reporting Server is installed on a SSRS instance, the Reporting Server of SCOM
needs to modify the web.config and rsreportserver.config file to add its own assembly to make the Reporting Server work. But it does not change it back when Reporting Server is uninstalled. So the assembly cannot be loaded and the SSRS cannot respond
our requests.
Resolution: When the Reporting Server is installed, the old web.config and rsreportsserver.config
files will be backed up to web.config1 and rsreportsserver.config1. So you just need to change the files’ name back, then try to install Reporting Server of SCOM again. Everything would go smoothly.
Please click to vote if the post helps you. This can be beneficial to other community members reading the thread.

Hi AakashGhare,
According to your error message, SQL Server 2008 databases are version 655. SQL Server 2008 R2 databases are 661. When you are trying to attach an 2008 R2 database (v. 661) to an 2008 instance and this is not supported. As other post, once the database has
been upgraded to an 2008 R2 version, it cannot be downgraded. You'll have to either upgrade your 2008 SP2 instance to R2, or you have to copy out the data in that database into an 2008 database (such as using the data migration wizard).
In addition, if you want to use a Windows Batch file code and command to automatically login to SQL Server, detach database and attach a new one database, there is a similar details about batch code for attaching database to a new database, you can refer
to this article.
http://notesbyparth.wordpress.com/2012/06/29/run-sql-commands-from-windows-batch-file-or-attachdetach-database-automatically-using-batch-script/
Regards,
Sofiya Li
Sofiya Li
TechNet Community Support

Plz check the report ?

Similar Messages

Maybe you are looking for