Add Parameters in html report header

Hi All,
I would like to add few parameters/items in the header of my html report. I don't know how to pass my parameters in my main sequence to report file.
Pls advise.
Thanks
toko..

Hello toko,
Were you able to find the information you want? As Ray said, there is an example that ships with TestStand that shows how to customize reports that you may want to reference. You can find it at C:\Program Files\National Instruments\TestStand 4.0\Examples\ModifyingReports. If you have further questions please feel free to post.
John B.
Applications Engineer
National Instruments

Similar Messages

How to add parameters to xml report header

All,
I've added two new parameters to my UUT information dialog (I made my own UUT information dialog) and I'd like to pass them to the header of my xml report. The style sheet I've chosen to use is "report.xsl" and I've already added the two rows to my header; so what I'd like to do is pass these 2 parameters from the PreUUT callback to my report.
First question: Is this possible?
Seconds question: I've struggled finding "reading material" on this topic and am looking for some helpful hints on where to start. To me this doesnt seem like something that should be that difficult, but maybe I'm mistaken?
Any help is appreciated.
Thanks,
Bill
John 3:16

Hi Bill,
In addition to making changes to the style sheet, we must also include the parameters you want to dispaly in the XML file using the ModifyReportHeader Callback. Please refer to this KnowledgeBase article for more information.
http://digital.ni.com/public.nsf/allkb/17ABBD0BF2A60D908625774200798869?OpenDocument
Hope this helps!
Regards,
Anjelica W.
National Instruments
Applications Engineer

Need help showing multiple parameters in a report header

Post Author: Annette
CA Forum: Formula
hi-- i am new to this and i have created a report where the person picks one or more items (they are different hospital suites) and i need for them to print on the report header all of the selections that they chose. right now it only prints the name of the first one they choose..
any help would be good..
i do know it's a string value....
thank-you for anything you can help me with....
basically if 1 is picked then it needs to state that name, if 2 or more are picked id like it to say Name, name, name, etx...

Post Author: Annette
CA Forum: Formula
the actual parameter is a number, but what im trying to populate on the heading is the name of the number..
for example... when you choose the resource unit of 31 when you refresh i want it to show the name of it which is ORA Surgery.... but if they choose 31 & 53 then id like it to show ORA Surgery, ORD Surgery.... right now it just pulls the first name choosen.. does that make sense..
so the parameter is a number, but the name(the one i want populated) is a string
and oh gosh,, thanks for your quick responses..

How do I add a logo in the header of a TestStand 2012 HTML report?

I've been trying to add a company logo to the header of a HTML report on TestStand 2012 without success. I've followed the help topic below however this seems to be for TestStand 3.1 and does not work on 2012.
http://digital.ni.com/public.nsf/allkb/3FD69C34EEF13E3786257448006A5F43
I'm able to add pictures to the XML and ATML reports however I want to stick with HTML and everything I try does not seem to work!
Any help would be hugely appreciated.
Many Thanks
Sam Beutelspacher

In TestStand 2012, the ReportHeader string no longer contains a <body> tag, so you can directly append the extra HTML to the parameter without needing to do a search and replace. The following expression worked in my case:
Parameters.ReportHeader = "\R\N<IMG src=\"C:\\NI.JPG\" ALT=\"NATIONAL INSTRUMENTS\">" + Parameters.ReportHeader
Al B.
Staff Software Engineer - TestStand
CTA/CLD

Add a logo to the header definition of an Interactive Report

Hi Folks.
Using Apex 3.1 and BI Publisher.
I am enabling an Interactive Report region to output to PDF & Excel.
Has anyone managed to add a logo to the Header/footer definition in the Print Attributes section?
Is it possible? The region definition does not understand simple HTML syntax.
If anyone would let me know if a) They've done it or b) It ain't possible that would be great.
Many thanks.
Dogfighter.

Just reading through this thread. So perhaps a few comments might be helpful:
- Interactive report regions do currently not support Report Layouts, you're limited to the built-in generic layout and won't be able to include images
- You can add a button to your interactive report region page which could initiate the download of a report query, when doing this, you would get the result set of your report query not the interactive report region, so even if the queries are the same, you might have different filters applied to your interactive report
- You can in fact include static images in your RTF report layouts using the BI Publisher Desktop Word Plug-In and MS Word, so you can have logos etc in your PDF documents. But report layouts currently only work with report queries and classic report regions
- You can also include dynamic images in your PDF, e.g. based on images stored in a BLOB column, there's currently a character escaping issue causing some trouble with this, which will be fixed in 3.1.1, more on that once 3.1.1 is out (soon)
- the print server overwrite is designed to point to a different print server than the one configured for your APEX instance, not to point to a specific report. So if your instance has BI Publisher configured, but for a specific report you want to do some special rendering using your own code, you can write e.g. a JSP, Servlet, etc that's doing the rendering, and then point yout report to that URL
Hope this helps, we do plan to add support for report layout to interactive report regions in the next full release of Application Express
Regards,
Marc

Display multiple parameters in report header

i am attempting to display a multiple parameter selection in my report header
i user
join({?parameter},",")
in the stored proc it is a varchar
in the formula editor i receive this error
a string array is required here
what do i need to do to display the selected parameter values
i have used this function before with varchars and have had no problems

i used the following syntax in my sp which produced the correct results. i just placed the parameter in the header without using the join function and it works like a charm.
ALTER   PROCEDURE [dbo].[Pr_orn_whse_rcpts]
     (@From_Crt_Dte     datetime ,
      @To_Crt_Dte     datetime,
     @whse          varchar(90))
AS
CREATE TABLE #T_Localwhs
     warehouse varchar(6) null
DECLARE
     @var     varchar(6),
     @i     numeric,
     @whs     varchar(6),
     @chk     numeric
SET @i = 1
SET @var = (charindex(',',@whse))
IF @var <> 0
     BEGIN
     WHILE (@i < @var)
          BEGIN
               --SET @var = (CHARINDEX(',',@whse))
               SET @whs = LTRIM(LEFT(@whse, (@var-1)))
               INSERT #T_Localwhs (warehouse) VALUES (@whs)
               SET @whse = RIGHT(@whse, (LEN(@whse)-@var))
               SET @var = (CHARINDEX(',',@whse))
          END
     INSERT #T_Localwhs (warehouse) VALUES (LTRIM(@whse))
     END
ELSE
     BEGIN
     INSERT #T_Localwhs (warehouse) VALUES (LTRIM(@whse))
     END
then you add a nested query to join it to the sp. as below. above your where statement.
JOIN
          SELECT DISTINCT
               Warehouse
          FROM      #T_Localwhs
          ) TW
     ON     in_wthdr_tbl.in_wthdr_frwhs = TW.warehouse
WHERE

How to add the parameters onto the reports while calling from forms

Hi all,
I am using oracle forms 10g. I want to call a report from the form.
But i dont know how to add parameters to the url while using
web.show_document();
i have a sample code. But it does not add the forms values onto the url.
DECLARE
v_host varchar2(100);
v_port varchar2(10);
v_parameter_string varchar2(4000);
v_username varchar2(50);
v_password varchar2(50);
v_database varchar2(50);
BEGIN
-- Get the full domain name of the server from the formsweb.cfg
tool_env.getvar('SERVER_URL',v_host);
-- Get the username/password and database from the .env file
tool_env.getvar('APPLICATION_USERNAME',v_username);
tool_env.getvar('APPLICATION_PASSWORD',v_password);
tool_env.getvar('APPLICATION_DATABASE',v_database);
-- If it is localhost then we are running on windows and need to use the windows port, otherwise we
-- are on AIX and need to use the AIX port
IF v_host = 'localhost' THEN
     v_port := '8889';
ELSE
     v_port := '7778';
END IF;
-- Now build the parameter string for running the report
v_parameter_string := 'server=rep_fsprod';
v_parameter_string := v_parameter_string||'&report=AAP_TOTAL_CONTRACT_VALUE_RPT.rdf';
v_parameter_string := v_parameter_string||'&userid='||v_username||'/'||v_password||'@'||v_database;
v_parameter_string := v_parameter_string||'&execution_mode=batch';
v_parameter_string := v_parameter_string||'&comm_mode=synchronous';
v_parameter_string := v_parameter_string||'&destype=cache';
v_parameter_string := v_parameter_string||'&desformat=pdf';
-- Now run the report
web.show_document('http://'||v_host||':'||v_port||'/reports/rwservlet?'||v_parameter_string,'_blank');
END;
Are we able to add the text values in the form from to the URL.
Please let me know....
thanks in advance....
Naveen

hello
read the following white paper http://www.oracle.com/technology/products/forms/pdf/10g/frm10gsrw10g.pdf
cheers
Q

Displaying Date Parameters in Report Heading

Post Author: Jim-1003
CA Forum: Formula
Hello,
I am new to Crystal Reports, and I am trying to improve an existing report definition so that the beginning and end dates selected by the user are displayed as part of the report heading. I saw something similar in the report samples, but the sample uses custom functions that apply only to that report -- cdFormatDateRange and cdSpecialDateRange. I have not found any documentation on how those functions were created or how to use them. Any help you can give me would be greatly appreciated!
Thanks,
Jim

Post Author: Jim-1003
CA Forum: Formula
After some digging, I did find out more. First of all, in the options for my Parameter, the option to allow multiple entries was set to true, so I didn't really have a range, but an array of ranges, which confused the editor.
Second, I finally did find the source code for cdFormatDateRange, which allowed me to reuse it by copying it into the clipboard and pasting it into my report.

How to add image of Front panel TAGS to html report?

I have a VI with several tabs some of which I would like to append to an HTML report. So far I have managed to include just the front panel front tab (using the Append Front Panel Image to Report.vi. Is it possible to create an image of the tabs in order to append to my report?
I'm using LabVIEW 7.1 on windows 2000
Thanks for any help. It would be greately appreciated.
Eduardo

Hello Eduardo,
In order to accomplish this, you'll need to use the Append Control Image to Report VI in a loop. On each iteration of the loop, programmatically change the Tab Control page (with a local variable or the Value property), then append the tab control image to the report. That way you'll have N images in the report, where N is the number of pages in your tab control.
Hope this helps,
-D
Darren Nattinger, CLA
LabVIEW Artisan and Nugget Penman

How to edit "Station ID" to "Test Bench ID" name in HTML Report (TestStand 4.2)...?

Hi Folks,
I have regular HTML report from TestStand 4.2; particularly i want to change the header from "Station ID" name to "Test Bench ID" name.
Can anyone help me on this...?
Thanks for your help...!!!
SB_LV

Here are just 3 options:
1- Probably the easiest and best option. Open this file: C:\Program Files\National Instruments\TestStand 4.2\Components\Language\English\ModelStrings.ini. Search for RPT_HEADER_STATION_ID. Replace the Station ID in the quotes with Test Bench ID:. The ModelStrings.ini is a resource strings file that contains a bunch of basically "global values" that TS references.
2- If you don't want to change your resource strings then open this sequence file: C:\Program Files\National Instruments\TestStand 4.2\Components\Models\TestStandModels\reportgen_html.seq. Open the sequence in there titled- AddReportHeader. Find the step named- Add Station ID. It should be a statement step. In the Expression replace ResStr("MODEL", "RPT_HEADER_STATION_ID") with "Test Bench ID:". This directly edits your process model and every sequence ran on the machine will see the change.
3- Add the Modify Report Header callback to your sequence file. In there you will have ot search the Parameters.ReportHeader string for Station ID: and replace it with Test Bench ID. This will not affect the process model.
Hope that helps,
jigg
CTA, CLA
teststandhelp.com
~Will work for kudos and/or BBQ~

Teststand Customizing Report Header - XML

I wanted to simply add an image to the report header, and I use the ModifyReportHeader callback and the added the following expression. This shows the image correctly for HTMl report, but gives an error with the XML style with expand.xsl style sheet.
What did I do wrong?
Parameters.ReportHeader = "<img src='C:\\Logo.jpg'>" + Parameters.ReportHeader
Thanks,
Top Cat

Top Cat,
first of all, you are missing the closing tag '</img>'. This is optional for HTML, but required for XML. This will remove the error message.
But still, the image will not be displayed because the style sheet does not instruct the browser to do so. The best approach for you is to modify the style sheet (backup it first!) to display your image. If it is a static image, this is all you have to do.
hope this helps,
Norbert
CEO: What exactly is stopping us from doing this?
Expert: Geometry
Marketing Manager: Just ignore it.

Report header is missng while printing or spooling

Hi All,
I have a problem in print a report.its
After getting selection screen of the report ,If i click a print button (it's for execute and print)
the header details are missing in spool ( does not print selection fields of the report are missing in spool).
If i execute the report and got the output ,then i click the print button it's execute properly means in spool i am getting all the output properly ,header details also printed. means selection screen fields means what i entered in selection screen is printing.Its a AVL report.While debugging i am not getting solution.i have investigated in menu painter also.
but i am not getting proper idea to fix the bug.
i am sending the code also.please let me know ASAP
code:
REPORT ZMXXR048 LINE-SIZE   1023 "255 deleted AW2150 GLDK9AAYU9
                 LINE-COUNT 65
                 MESSAGE-ID zm
                 NO STANDARD PAGE HEADING.
*eject
TABLES declaration.
TABLES:ekko,      "Purchasing Document: Header
       ekpo,      "Purchasing Document: Item
     a016,      "Contract Item                              AMT25JAN05
     a019,      "Contract Header                            AMT25JAN05
       t024,      "Purchasing Groups
       t024e,     "Purchasing Organizations
       t161,      "Purchasing Document Types
       t001w,     "Plants/branches
     lfa1,      "Vendor Master (General Section)            AMT25JAN05
       eket,      "Scheduling Agreement Schedule Lines
     ekbe,      "Purchasing Document: History               AMT25JAN05
     ekab,      "Release Documentation                      AMT25JAN05
       zbsart_doc."Purchasing documents custom structure     "GA01
     ekkn.      "Account Assignment in Purchasing Document "GA19062003
                Comment AMT25JAN05
*eject
TYPE-POOLS definition.
TYPE-POOLS slis.                                            "KAK01
*eject
CONSTANTS declaration.
CONSTANTS:
        c_t(1)      TYPE c         VALUE 'T',             "AMT25JAN05
          c_l(1)      TYPE c         VALUE 'L',
        c_m(1)      TYPE c         VALUE '4',             "AMT25JAN05
        c_y(1)      TYPE c         VALUE 'Y',             "AMT25JAN05
          c_i(1)      TYPE c         VALUE 'I',
          c_ne(2)     TYPE c         VALUE 'NE',
        c_eq(2)     TYPE c         VALUE 'EQ',            "AMT25JAN05
          c_lp(2)     TYPE c         VALUE 'LP',
          c_nb(2)     TYPE c         VALUE 'NB',
          c_ec(2)     TYPE c         VALUE 'EC',
          c_lpa(3)    TYPE c         VALUE 'LPA',
          c_zlp(3)    TYPE c         VALUE 'ZLP',
          c_znba(4)   TYPE c         VALUE 'ZNBA',
        c_mk(2)     TYPE c         VALUE 'MK',            "AMT25JAN05
        c_wk(2)     TYPE c         VALUE 'WK',            "AMT25JAN05
        c_doqot(1) TYPE c         VALUE '"',             "AMT25JAN05
          c_totals(6) TYPE c         VALUE 'TOTALS',
          c_x(1)      TYPE c         VALUE 'X',
        c_k(1)      TYPE c         VALUE 'K',             "AMT25JAN05
          c_a(1)      TYPE c         VALUE 'A',
          C_S(1)      TYPE C         VALUE 'S',"insert AW2150 GLDK9AAYU9
          c_55(2)     TYPE c         VALUE '55',
          c_56(2)     TYPE c         VALUE '56',
        c_44(2)     TYPE c         VALUE '44',            "AMT25JAN05
          c_45(2)     TYPE c         VALUE '45',
          c_1(1)      TYPE c         VALUE '1',
          c_2(1)      TYPE c         VALUE '2',
          c_h(1)      TYPE c         VALUE 'H',
          c_(1)      TYPE c         VALUE '',             "GA18062003.
          c_n(1)      TYPE c         VALUE 'N',             "SRI24062003
          c_o(1)      TYPE c         VALUE 'O',             "SRI24062003
          c_maxdays   TYPE p         VALUE '93',            "GA29072003
          c_wk1(10)   type c         VALUE 'WK1'.           "NAR10NOV06
*Begin of Addition by AMT25JAN05
CONSTANTS :
            c_3           TYPE i VALUE 3               ,
            c_4           TYPE i VALUE 4               ,
            c_5           TYPE i VALUE 5               ,
            c_8           TYPE i VALUE 8               ,
            c_10          TYPE i VALUE 10              ,
            c_11          TYPE i VALUE 11              ,
            c_12          TYPE i VALUE 12              ,
          c_15          TYPE i VALUE 15              ,
            c_18          TYPE i VALUE 18              ,
            c_20          TYPE i VALUE 20              ,
          c_23          TYPE i VALUE 23 , "TUL02022005 "KVI04Feb05
            c_40          TYPE i VALUE 40              ,
            c_all(4)      TYPE c VALUE '&ALL'          ,
            c_sa(3)       TYPE c VALUE '&SA'           ,
            c_bs(3)       TYPE c VALUE '&BS'           ,
            c_sum(4)      TYPE c VALUE '&SUM'          ,
            c_eb3(4)      TYPE c VALUE '&EB3'          ,
            c_xpa(4)      TYPE c VALUE '&XPA'          ,
            c_omp(4)      TYPE c VALUE '&OMP'          ,
            c_crb(4)      TYPE c VALUE '&CRB'          ,
            c_cre(4)      TYPE c VALUE '&CRE'          ,
            c_ave(4)      TYPE c VALUE '&AVE'          ,
            c_pc10(4)     TYPE c VALUE 'PC10'          ,
            c_coltab(6)   TYPE c VALUE 'COLTAB'        ,
            c_excel(5)    TYPE c VALUE 'EXCEL'         ,
            c_ic1(4)      TYPE c VALUE '&IC1'          ,
            c_dload(5)    TYPE c VALUE 'DLOAD'         ,
            c_refrs(5)    TYPE c VALUE 'REFRS'         ,
            c_waers(5)    TYPE c VALUE 'WAERS'         ,
            c_bprme(5)    TYPE c VALUE 'BPRME'         ,
            c_ekbe(4)     TYPE c VALUE 'EKBE'          ,
            c_meins2(6)   TYPE c VALUE 'MEINS2'        ,
            c_meins3(6)   TYPE c VALUE 'MEINS3'        ,
            c_ekkn(4)     TYPE c VALUE 'EKKN'          ,
            c_ekpo(4)     TYPE c VALUE 'EKPO'          ,
            c_ekko(4)     TYPE c VALUE 'EKKO'          ,
            c_lfa1(4)     TYPE c VALUE 'LFA1'          ,
            c_meins(5)    TYPE c VALUE 'MEINS'         ,
            c_eket(4)     TYPE c VALUE 'EKET'          ,
            c_me33l(5)    TYPE c VALUE 'ME33L'         ,
            c_me23(4)     TYPE c VALUE 'ME23'          ,
            c_bes(3)      TYPE c VALUE 'BES'           ,
            c_bedat(11)   TYPE c VALUE 'S_BEDAT-LOW',
            c_pur(15)     TYPE c VALUE 'PURCHASING DOC.',
            c_item(4)     TYPE c VALUE 'ITEM'           ,
            c_doc(8)      TYPE c VALUE 'DOC.DATE'       ,
            c_vendor(6)   TYPE c VALUE 'VENDOR'         ,
            c_vname(11)   TYPE c VALUE 'VENDOR NAME'    ,
            c_plant(5)    TYPE c VALUE 'PLANT'          ,
            c_pdesc(17)   TYPE c VALUE 'PLANT DESCRIPTION',
            c_sloc(4)     TYPE c VALUE 'SLOC'            ,
            c_pgr(3)      TYPE c VALUE 'PGR'            ,
            c_porg(4)     TYPE c VALUE 'PORG'            ,
            c_mat(8)      TYPE c VALUE 'MATERIAL'        ,
            c_standard(8) TYPE c VALUE 'STANDARD'        ,
            c_matdesc(20) TYPE c VALUE 'MATERIAL DESCRIPTION',
            c_deldate(13) TYPE c VALUE 'DELIVERY DATE'       ,
            c_qty(13)     TYPE c VALUE 'SCHEDULED QTY'       ,
            c_quom(4)     TYPE c VALUE 'OUOM'                ,
            c_net(9)      TYPE c VALUE 'NET PRICE'           ,
            c_curr(4)     TYPE c VALUE 'CURR'                ,
            c_per(3)      TYPE c VALUE 'PER'                 ,
            c_opuom(5)    TYPE c VALUE 'OPUOM'               ,
            c_grqty(6)    TYPE c VALUE 'GR QTY'              ,
            c_gruom(6)    TYPE c VALUE 'GR UOM'              ,
            c_irqty(6)    TYPE c VALUE 'IR QTY'              ,
            c_iruom(6)    TYPE c VALUE 'IR UOM'              ,
            c_trnum(15)   TYPE c VALUE 'TRACKING NUMBER'     ,
            c_rec(12)     TYPE c VALUE 'RECEIVER-BBP'        ,
            c_tcont(18)   TYPE c VALUE 'T_CONDITIONS-EBELN' .
*End   of Addition by AMT25JAN05
*BEGIN INSERT BB1097 - add a constant for the vendor mat field
CONSTANTS C_VENDMAT(15)   TYPE C VALUE 'VENDOR MATERIAL'.
*END INSERT BB1097
*eject
DATA Work fields definition.
DATA    : w_repid       LIKE sy-repid,
          w_color       TYPE i,
        w_info        LIKE sy-lisel,                      "AMT25JAN05
        w_lifnr       LIKE eina-lifnr,                    "AMT25JAN05
        w_matnr       LIKE eina-matnr,                    "AMT25JAN05
        w_werks       LIKE marc-werks,                    "AMT25JAN05
        w_tabkey      LIKE cdpos-tabkey,                  "AMT25JAN05
        w_objectid    LIKE konp-knumh,                    "AMT25JAN05
        w_len         TYPE i ,                            "AMT25JAN05
        w_field       LIKE konp-kopos,                    "AMT25JAN05
        w_eindt       LIKE eket-eindt,                    "AMT25JAN05
          w_ebeln       LIKE ekko-ebeln,                    "ujo1jul
          zsort(6)      TYPE c,                             "KAK01
          w_fldname(20) TYPE c,                             "GA16062003.
          w_titel       LIKE spop-titel,                    "GA25062003.
          w_text1       LIKE spop-textline1,                "GA25062003.
          w_text2       LIKE spop-textline2,                "GA25062003.
          W_FLAG(1)     TYPE C,                             "KVI04Feb05
Start of GLDK9A8WWS (AS3848)
Defined variable for line size.
          w_linsz       LIKE sy-linsz.
End of GLDK9A8WWS (AS3848)
DATA: date_diff LIKE ekko-aedat.
*BEGIN OF SRI26062003
*DATA: w_s1     LIKE ekbe-menge,                              AMT25JAN05
     w_s2     LIKE ekbe-bamng,                              AMT25JAN05
     w_s3     LIKE ekbe-bpmng,                              AMT25JAN05
     w_s4     LIKE ekpo-netpr.                              AMT25JAN05
     w_s5     LIKE ekkn-wempf.                              AMT25JAN05
     w_s6     LIKE ekpo-webaz,                              AMT25JAN05
*END   OF SRI26062003
*eject
DATA Structure definition.
DATA: e_coltab TYPE slis_specialcol_alv.
*eject
DATA Internal table definition with INCLUDE STRUCTURE
*Begin of comment by AMT25JAN05
*DATA: BEGIN OF ibdcdata OCCURS 0.
       INCLUDE STRUCTURE bdcdata.
*DATA: END OF ibdcdata.
*End   of comment by AMT25JAN05
*eject
DATA Other internal table definition.
DATA: BEGIN OF t_documents OCCURS 0,   "Main initial internal table
           ekgrp     LIKE ekko-ekgrp,
           ekorg     LIKE ekko-ekorg,
           eknam     LIKE t024-eknam,
           ebeln     LIKE ekko-ebeln,
           ebelp     LIKE ekpo-ebelp,
           lgort     LIKE ekpo-lgort,
           kschl     LIKE a016-kschl,
           datbi     LIKE a016-datbi,
           datab     LIKE a016-datab,
           LOEKZ     LIKE EKPO-LOEKZ,          "insert AW2150 GLDK9AAYU9
           infnr     LIKE ekpo-infnr,
           pstyp     LIKE ekpo-pstyp,
           konnr     LIKE ekpo-konnr,
           ematn     LIKE ekpo-ematn,
           txz01     LIKE ekpo-txz01,
           werks     LIKE ekpo-werks,
           aedat     LIKE ekpo-aedat,
           epstp     LIKE rm06e-epstp,
           lifnr     LIKE ekko-lifnr,
           waers     LIKE ekko-waers,                       "SRI26062003
           name1     LIKE lfa1-name1,
           name2     LIKE t001w-name1,
           ktmng     LIKE ekpo-ktmng,
           meins     LIKE ekpo-meins,
           meins2    LIKE ekpo-meins,                       "GA23062003
           meins3    LIKE ekpo-meins,                       "GA23062003
           bednr     LIKE ekpo-bednr,
           loevm_ko LIKE konp-loevm_ko,
           bsart     LIKE ekko-bsart,
           eindt     LIKE eket-eindt,                       "SBH01
           netpr     LIKE ekpo-netpr,                       "SBh01
           peinh     LIKE ekpo-peinh,                       "GA01
           bprme     LIKE ekpo-bprme,                       "GA01
           menge     LIKE ekpo-menge,
         menge2    like ekbe-menge,                       "GA23062003.
           bamng     LIKE ekbe-bamng,                       "GA23062003.
           bpmng     LIKE ekbe-bpmng,
           vgabe     LIKE ekbe-vgabe,                       "GA01
           webaz     LIKE ekpo-webaz,
           wempf     LIKE ekkn-wempf,                       "GA19062003.
           flgdel(1) TYPE c,                                "ujo9jul
Start of GLDK9A8WWS (AS3848)
Added fields WEPOS (GR indicator), REPOS (IR indicator) and WEBRE (GR-
based IV indicator).
           wepos     LIKE ekpo-wepos,             "GR indicator
           repos     LIKE ekpo-repos,             "IR indicator
           webre     LIKE ekpo-webre,             "GR-based IV indicator
End of GLDK9A8WWS (AS3848)
           ELIKZ     LIKE ekpo-ELIKZ,             "Delivery "TUL02022005
           EREKZ     LIKE EKPO-EREKZ,         "Invoice AW2150 GLDK9AAYU9
*BEGIN INSERT BB1097 - add column for the vendor mat field. this field
                     will hold the value of the vendor material #
           IDNLF     LIKE EKPO-IDNLF,
*END INSERT BB1097
      END OF t_documents.
Added begin ujo9jul
*DATA: t_documents_tmp LIKE t_documents OCCURS 0 WITH HEADER LINE.
*Comment by AMT25JAN05
*eject
DATA Other internal table definition.
*Begin of Comment by AMT25JAN05
*DATA: BEGIN OF t_ekko OCCURS 0,
       ebeln LIKE ekko-ebeln,
       bsart LIKE ekko-bsart,
       loekz LIKE ekko-loekz,
       aedat LIKE ekko-aedat,
       lifnr LIKE ekko-lifnr,
       ekorg LIKE ekko-ekorg,
       ekgrp LIKE ekko-ekgrp,
       waers LIKE ekko-waers,
       name1 LIKE lfa1-name1,
     END OF t_ekko.
*End   of Comment by AMT25JAN05
Added end ujo9jul
*Begin of SRI26062003
DATA:BEGIN OF t_t024 OCCURS 0 ,
       ekgrp LIKE t024-ekgrp,
       eknam LIKE t024-eknam,
     END OF t_t024.
DATA:BEGIN OF t_t001w OCCURS 0 ,
       werks LIKE t001w-werks,
       name1 LIKE t001w-name1,
     END OF t_t001w.
*End of SRI26062003
DATA: BEGIN OF t_conditions OCCURS 0,         "Main final internal table
        ebeln    LIKE ekpo-ebeln,
        ekgrp    LIKE ekko-ekgrp,
        ekorg    LIKE ekko-ekorg,
        waers    LIKE ekko-waers,                      "SRI26062003
        eknam    LIKE t024-eknam,
        ebelp    LIKE ekpo-ebelp,
        lgort    LIKE ekpo-lgort,
        kschl    LIKE a016-kschl,
        datbi    LIKE a016-datbi,
        datab    LIKE a016-datab,
        infnr    LIKE ekpo-infnr,
        pstyp    LIKE ekpo-pstyp,
        konnr    LIKE ekpo-konnr,
        ematn    LIKE ekpo-ematn,
        txz01    LIKE ekpo-txz01,
        werks    LIKE ekpo-werks,
        aedat    LIKE ekpo-aedat,
        epstp    LIKE rm06e-epstp,
        lifnr    LIKE ekko-lifnr,
        name1    LIKE lfa1-name1,
        name2    LIKE t001w-name1,
        ktmng    LIKE ekpo-ktmng,
        meins    LIKE ekpo-meins,
        meins2   LIKE ekpo-meins,                      "GA23062003.
        meins3   LIKE ekpo-meins,                      "GA23062003.
        bednr    LIKE ekpo-bednr,
        loevm_ko LIKE konp-loevm_ko,
        bsart    LIKE ekko-bsart,
        eindt    LIKE eket-eindt,
        netpr    LIKE ekpo-netpr,
        peinh    LIKE ekpo-peinh,
        bprme    LIKE ekpo-bprme,
        menge    LIKE ekpo-menge,
      menge2   like ekbe-menge,                      "GA23062003.
        bamng    LIKE ekbe-bamng,                      "GA23062003.
        bpmng    LIKE ekbe-bpmng,
        vgabe    LIKE ekbe-vgabe,                           "GA01
        webaz    LIKE ekpo-webaz,
        wempf    LIKE ekkn-wempf,                      "GA19062003.
        AGING    TYPE I,                  "insert AW2150 GLDK9AAYU9
        ELIKZ    LIKE ekpo-ELIKZ,                      "TUL02022005
        EREKZ    LIKE EKPO-EREKZ,         "insert AW2150 GLDK9AAYU9
        coltab   TYPE slis_t_specialcol_alv,           "SRI24062003
*BEGIN INSERT BB1097 - add column for the vendor mat field. this field
                     will hold the value of the vendor material #
        IDNLF    LIKE EKPO-IDNLF,
*END INSERT BB1097
      END OF t_conditions.
Internal Table for the Purchasing Group name
*Begin of Comment by AMT25JAN05
*DATA: BEGIN OF t_purchgr OCCURS 0,
       name2 LIKE t024-eknam,
     END OF t_purchgr.
*End   of Comment by AMT25JAN05
internal table for the plant name
*Begin of Comment by AMT25JAN05
*DATA: BEGIN OF t_plant OCCURS 0,
       name1 LIKE t001w-name1,
     END OF t_plant.
*End   of Comment by AMT25JAN05
*Begin of Comment by AW2150
Internal Table for the Vendor Number and Vendor Name
*DATA: BEGIN OF t_lfa1 OCCURS 0,
       lifnr LIKE lfa1-lifnr,
       name1 LIKE lfa1-name1,
     END OF t_lfa1.
*End of Comment by AW2150
*Start of GA19062003
Internal table for the Good Recipient in case of BBP
DATA: BEGIN OF t_ekkn OCCURS 0,
        ebeln LIKE ekkn-ebeln,                              "SRI26062003
        ebelp LIKE ekkn-ebelp,                              "SRI26062003
        wempf LIKE ekkn-wempf,
      END OF t_ekkn.
*End of GA19062003
Internal Table for EXCEL DOWNLOADING
DATA: BEGIN OF t_conditions_exe OCCURS 0,
        ebeln(15)    TYPE c,
        ebelp(11)    TYPE c,
        aedat(11)    TYPE c,
        lifnr(16)    TYPE c,
        name1(35)    TYPE c,
        werks(5)     TYPE c,
        name2(30)    TYPE c,                                "GA16062003.
        lgort(4)     TYPE c,
        ekgrp(3)     TYPE c,
        ekorg(4)     TYPE c,
"       eknam(30)    type c,                                "GA16062003.
        ematn(20)    TYPE c,
        txz01(40)    TYPE c,
*BEGIN INSERT BB1097 - this field will hold the value of the vendor
                     material #
        IDNLF(35)    TYPE C,
*END INSERT BB1097
        eindt(13)    TYPE c,
        menge(13)    TYPE c,
        meins(4)     TYPE c,
        netpr(11)    TYPE c,
        waers(5)     TYPE c,                                "ujo7jul
        peinh(4)     TYPE c,
        bprme(4)     TYPE c,
      menge2(11)   type c,
        bamng(11)    TYPE c,
        meins2(6)    TYPE c,
        bpmng(11)    TYPE c,
        meins3(6)    TYPE c,
        bednr(21)    TYPE c,
        wempf(12)    TYPE c,                                "GA19062003.
        AGING(7)     TYPE C,                   "insert AW2150 GLDK9AAYU9
        ELIKZ(23)    TYPE c,                                "TUL02022005
        EREKZ(23)    TYPE C,                   "insert AW2150 GLDK9AAYU9
      END OF t_conditions_exe.
*eject
*INTERNAL TABLE TO FIND THE RECEIVED AND INVOICED QUANTITY
DATA: BEGIN OF t_ekbe OCCURS 0,
        ebelp LIKE ekbe-ebelp,
        ebeln LIKE ekbe-ebeln,
        vgabe LIKE ekbe-vgabe,
      BELNR LIKE EKBE-BELNR,
*Begin Of Change BH9511 20-Aug-07
       menge LIKE ekbe-menge,
        menge(16) TYPE P DECIMALS 3,
*End Of Change BH9511 20-Aug-07
        shkzg LIKE ekbe-shkzg,
      END OF t_ekbe.
*INTERNAL TABLE TO FIND THE RECEIVED AND INVOICED UoM
DATA: BEGIN OF t_ekbe_temp OCCURS 0,
        ebelp LIKE ekbe-ebelp,
        ebeln LIKE ekbe-ebeln,
        vgabe LIKE ekbe-vgabe,
        menge LIKE ekbe-menge,
      END OF t_ekbe_temp.
Added begin ujo7jul
DATA: BEGIN OF t_totals OCCURS 0,
        menge LIKE ekpo-menge,
        meins LIKE ekpo-meins,
        bamng LIKE ekbe-bamng,
        meins2 LIKE ekpo-meins,
        bpmng LIKE ekbe-bpmng,
        meins3 LIKE ekpo-meins,
      END OF t_totals.
DATA: BEGIN OF t_tot_netpr OCCURS 0,
        netpr LIKE ekpo-netpr,
        waers LIKE ekko-waers,
      END   OF t_tot_netpr.
DATA: BEGIN OF t_tot_peinh OCCURS 0,
        peinh LIKE ekpo-peinh,
        bprme LIKE ekpo-bprme,
      END   OF t_tot_peinh.
*Begin of Comment by AW2150
*DATA: BEGIN OF t_eket OCCURS 0,
       ebeln LIKE eket-ebeln,
       ebelp LIKE eket-ebelp,
       eindt LIKE eket-eindt,
     END   OF t_eket.
Added end ujo7jul
*End of Comment by AW2150
BEGIN OF KAK01
FOR ALV Related Details.
DATA: alv_fieldcat TYPE slis_t_fieldcat_alv,
      alv_layout    TYPE slis_layout_alv,
      alv_exclude   TYPE slis_t_extab,
      alv_sort      TYPE slis_t_sortinfo_alv,
      g_variant     LIKE disvariant,
      gx_variant    LIKE disvariant,
      gt_event_exit TYPE slis_t_event_exit,                 "GA23062003.
      g_save(1)     TYPE c,                                 "GA23062003.
    g_exit(1)     TYPE c,                                 "AMT25JAN05
    lt_dynpread   LIKE dynpread OCCURS 1 WITH HEADER LINE,"AMT25JAN05
      g_repid       LIKE d020s-prog,
END OF KAK01
Start of GLDK9A8WWS (AS3848)
Added the definition of structure for the events that will be used
in the logic for generating the standard report header for the report.
      v_events      TYPE slis_t_event.
End of GLDK9A8WWS (AS3848)
*eject
PARAMETERS and SELECT-OPTIONS definition
Start of GLDK9A8WWS (AS3848)
Changed the text-100 in the list of text elements. It was changed
from OPEN PURCHASE DOCUMENTS LIST DISPLAY to Open Purchaser Order
Report.
SELECTION-SCREEN: BEGIN OF BLOCK three WITH FRAME TITLE text-100.
End of GLDK9A8WWS (AS3848)
SELECTION-SCREEN: BEGIN OF BLOCK one WITH FRAME TITLE text-060.
SELECT-OPTIONS : s_ekorg FOR ekko-ekorg OBLIGATORY MEMORY ID eko
                              NO INTERVALS,
                 s_lifnr FOR ekko-lifnr,
                 s_werks FOR ekpo-werks MEMORY ID wrk,
                 s_ekgrp FOR ekko-ekgrp MEMORY ID ekg
                              NO INTERVALS,
                 s_ebeln FOR ekko-ebeln MEMORY ID bes,
                 s_ebelp FOR ekpo-ebelp MEMORY ID bsp,
                 s_bsart FOR zbsart_doc-bsart MEMORY ID bsa,"GA01
                 s_pstyp FOR ekpo-pstyp,
                 s_loekz FOR ekko-loekz,
                 s_knttp FOR ekpo-knttp MEMORY ID knt,
                 s_matnr FOR ekpo-matnr MEMORY ID mat,
                 s_matkl FOR ekpo-matkl MEMORY ID mkl,
start of modifications AW2150 GLDK9AAYU9
                s_bedat FOR ekko-bedat OBLIGATORY,        "GA29072003
                 S_BEDAT FOR EKKO-BEDAT,
end of modifications AW2150 GLDK9AAYU9
                 S_EINDT FOR EKET-EINDT.
PARAMETERS:      p_sum AS CHECKBOX,                         "SRI26062003
start of modification AW2150 GLDK9ABI53
deleted checkbox for manually closed PO
           p_pod AS CHECKBOX DEFAULT 'X'."insert AW2150 GLDK9AAYU9
added checkbox for DCI and FI.
            P_DCI AS CHECKBOX DEFAULT 'X', "insert AW2150 GLDK9ABI53
            P_FI AS CHECKBOX.             "insert AW2150 GLDK9ABI53
end of modification AW2150 GLDK9ABI53
SELECTION-SCREEN: END OF BLOCK one .
SELECTION-SCREEN: BEGIN OF BLOCK two WITH FRAME TITLE text-070.
start of insert AW2150 GLDK9ABSZ8
PARAMETERS:     P_ALLPO AS CHECKBOX DEFAULT 'X'.
end of insert AW2150 GLDK9ABSZ8
start of insert AW2150 GLDK9AAYU9
this was just moved from the block below. this is not a new
requirement.
PARAMETERS: P_VARI LIKE DISVARIANT-VARIANT NO-DISPLAY. " ALV Variant
SELECTION-SCREEN COMMENT 47(40) VARNAME FOR FIELD P_VARI.
end of insert AW2150 GLDK9AAYU9
*Start of GA16062003
PARAMETERS:      p_qty   RADIOBUTTON GROUP qtvl,
                 p_date RADIOBUTTON GROUP qtvl,
                 p_date1 RADIOBUTTON GROUP qtvl.
*End of GA16062003
SELECTION-SCREEN: END OF BLOCK two .
start of modification AW2150 GLDK9AAYU9
Start of GLDK9A8WWS (AS3848)
Commented out the following portion of the source code to remove the
field VARIANT under Settings on the report selection screen.
*SELECTION-SCREEN: BEGIN OF BLOCK four WITH FRAME
                                     TITLE text-073.       "TUL0202200
*selection-screen: begin of block four with frame title text-1
*Start of GA23062003
*PARAMETERS: p_vari LIKE disvariant-variant NO-DISPLAY. " ALV Variant
*SELECTION-SCREEN COMMENT 47(40) varname FOR FIELD p_vari.
*Select-Options : S_ELIKZ FOR ekpo-ELIKZ .                  "TUL0202200
End of modification AW2150 GLDK9AAYU9
Ext. check warning ignored for the comment.                 AMT25JAN05
*SELECTION-SCREEN: END OF BLOCK four.
End of GLDK9A8WWT (AS3848)
*selection-screen: end of block three.
PARAMETERS p_loggrp(4) TYPE c NO-DISPLAY DEFAULT 'PC10'.
SELECTION-SCREEN: END OF BLOCK three.
*End of GA23062003
*eject
*eject
INITIALIZATION
INITIALIZATION.
*Deletion Indicator
s_loekz-low    = c_l.
s_loekz-sign   = c_i.
s_loekz-option = c_ne.
APPEND s_loekz.
*start of insert AW2150 GLDK9ABSZ8
IF P_ALLPO EQ C_X.
    LOOP AT SCREEN.
      IF SCREEN-NAME EQ 'P_QTY'.
        SCREEN-ACTIVE = 0.
      ELSEIF SCREEN-NAME EQ 'P_DATE'.
        SCREEN-ACTIVE = 0.
      ELSEIF SCREEN-NAME EQ 'P_DATE1'.
        SCREEN-ACTIVE = 0.
      ENDIF.
      MODIFY SCREEN.
    ENDLOOP.
ELSEIF P_ALLPO NE C_X.
    LOOP AT SCREEN.
      IF SCREEN-NAME EQ 'P_QTY'.
        SCREEN-ACTIVE = 1.
      ELSEIF SCREEN-NAME EQ 'P_DATE'.
        SCREEN-ACTIVE = 1.
      ELSEIF SCREEN-NAME EQ 'P_DATE1'.
        SCREEN-ACTIVE = 1.
      ENDIF.
      MODIFY SCREEN.
    ENDLOOP.
ENDIF.
*end of insert AW2150 GLDK9ABSZ8
*Start of GA23062003
Settings for display variants
*INITIALIZATION.                                            "GA03122003.
g_repid = sy-repid.
g_save = c_a(1).
CLEAR g_variant.
g_variant-report    = g_repid.
g_variant-log_group = p_loggrp.
g_variant-username = sy-uname.
Get default variant
gx_variant = g_variant.
CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET'
       EXPORTING
            i_save     = g_save
       CHANGING
            cs_variant = gx_variant
       EXCEPTIONS
            not_found = 2.
IF sy-subrc EQ 0.
    p_vari = gx_variant-variant.
ENDIF.
varname = gx_variant-text.
VALIDATE INITIAL DATA ENTERED BY THE USERS ***************
*Start of GA29072003.
IF NOT s_bedat IS INITIAL.
Start of GLDK9A8WWS (AS3848)
Changed sequence in subroutine name to comply with coding standards
based on the review tool ZZCHK.
    PERFORM f0100_check_s_bedat.
End of GLDK9A8WWS (AS3848)
ENDIF.
*End of GA29072003.
*eject
*start of insert AW2150 GLDK9ABSZ8
AT SELECTION-SCREEN OUTPUT.
IF P_ALLPO EQ C_X.
    LOOP AT SCREEN.
      IF SCREEN-NAME EQ 'P_QTY'.
        SCREEN-ACTIVE = 0.
      ELSEIF SCREEN-NAME EQ 'P_DATE'.
        SCREEN-ACTIVE = 0.
      ELSEIF SCREEN-NAME EQ 'P_DATE1'.
        SCREEN-ACTIVE = 0.
      ENDIF.
      MODIFY SCREEN.
    ENDLOOP.
ELSEIF P_ALLPO NE C_X.
    LOOP AT SCREEN.
      IF SCREEN-NAME EQ 'P_QTY'.
        SCREEN-ACTIVE = 1.
      ELSEIF SCREEN-NAME EQ 'P_DATE'.
        SCREEN-ACTIVE = 1.
      ELSEIF SCREEN-NAME EQ 'P_DATE1'.
        SCREEN-ACTIVE = 1.
      ENDIF.
      MODIFY SCREEN.
    ENDLOOP.
ENDIF.
*end of insert AW2150 GLDK9ABSZ8
*eject
*start of insert by AW2150 GLDK9AAYU9
AT SELECTION SCREEN ON S_EINDT.
AT SELECTION-SCREEN ON S_EINDT.
IF NOT S_EINDT IS INITIAL.
    PERFORM F17200_CHECK_S_EINDT.
ENDIF.
*end of insert by AW2150 GLDK9AAYU9
*eject
AT SELECTION SCREEN ON S_EKORG
AT SELECTION-SCREEN ON s_ekorg.
Validate value of purchasing org(s) entered on the selection         *
screen by executing subroutine 0100_VALIDATE_PURC_ORG.               *
IF NOT s_ekorg IS INITIAL.
    PERFORM f0200_validate_purc_org.
ENDIF.
*eject
AT SELECTION SCREEN ON S_EKGRP
AT SELECTION-SCREEN ON s_ekgrp.
Validate value of purchasing group(s) entered on the selection       *
screen by executing subroutine 0200_VALIDATE_PURC_GROUP.             *
IF NOT s_ekgrp IS INITIAL.
    PERFORM f0300_validate_purc_group.
ENDIF.
*eject
AT SELECTION SCREEN ON S_EBELN
AT SELECTION-SCREEN ON s_ebeln.
Validate value of purchase order(s) entered on the selection         *
screen by executing subroutine F0310_VALIDATE_PURC_ORDER.
IF NOT s_ebeln IS INITIAL.
    PERFORM f0310_validate_purc_order.
ENDIF.
*eject
AT SELECTION SCREEN ON S_WERKS
AT SELECTION-SCREEN ON s_werks.
Validate value of plant(s) entered on the selection                  *
screen by executing subroutine F0400_VALIDATE_PLANT.
IF NOT s_werks IS INITIAL.
    PERFORM f0400_validate_plant.
ENDIF.
*eject
AT SELECTION SCREEN ON S_BSART
AT SELECTION-SCREEN ON s_bsart.
Validate value of Document type(s) entered on the selection          *
screen by executing subroutine F0500_VALIDATE_DOC_TYPE.
IF NOT s_bsart IS INITIAL.
    PERFORM f0500_validate_doc_type.
ENDIF.
*eject
AT SELECTION SCREEN ON S_PSTYP
AT SELECTION-SCREEN ON s_pstyp.
Validate value of Item Category entered on the selection             *
screen by executing subroutine F0600_VALIDATE_ITEM_CATEGORY.
IF NOT s_pstyp IS INITIAL.
    PERFORM f0600_validate_item_category.
ENDIF.
*eject
AT SELECTION SCREEN ON S_MATNR
AT SELECTION-SCREEN ON s_matnr.
Validate value of Material Number entered on the selection           *
screen by executing subroutine F0700_validate_mat_number
IF NOT s_matnr IS INITIAL.
    PERFORM f0700_validate_mat_number.
ENDIF.
*eject
AT SELECTION SCREEN ON S_LIFNR
AT SELECTION-SCREEN ON s_lifnr.
Validate value of Vendor entered on the selection by executing       *
subroutine F0800_VALIDATE_VENDOR_NUMBER
IF NOT s_lifnr IS INITIAL.
    PERFORM f0800_validate_vendor_number.
ENDIF.
*eject
AT SELECTION SCREEN ON S_MATKL
AT SELECTION-SCREEN ON s_matkl.
Validate value of material group entered on the selection screen     *
by executing subroutine F0900_validate_mat_group.
IF NOT s_matkl IS INITIAL.
    PERFORM f0900_validate_mat_group.
ENDIF.
*eject
AT SELECTION SCREEN ON S_KNTTP
AT SELECTION-SCREEN ON s_knttp.
Validate the value of account assignment category entered on the     *
selection screen by executing subroutine 1000_validate_mat_group.    *
IF NOT s_knttp IS INITIAL.
    PERFORM f1000_validate_***_category.
ENDIF.
*eject
AT SELECTION SCREEN ON S_EBELP
AT SELECTION-SCREEN ON s_ebelp.
Validate the value of PO line item entered on the                    *
selection screen by executing subroutine F1100_VALIDATE_PO_ITEM.
IF NOT s_ebelp IS INITIAL.
    PERFORM f1100_validate_po_item.
ENDIF.
*eject
AT SELECTION SCREEN ON S_LOEKZ
AT SELECTION-SCREEN ON s_loekz.
Validate the value of deletion indicator enterd on the selection     *
selection screen by executing subroutine F1200_VALIDATE_DEL_IND.
IF NOT s_loekz IS INITIAL.
    PERFORM f1200_validate_del_ind.
ENDIF.
Start of GLDK9A8WWS (AS3848)
Commented out the following block of code as a result of the removal
of the field VARIANT from the selection screen.
*at selection-screen on value-request for p_vari.
perform 14000_f4_for_variant.
End of GLDK9A8WWS (AS3848)
*Start of deletion AW2150
*eject
Block Added From Here TUL02022005
AT SELECTION SCREEN ON S_ELIKZ
*AT SELECTION-SCREEN ON s_ELIKZ.
Validate the value of Delivery Completed Indicator entered.
IF NOT s_ELIKZ IS INITIAL.
Check the Valid Values.
   IF not SPACE in S_ELIKZ
   AND not C_X   in S_ELIKZ .
     MESSAGE e999 WITH
             'Invalid Delivery Completed Flag entered'(006).
   ENDIF.
ENDIF.
Block Added Till Here TUL02022005
*End of deletion AW2150
*eject
AT SELECTION SCREEN
AT SELECTION-SCREEN.
PERFORM f15000_pai_of_selection_screen.
*End of GA23062003
start of insert AW2150 GLDK9AAYU9
IF S_BEDAT IS INITIAL
     AND S_EINDT IS INITIAL.
    MESSAGE E999 WITH TEXT-E01.
ENDIF.
end of insert AW2150 GLDK9AAYU9
                        MAIN PROCESSING                            **
*eject
START-OF-SELECTION.
START-OF-SELECTION.
Store report name and report size into temp. varaibles for later use.
w_repid = sy-repid.
Select OAs and Info Records to be displayed into internal table
PERFORM f2000_get_pos.
Store data into final reporting internal table
PERFORM f3000_store_data.
Begin of KAK01
Start of GLDK9A8WWS (AS3848)
Calls the subroutine for building the event catalog for ALV. This
event catalog will be used in the function module that will generate
the ALV report. Logic will eventually be used for the generation of
the standard report header on top of each page.
CLEAR v_events.
w_linsz = sy-linsz.
PERFORM f17100_build_events USING v_events.
End of GLDK9A8WWS (AS3848)
Use ALV instead of normal list.
Write data to the screen.
Populate ALV Field Category Structure.
PERFORM f8000_field_cat.
Populate ALV Exclude Structure.
PERFORM f9000_alv_exclude.
*eject
END-OF-SELECTION.
END-OF-SELECTION.
Begin of KVI04Feb05
IF W_FLAG EQ C_X.
    CLEAR W_FLAG.
    STOP.
ENDIF.
End of "KVI04Feb05
Display Report.
PERFORM f10000_call_disp.
*eject
AT USER-COMMAND .
*AT USER-COMMAND.
CASE SY-UCOMM.
   WHEN 'EXEL'.
     PERFORM F5000_DOWNLOAD_TO_EXCEL.
   WHEN 'CLIK'.
     IF SY-LISEL+1(2) EQ '45'.
       PERFORM F6000_see_po_details.
     ELSE.
       PERFORM F7000_see_oa_details.
     ENDIF.
ENDCASE.
End of KAK01
*eject
Form(s)/Subroutine(s)   ************************
*Start of GA29072003.
*&      FORM F0100_CHECK_S_BEDAT
Check if user entered appropriate date values as selection criteria *
----

Hi!
After you click on the printer icon, a popup will apeear. Depends on the SAP system version, you are using, somewhere on the popup, you can find a filed, which is called SAP COVER PAGE.
Here you can choose, coverpage, without cover page, or standard cover page.
Regards
Tamá

Add Image in ABAP Report

Hi All,
I want add image in ABAP Report.
Please let me know how it can be done?
Regards,
Jagdish More

Hi Jagdish,
to upload the image follow these steps.
1. Upload image in web repository.
Go to Transaction SMW0 to upload the image in SAP web Repository. elect second radiobutton u201DBinary data for WebRFC applicationsu201D and click on find.
2.     Click on Execute.
3.     Click on Create and give the obj.name and description and click on import.
once the image gets uploaded.in your program do the following
1.     Create a Screen.Go to Layout and create Custom Control.I have named it as u2018CONTAINERu2019.
2.     Declare container(Custom Control name),picture(child of Container) and url in Top of the program.
data container type ref to cl_gui_custom_container.
data picture type ref to cl_gui_picture.
data url(256).
3.     Now create the object Container and Picture.
create object container
       exporting container_name = 'CONTAINER'.//name of the custom control
    create object picture
       exporting parent = container
       exceptions error = 1.
4.     Now we have to load the picture from the database which we have uploaded. For this we need to declare the following:-
data query_table like w3query occurs 1 with header line.
data html_table like w3html occurs 1.
data return_code like w3param-ret_code.
data content_type like w3param-cont_type.
data content_length like w3param-cont_len.
data pic_data like w3mime occurs 0.
data pic_size type i.
5.     Refresh the Query table and give the name of Query table as u2018_OBJECT_ID_u2019 and value as the name of logo/Image which u have uploaded.Append the value in the Query Table.
refresh query_table.
query_table-name = '_OBJECT_ID'.
query_table-value = 'ZLOGO.GIF'."name of logo
append query_table.
6.     Now call the function WWW_GET_MIME_OBJECT to get the logo/image which u have uploaded and call the function DP_CREATE_URL to create the url where the image is present.
call function 'WWW_GET_MIME_OBJECT'
    tables
      query_string        = query_table
      html                = html_table
      mime                = pic_data
    changing
      return_code         = return_code
      content_type        = content_type
      content_length      = content_length
    exceptions
      object_not_found    = 1
      parameter_not_found = 2
      others              = 3.
if sy-subrc = 0.
    pic_size = content_length.
endif.
call function 'DP_CREATE_URL'
    exporting
      type     = 'image'
      subtype = cndp_sap_tab_unknown
      size     = pic_size
      lifetime = cndp_lifetime_transaction
    tables
      data     = pic_data
    changing
      url      = url
    exceptions
      others   = 1.
7.     Finally we have to upload the image from the URL, this can be done by calling the method: picture->load_picture_from_url
call method picture->load_picture_from_url
exporting
url = url.
Now Save,Activate and Execute the Program , Image/Logo got successfully uploaded.
I have already done this program and uploaded the image...
this will surely help you
Thanks and regards,
Tanmaya

How to control background color of table cell in an html report?

I am using Labview 6.1 to generate a report. In that report there is a table created using the Append Numeric Table to Report VI. I want to be able to programmatically control the background color of each cell in the table. Also, how can I programmatically control the background color of the row and header cells of the same table. I am also generating a second table in the same report using the Append Text Table to Report VI and I would like to programmatically control the background colors of the cells in that table as well. Thanks.

Hi epsilon-d...,
i´m not sure if there is an ready to use function to do what you want, but you can enlarge the available function. Open the "Append Numeric Table to Report.vi" and go to the HTML Case. There you can see another vi which creates the html table. In the VI "HTML Report Table Row" you can add the option: bgcolor="your color" inside of the "TR" tag.
Hope it helps.
Mike

HTML TOP header is not shown in mail

Hi
I've an ALV for sending a list thru mail correctly, but when user open it HTML top header is not shown
FM
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program          = sy-repid
      i_callback_html_top_of_page = 'HTML_TOP_OF_PAGE'
      i_structure_name            = 'ZMMALV_01'
      it_sort                     = gt_sortinfo
    TABLES
      t_outtab                    = it_data01.
FORM html_top_of_page
text = 'Time : '.
CALL METHOD top->add_text
    EXPORTING
      text         = text
      sap_emphasis = 'Strong'.
CALL METHOD top->add_gap
    EXPORTING
      width = 6.
text = sy-uzeit.
CALL METHOD top->add_text
    EXPORTING
      text      = text
      sap_style = 'Key'.
CALL METHOD top->new_line.
Thanks in advance.

Hi,
Use the concept of Events.
I am giving you one of my requirement to show date and title on the ALV report.
Here it is:
Add this event in your report.
*--- Add events for the List
wa_event-name = 'TOP_OF_PAGE'.
wa_event-form = 'TOP_OF_PAGE'.
APPEND wa_event TO it_event.
call function 'REUSE_ALV_GRID_DISPLAY'
exporting
    i_callback_program       = sy-repid
    is_layout                = it_layout
    it_fieldcat              = it_fieldcat
    i_default                = 'X'
    i_save                   = 'A'
    it_events                = it_event
tables
    t_outtab                 = it_outtab
exceptions
    program_error            = 1
    others                   = 2.
After that use the 'TOP_OF_PAGE' event.
But make sure use the name of event as it is, otherwise it will give error to you.
*&      Form TOP_OF_PAGE
*     Top of page for ALV
FORM top_of_page.
REFRESH it_header.
CLEAR wa_header.
DATA: lfl_date(10) TYPE c,
        lfl_title TYPE lvc_title VALUE 'PROJECT STATUS REPORT'.
* Title
wa_header-typ = 'H'.
wa_header-info = lfl_title.
APPEND wa_header TO it_header.
CLEAR wa_header.
*mask date to dd-mm-yy format.
WRITE sy-datum TO lfl_date USING EDIT MASK
CONCATENATE 'RUN DATE :' lfl_date INTO wa_header-info.
wa_header-typ = 'H'.
APPEND wa_header TO it_header.
*FM to display TOP_OF_PAGE
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = it_header.
CLEAR wa_header.
ENDFORM.                    "top_of_page
May it helps you.
Regards.
DS.

Add Parameters in html report header

Similar Messages

Maybe you are looking for