How do a report a hotspot fault

i am no longer able to conect to a particular btopenzone hotspot my iphone can see it but btfon cannot connect. it has been working fine until today

Are you at a dedicated BT Hotspot such as a coffee shop, hotel, street OZ hotspot or airport?
If you're in a residential area, it might have been one of your neighbour's hubs who are part of the BT Wireless community. If that's the case, BT can do zero about it.
If you're at a dedicated hotspot, ring BT on 08000 223322 and they will contact the network operations centre and get the hotspot investigated for you.
Or if you're unsure about which one it is, give them a bell and they can check for you.

Similar Messages

How do I report a Firefox fault?

Since upgrading to Firefox 4, clicking on an item in the google search drop-down list no longer copies it to the search panel. It always has to be typed in full.

That problem is listed as a known issue with the Google Toolbar.
See
* http://www.google.com/support/toolbar/bin/static.py?page=known_issues.cs

How do I report a fault if my phone is not working...

How do I report a fault if my land line phone is not working? The BT website seems to assume that at the very least the broadband line is working but this is often not the case. Please could you make it crystal clear what phone number to call to report a fault? (e.g. if calling from a friend's phone or a mobile).

Cal 0800 800 151 from another phone, or From a mobile: 0330 123 4151
But first do these tests here http://bt.custhelp.com/app/answers/detail/a_id/9812/c/345,353
You can report the fault online at https://www.bt.com/consumerFaultTracking/public/faults/tracking.do?pageId=2&s_cid=con_FURL_faults
There are some useful help pages here, for BT Broadband customers only, on my personal website.
BT Broadband customers - help with broadband, WiFi, networking, e-mail and phones.

How to convert report into alvgrid please hepl

how to convert report into alvgrid please hepl

BALVSD01 check this program u will know r see below code
sample prog
REPORT ZMAT11                                  .
TYPE-POOLS : slis.
TABLES : mkpf,
         mseg,
         t001w,
         t001l.
TYPES : BEGIN OF ty_t001w,
          werks TYPE t001w-werks,
          name1 TYPE t001w-name1,
        END OF ty_t001w,
        BEGIN OF ty_makt,
          matnr TYPE makt-matnr,
          maktx TYPE makt-maktx,
        END OF ty_makt,
        BEGIN OF ty_t001l,
          lgort TYPE t001l-lgort,
          lgobe TYPE t001l-lgobe,
        END OF ty_t001l.
DATA : BEGIN OF it_mat OCCURS 0,
        mblnr LIKE mseg-mblnr,
        zeile LIKE mseg-zeile,
        mjahr LIKE mseg-mjahr,
        bldat LIKE mkpf-bldat,
        budat LIKE mkpf-budat,
        bwart LIKE mseg-bwart,
        matnr LIKE mseg-matnr,
        maktx LIKE makt-maktx,
        erfmg LIKE mseg-erfmg,
        erfme LIKE mseg-erfme,
        werks LIKE mseg-werks,
        name1 LIKE t001w-name1,
        lgort LIKE mseg-lgort,
        lgobe LIKE t001l-lgobe,
        umwrk LIKE mseg-umwrk,
        name2 LIKE t001w-name1,
        umlgo LIKE mseg-umlgo,
        lgobe1 LIKE t001l-lgobe,
        END OF it_mat.
DATA : it_t001w TYPE TABLE OF ty_t001w
                 WITH HEADER LINE,
       it_makt TYPE TABLE OF ty_makt
               WITH HEADER LINE,
       it_t001l TYPE TABLE OF ty_t001l
                WITH HEADER LINE.
DATA : ls_layout TYPE slis_layout_alv,
       it_fcat TYPE slis_t_fieldcat_alv ,
       wa_fcat TYPE slis_fieldcat_alv,
       lh TYPE slis_t_listheader,
       ls TYPE slis_listheader,
       it_events TYPE slis_t_event ,
       ls_event TYPE slis_alv_event ,
       w_var TYPE i.
DATA : l_date(10).
DATA : l_date1(20),
       ztabix LIKE sy-tabix.
DATA : l_repid LIKE trdir-name.
l_repid = 'ZMAT11'.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS : s_werks FOR mseg-werks,
                 s_lgort FOR mseg-lgort,
                 s_umwrk FOR mseg-umwrk,
                 s_umlgo FOR mseg-umlgo,
                 s_bwart FOR mseg-bwart,
                 s_budat FOR mkpf-budat,
                 s_mjahr FOR mkpf-mjahr.
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN.
SELECT SINGLE * FROM t001w INTO t001w
                          WHERE werks IN s_werks.
IF sy-subrc <> 0.
    MESSAGE e000(8i) WITH 'Enter a Valid Supplying Plant'.
ENDIF.
SELECT SINGLE * FROM t001w INTO t001w
                          WHERE werks IN s_umwrk.
IF sy-subrc <> 0.
    MESSAGE e000(8i) WITH 'Enter a Valid Receiving Plant'.
ENDIF.
SELECT SINGLE * FROM t001l INTO t001l
                          WHERE lgort IN s_lgort.
IF sy-subrc <> 0.
    MESSAGE e000(8i) WITH 'Enter a Valid Supplying St.Loc'.
ENDIF.
SELECT SINGLE * FROM t001l INTO t001l
                          WHERE lgort IN s_umlgo.
IF sy-subrc <> 0.
    MESSAGE e000(8i) WITH 'Enter a Valid Receiving St.Loc'.
ENDIF.
START-OF-SELECTION.
ls-typ = 'H'.
ls-info = 'Material Document List'.
APPEND ls TO lh.
ls-typ = 'S'.
WRITE: sy-datum TO l_date USING EDIT MASK '__/__/____'.
CONCATENATE 'DATE :' l_date INTO l_date1 SEPARATED BY space.
ls-info = l_date1.
APPEND ls TO lh.
PERFORM field_cat.
PERFORM f001_get_data.
END-OF-SELECTION.
IF it_mat[] IS INITIAL.
    MESSAGE i000(8i) WITH 'No data Found'(m01).
    EXIT.
ENDIF.
PERFORM process_data.
PERFORM display_data.
*&      Form f001_get_data
      text
--> p1        text
<-- p2        text
FORM f001_get_data .
SELECT amblnr azeile amjahr abwart a~matnr
           aerfmg aerfme awerks algort aumwrk aumlgo
           b~budat
           b~bldat INTO CORRESPONDING FIELDS OF TABLE it_mat
                   FROM mseg AS a
             INNER JOIN mkpf AS b
                ON amblnr = bmblnr
               AND amjahr = bmjahr
             CLIENT SPECIFIED
          WHERE a~mandt EQ sy-mandt
            AND a~werks IN s_werks
            AND a~lgort IN s_lgort
            AND a~umwrk IN s_umwrk
            AND a~umlgo IN s_umlgo
            AND a~bwart IN s_bwart
            AND b~budat IN s_budat
            AND b~mjahr IN s_mjahr.
IF sy-subrc = 0.
    SELECT matnr maktx INTO TABLE it_makt FROM makt
    CLIENT SPECIFIED
    FOR ALL ENTRIES IN it_mat
    WHERE mandt EQ sy-mandt
      AND matnr = it_mat-matnr.
ENDIF.
SELECT werks name1 INTO TABLE it_t001w FROM t001w
CLIENT SPECIFIED
WHERE mandt EQ sy-mandt.
IF sy-subrc <> 0.
    MESSAGE i000(8i) WITH 'No Plant Found'(m02).
ENDIF.
SELECT lgort lgobe INTO TABLE it_t001l FROM t001l
CLIENT SPECIFIED
WHERE mandt EQ sy-mandt.
IF sy-subrc <> 0.
    MESSAGE i000(8i) WITH 'No Storage Location Found'(m03).
ENDIF.
ENDFORM.                    " f001_get_data
*&      Form field_cat
      text
--> p1        text
<-- p2        text
FORM field_cat .
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'MBLNR'.
wa_fcat-key = 'X'.
wa_fcat-hotspot = 'X'.
wa_fcat-ref_fieldname = 'MBLNR'.
wa_fcat-ref_tabname = 'MSEG'.
wa_fcat-seltext_m = 'Material Doc'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'ZEILE'.
wa_fcat-ref_fieldname = 'ZEILE'.
wa_fcat-ref_tabname = 'MSEG'.
wa_fcat-seltext_m = 'Item No'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'MJAHR'.
wa_fcat-ref_fieldname = 'MJAHR'.
wa_fcat-ref_tabname = 'MSEG'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'BWART'.
wa_fcat-ref_fieldname = 'BWART'.
wa_fcat-ref_tabname = 'MSEG'.
wa_fcat-seltext_m = 'Mvmt Type'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'BLDAT'.
wa_fcat-ref_fieldname = 'BLDAT'.
wa_fcat-ref_tabname = 'MKPF'.
wa_fcat-seltext_m = 'Document Date'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'BUDAT'.
wa_fcat-ref_fieldname = 'BUDAT'.
wa_fcat-ref_tabname = 'MKPF'.
wa_fcat-seltext_m = 'Posting Date'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'MATNR'.
wa_fcat-ref_fieldname = 'MATNR'.
wa_fcat-ref_tabname = 'MSEG'.
wa_fcat-seltext_m = 'Material No'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'MAKTX'.
wa_fcat-ref_fieldname = 'MAKTX'.
wa_fcat-ref_tabname = 'MAKT'.
wa_fcat-seltext_m = 'Material Description'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'ERFMG'.
wa_fcat-ref_fieldname = 'ERFMG'.
wa_fcat-ref_tabname = 'MSEG'.
wa_fcat-seltext_m = 'Quantity'.
wa_fcat-do_sum = 'X'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'ERFME'.
wa_fcat-ref_fieldname = 'ERFME'.
wa_fcat-ref_tabname = 'MSEG'.
wa_fcat-seltext_m = 'Uom'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'WERKS'.
wa_fcat-seltext_m = 'Supplying Plant'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'NAME1'.
wa_fcat-seltext_m = 'S.Plnt Desc.'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'LGORT'.
wa_fcat-seltext_m = 'Supplying St.Loc'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'LGOBE'.
wa_fcat-seltext_m = 'Su.St.Loc Desc.'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'UMWRK'.
wa_fcat-seltext_m = 'Receiving Plant'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'NAME2'.
wa_fcat-seltext_m = 'R.Plnt Desc.'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'UMLGO'.
wa_fcat-seltext_m = 'Receiving St.Loc'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
wa_fcat-col_pos = w_var.
wa_fcat-tabname = 'IT_MAT'.
wa_fcat-fieldname = 'LGOBE1'.
wa_fcat-seltext_m = 'Re.St.Loc Desc.'.
APPEND wa_fcat TO it_fcat.
CLEAR wa_fcat.
ADD 1 TO w_var.
ENDFORM.                    " field_cat
*&      Form process_data
      text
--> p1        text
<-- p2        text
FORM process_data .
LOOP AT it_mat.
    ztabix = sy-tabix.
    READ TABLE it_makt WITH KEY matnr = it_mat-matnr.
    IF sy-subrc = 0.
      it_mat-maktx = it_makt-maktx.
    ENDIF.
    IF it_mat-bwart+2(1) = '2'.
      it_mat-erfmg = - ( it_mat-erfmg ).
    ENDIF.
    READ TABLE it_t001w WITH KEY werks = it_mat-werks.
    IF sy-subrc = 0.
      it_mat-name1 = it_t001w-name1.
    ENDIF.
    READ TABLE it_t001w WITH KEY werks = it_mat-umwrk.
    IF sy-subrc = 0.
      it_mat-name2 = it_t001w-name1.
    ENDIF.
    READ TABLE it_t001l WITH KEY lgort = it_mat-lgort.
    IF sy-subrc = 0.
      it_mat-lgobe = it_t001l-lgobe.
    ENDIF.
    READ TABLE it_t001l WITH KEY lgort = it_mat-umlgo.
    IF sy-subrc = 0.
      it_mat-lgobe1 = it_t001l-lgobe.
    ENDIF.
    MODIFY it_mat INDEX ztabix .
ENDLOOP.
ENDFORM.                    " process_data
*&      Form display_data
      text
--> p1        text
<-- p2        text
FORM display_data .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
          I_INTERFACE_CHECK                 = ' '
          I_BYPASSING_BUFFER                = ' '
          I_BUFFER_ACTIVE                   = ' '
           i_callback_program                = l_repid
          I_CALLBACK_PF_STATUS_SET          = ' '
           i_callback_user_command           = 'LINE'
           i_callback_top_of_page            = 'TOP'
          I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
          I_CALLBACK_HTML_END_OF_LIST       = ' '
          I_STRUCTURE_NAME                  =
          I_BACKGROUND_ID                   = ' '
          I_GRID_TITLE                      =
          I_GRID_SETTINGS                   =
          IS_LAYOUT                         =
           it_fieldcat                       = it_fcat
          IT_EXCLUDING                      =
          IT_SPECIAL_GROUPS                 =
          IT_SORT                           =
          IT_FILTER                         =
          IS_SEL_HIDE                       =
          I_DEFAULT                         = 'X'
          I_SAVE                            = ' '
          IS_VARIANT                        =
          it_events                         =
          IT_EVENT_EXIT                     =
          IS_PRINT                          =
          IS_REPREP_ID                      =
          I_SCREEN_START_COLUMN             = 0
          I_SCREEN_START_LINE               = 0
          I_SCREEN_END_COLUMN               = 0
          I_SCREEN_END_LINE                 = 0
          IT_ALV_GRAPHICS                   =
          IT_HYPERLINK                      =
          IT_ADD_FIELDCAT                   =
          IT_EXCEPT_QINFO                   =
          I_HTML_HEIGHT_TOP                 =
          I_HTML_HEIGHT_END                 =
        IMPORTING
          E_EXIT_CAUSED_BY_CALLER           =
          ES_EXIT_CAUSED_BY_USER            =
          TABLES
            t_outtab                          = it_mat
        EXCEPTIONS
          PROGRAM_ERROR                     = 1
          OTHERS                            = 2
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.                    " display_data
*&      Form TOP
      text
FORM top.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary       = lh
I_LOGO                   =
I_END_OF_LIST_GRID       =
ENDFORM.                    "TOP

How 2 creat report for displaying the details of a Delivery Document using

how to create report for displaying the details of a Delivery Document using the tables LIKP, LIPS
thank you
regards,
jagrut bharatkumar shukla
points will be rewarded

HI
I AM GIVING YOU MY DELIVERY DOCUMENT CODE...MODIFY IT ACCORDING TO YOUR REQUIREMENT
*& Report ZDELIVERY                                *
report zdelivery message-id z9bhu          .
types: begin of t_likp,
           vbeln type likp-vbeln,      "Delivery
           erdat type likp-erdat,      "Date for rec creation
*           LFDAT TYPE LIKP-LFDAT,      "Delevery Date
*           WAERK TYPE LIKP-WAERK,      "Currency
           kunnr type likp-kunnr,      "Ship-To Party
           kunag type likp-kunag,      "Sold-to party
           traty type likp-traty,      "Means-of-Transport
       end of t_likp.
types: begin of t_lips,
           vbeln type lips-vbeln,      "Delivery
           posnr type lips-posnr,      "Delivery item
           matnr type lips-matnr,      "Material Number
           arktx type lips-arktx,      "Short Text for Sales Order Item
           lfimg type lips-lfimg,      "Actual quantity delivered
           netpr type lips-netpr,
*           MEINS TYPE LIPS-MEINS,      "Base Unit of Measure
           vgbel type lips-vgbel,      "Doc no of the reference document
        end of t_lips.
types: begin of t_vbpa,
           vbeln type vbpa-vbeln,      "SD DocumenT Number
           posnr type vbpa-posnr,      "Item number
           parvw type vbpa-parvw,      "Partner function
           kunnrb type vbpa-kunnr,      "Customer Number 1
       end of t_vbpa.
types: begin of t_kna1,
           kunnr type kna1-kunnr,      "Customer Number 1
           name1 type kna1-name1,      "Name 1
           ort01 type kna1-ort01,      "City
           adrnr type kna1-adrnr,      "Address
       end of t_kna1.
types: begin of t_li_vbpa,
           vbeln type likp-vbeln,      "Delivery
           erdat type likp-erdat,      "Date for rec creation
*           LFDAT TYPE LIKP-LFDAT,      "Delevery Date
*           WAERK TYPE LIKP-WAERK,      "Currency
           kunnr type likp-kunnr,      "Ship-To Party
           kunag type likp-kunag,      "Sold-to party
           traty type likp-traty,      "Means-of-Transport
           vbeln1 type lips-vbeln,      "Delivery
           posnr type lips-posnr,      "Delivery item
           matnr type lips-matnr,      "Material Number
           arktx type lips-arktx,      "Short Text for Sales Order Item
           lfimg type lips-lfimg,      "Actual quantity delivered
           netpr type lips-netpr,      "Net Price
*           MEINS TYPE LIPS-MEINS,      "Base Unit of Measure
           vgbel type lips-vgbel,      "Doc no of the reference document
           vbeln3 type vbpa-vbeln,     "SD DocumenT Number
           parvw type vbpa-parvw,      "Partner function
           kunnrb type vbpa-kunnr,      "Customer Number 1
       end of t_li_vbpa.
types: begin of t_final,
           vbeln type likp-vbeln,      "Delivery
           erdat type likp-erdat,      "Date for rec creation
           kunnr type likp-kunnr,      "Ship-To Party
           kunag type likp-kunag,      "Sold-to party
           traty type likp-traty,      "Means-of-Transport
           vbeln1 type lips-vbeln,      "Delivery
           posnr type lips-posnr,      "Delivery item
           matnr type lips-matnr,      "Material Number
           arktx type lips-arktx,      "Short Text for Sales Order Item
           lfimg type lips-lfimg,      "Actual quantity delivered
           netpr type lips-netpr,      "Net Price
           vgbel type lips-vgbel,      "Doc no of the reference document
           vbeln3 type vbpa-vbeln,     "SD DocumenT Number
           parvw type vbpa-parvw,      "Partner function
           kunnrb type vbpa-kunnr,     "Customer Number 1
           name1 type kna1-name1,      "Name 1
           ort01 type kna1-ort01,      "City
           adrnr1 type kna1-adrnr,     "Address
           name2 type kna1-name1,      "Name 1
           ort02 type kna1-ort01,      "City
           adrnr2 type kna1-adrnr,     "Address
           name3 type kna1-name1,      "Name 1
           ort03 type kna1-ort01,      "City
           adrnr3 type kna1-adrnr,     "Address
       end of t_final.
*            D A T A D E C L A R A T I O N
*&*********Internal Table Declaration****************&*
data: it_likp type standard table of t_likp.
data: it_lips type standard table of t_lips.
data: it_vbpa type standard table of t_vbpa.
data: it_kna1 type standard table of t_kna1.
data: it_li_vbpa type standard table of t_li_vbpa.
data: it_li_vbpa_temp type standard table of t_li_vbpa.
data: it_final type standard table of t_final.
*&*********Work Area Declaration********************&*
data: wa_likp type t_likp.
data: wa_lips type t_lips.
data: wa_vbpa type t_vbpa.
data: wa_kna1 type t_kna1.
data: wa_li_vbpa type t_li_vbpa.
data: wa_li_vbpa_temp type t_li_vbpa.
data: wa_final type t_final.
*&*********Data Declaration************************&*
data: d_vbeln type likp-vbeln.
data: flag type i value 0.
*           S E L E C T I O N S C R E E N   D E C L A R A T I O N
selection-screen begin of block block2 with frame title text-001.
select-options: s_vbeln for d_vbeln obligatory.    "Delivery no
selection-screen end of block block2.
*            A T S E L E C T I O N - S C R E E N   E V E N T S
*AT SELECTION-SCREEN.
*PERFORM VALIDATE_DATA.
*            S T A R T   O F S E L E C T I O N     E V E N T S
start-of-selection.
perform fetch_data.
perform merge_data_kna1.
*INCLUDE Z9BT_SH_***4_FORMS.
call function 'OPEN_FORM'
exporting
*   APPLICATION                       = 'TX'
*   ARCHIVE_INDEX                     =
*   ARCHIVE_PARAMS                    =
    device                            = 'PRINTER'
*   DIALOG                            = 'X'
*   FORM                              = ' '
   language                          = sy-langu
*   OPTIONS                           =
*   MAIL_SENDER                       =
*   MAIL_RECIPIENT                    =
*   MAIL_APPL_OBJECT                  =
*   RAW_DATA_INTERFACE                = '*'
*   SPONUMIV                          =
* IMPORTING
*   LANGUAGE                          =
*   NEW_ARCHIVE_PARAMS                =
*   RESULT                            =
exceptions
   canceled                          = 1
   device                            = 2
   form                              = 3
   options                           = 4
   unclosed                          = 5
   mail_options                      = 6
   archive_error                     = 7
   invalid_fax_number                = 8
   more_params_needed_in_batch       = 9
   spool_error                       = 10
   codepage                          = 11
   others                            = 12
if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
sort it_final by vbeln.
loop at it_final into wa_final.
call function 'START_FORM'
exporting
*   ARCHIVE_INDEX          =
   form                   = 'Z9BT_DELIVERY'
   language               = sy-langu
*   STARTPAGE              = ' '
*   PROGRAM                = ' '
*   MAIL_APPL_OBJECT       =
* IMPORTING
*   LANGUAGE               =
exceptions
   form                   = 1
   format                 = 2
   unended                = 3
   unopened               = 4
   unused                 = 5
   spool_error            = 6
   codepage               = 7
   others                 = 8
if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
call function 'WRITE_FORM'
exporting
   element                        = 'ITEM_LIST'
   function                       = 'SET'
   type                           = 'BODY'
   window                         = 'MAIN'
* IMPORTING
*   PENDING_LINES                  =
* EXCEPTIONS
*   ELEMENT                        = 1
*   FUNCTION                       = 2
*   TYPE                           = 3
*   UNOPENED                       = 4
*   UNSTARTED                      = 5
*   WINDOW                         = 6
*   BAD_PAGEFORMAT_FOR_PRINT       = 7
*   SPOOL_ERROR                    = 8
*   CODEPAGE                       = 9
*   OTHERS                         = 10
if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
call function 'END_FORM'
* IMPORTING
*   RESULT                         =
exceptions
   unopened                       = 1
   bad_pageformat_for_print       = 2
   spool_error                    = 3
   codepage                       = 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.
endloop.
call function 'CLOSE_FORM'
* IMPORTING
*   RESULT                         =
*   RDI_RESULT                     =
* TABLES
*   OTFDATA                        =
exceptions
   unopened                       = 1
   bad_pageformat_for_print       = 2
   send_error                     = 3
   spool_error                    = 4
   codepage                       = 5
   others                         = 6
if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
*&      Form VALIDATE_DATA
*       text
* --> p1        text
* <-- p2        text
form validate_data .
select single vbeln into wa_likp-vbeln
                    from likp where vbeln in s_vbeln.
append wa_likp to it_likp.
if sy-subrc <> 0.
flag = 1.
endif.
endform.                    " VALIDATE_DATA
*&      Form FETCH_DATA
*       text
* --> p1        text
* <-- p2        text
form fetch_data .
select a~vbeln
       a~erdat
       a~kunnr
       a~kunag
       a~traty
       b~vbeln
       b~posnr
       b~matnr
       b~arktx
       b~lfimg
       b~netpr
       b~vgbel
       c~vbeln
       c~parvw
       c~kunnr
         into table it_li_vbpa
                from likp as a
                left outer join lips as b on a~vbeln = b~vbeln
                inner join vbpa as c on b~vgbel = c~vbeln
                where a~vbeln in s_vbeln and
                c~parvw = 'RE'.
endform.                    " FETCH_DATA
*&      Form MERGE_DATA_KNA1
*       text
* --> p1        text
* <-- p2        text
form merge_data_kna1 .
if it_li_vbpa[] is not initial.
it_li_vbpa_temp[] = it_li_vbpa[].
sort it_li_vbpa_temp by kunnr.
delete adjacent duplicates from it_li_vbpa_temp comparing kunnr.
loop at it_li_vbpa into wa_li_vbpa.
read table it_li_vbpa_temp into wa_li_vbpa_temp with key kunnr =
wa_li_vbpa-kunag.
if sy-subrc <> 0.
wa_li_vbpa_temp = wa_li_vbpa.
append wa_li_vbpa_temp to it_li_vbpa_temp.
endif.
read table it_li_vbpa_temp into wa_li_vbpa_temp with key kunnr =
wa_li_vbpa-kunnrb.
if sy-subrc <> 0.
wa_li_vbpa_temp = wa_li_vbpa.
append wa_li_vbpa_temp to it_li_vbpa_temp.
endif.
endloop.
endif.
if it_li_vbpa_temp[] is not initial.
select kunnr
        name1
        ort01
        adrnr into table it_kna1 from kna1
                    for all entries in it_li_vbpa_temp
                    where kunnr = it_li_vbpa_temp-kunnr.
endif.
loop at it_li_vbpa into wa_li_vbpa .
wa_final-vbeln = wa_li_vbpa-vbeln.
wa_final-erdat = wa_li_vbpa-erdat.
*it_final-LFART = it_li_vbpa-LFART.
wa_final-kunnr = wa_li_vbpa-kunnr.
wa_final-kunag = wa_li_vbpa-kunag.
*it_final-VSTEL = it_li_vbpa-VSTEL.
wa_final-traty = wa_li_vbpa-traty.
wa_final-vbeln1 = wa_li_vbpa-vbeln.
wa_final-posnr = wa_li_vbpa-posnr.
wa_final-matnr = wa_li_vbpa-matnr.
wa_final-arktx = wa_li_vbpa-arktx.
wa_final-lfimg = wa_li_vbpa-lfimg.
wa_final-netpr = wa_li_vbpa-netpr.
*wa_final-GEWEI = it_li_vbpa-GEWEI.
*it_final-VOLUM = it_li_vbpa-VOLUM.
*it_final-VOLEH = it_li_vbpa-VOLEH.
wa_final-vgbel = wa_li_vbpa-vgbel.
wa_final-vbeln3 = wa_li_vbpa-vbeln.
*wa_final-PARVW = wa_li_vbpa-PARVW.
wa_final-kunnrb = wa_li_vbpa-kunnrb.
read table it_kna1 into wa_kna1 with key kunnr = wa_li_vbpa-kunnr.
if sy-subrc = 0.
wa_final-name1 = wa_kna1-name1.
wa_final-ort01 = wa_kna1-ort01.
wa_final-adrnr1 = wa_kna1-adrnr.
endif.
read table it_kna1 into wa_kna1 with key kunnr = wa_li_vbpa-kunag.
if sy-subrc = 0.
wa_final-name2 = wa_kna1-name1.
wa_final-ort02 = wa_kna1-ort01.
wa_final-adrnr2 = wa_kna1-adrnr.
endif.
read table it_kna1 into wa_kna1 with key kunnr = wa_li_vbpa-kunnrb.
if sy-subrc = 0.
wa_final-name3 = wa_kna1-name1.
wa_final-ort03 = wa_kna1-ort01.
wa_final-adrnr3 = wa_kna1-adrnr.
endif.
append wa_final to it_final.
clear wa_final.
endloop.
endform.

How to save report in PersonalCategory after creating it using java panel?

Hi,
Anybody knows How to save report in PersonalCategory after creating it using java panel?
I dont want to save it in public folder. I want to save report (webi) in user's personal category.
can anybody send me source code?
It will help me a lot.
Thanks in advance
Amol Mali

Hi teda,
i'm assuming that you have seen my post that i did successfuly save report in user's personal category.
Actually the report is created in webi java panel using RE SDK and is saved in Report Sample Folder then i'm saving it in user's personal category by following code
string query = "Select SI_PERSONAL_CATEGORIES From CI_INFOOBJECTS Where "
                     + "SI_INSTANCE=0 And SI_ID=" + reportID;
                InfoObjects infoObjects = infoStore.Query(query);
                InfoObject infoObject = infoObjects[1];
                Webi wreport = (Webi)infoObject;
                ObjectRelativeIDs personalIDs = wreport.PersonalCategories;
            /personalIDs.Add(Convert.ToInt32(categoryID));
               infoStore.Commit(infoObjects);
But the report is presents in the Folder also and in user's personal category also.
I dont want the report to be in the folder (Report Sample) if i saved it in user's personal category.
How can i do that?
any idea.
Please help me.
Thanks in advance
Amol Mali
Edited by: amol mali on Jan 9, 2009 7:55 PM

How to get report in excel format instead of pdf from oracle forms.

Hi,
How to get report in excel format instead of pdf from oracle forms.
Form & Report developer 10g
report format .rdf

create a report using report builder.
call the report from form using the following procedure
DECLARE
     RO_Report_ID REPORT_OBJECT;
     Str_Report_Server_Job VARCHAR2(100);
     Str_Job_ID VARCHAR2(100);
     Str_URL VARCHAR2(100);
     PL_ID PARAMLIST ;
BEGIN
PL_ID := GET_PARAMETER_LIST('TEMPDATA');
     IF NOT ID_NULL(PL_ID) THEN
DESTROY_PARAMETER_LIST(PL_ID);
     END IF;
     PL_ID := CREATE_PARAMETER_LIST('TEMPDATA');
     RO_Report_ID := FIND_REPORT_OBJECT('RP2RRO');
     Add_Parameter(pl_id,'P_SUPCODE',TEXT_PARAMETER,:CONTROL.S_CODE);
Add_Parameter(pl_id,'P_INVOICE_NO',TEXT_PARAMETER,:CONTROL.IN_NO);
Add_Parameter(pl_id, 'PARAMFORM', TEXT_PARAMETER, 'NO');
     SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_FILENAME, 'INVOICE_REG_DETAILS.rep');
     SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_COMM_MODE, SYNCHRONOUS);
     SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_EXECUTION_MODE, BATCH);
     SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_DESTYPE, FILE);
     SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_DESFORMAT, 'SPREADSHEET');
     SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_SERVER, 'rep_dbserver_frhome1');
     Str_Report_Server_Job := RUN_REPORT_OBJECT(RO_Report_ID, PL_ID);
     Str_Job_ID := SUBSTR(Str_Report_Server_Job, LENGTH('rep_dbserver_frhome1') + 2, LENGTH(Str_Report_Server_Job));
     Str_URL      := '/reports/rwservlet/getjobid' || Str_Job_ID || '?server=rep_dbserver_frhome1';
     WEB.SHOW_DOCUMENT(Str_URL, '_SELF');
     DESTROY_PARAMETER_LIST(PL_ID);
END;

How can I report people that are harassing me on my question?

I posted a question on how to fix a problem that I had with my iPhone. When a person posted me talked about dealing with an employer to solve the problem. No it don't matter how I read it I asked why did they assume that without asking me if I even had a job that the phone was used for. After that the harassment started as if they were defending their friend and I was cruel to them. I did get an answer to my problem but the harassment keep going on and on and on even one wrote that because of that one question I shouldn't be able to post anymore questions when I would need it.
How can I report this to someone? Who else have these people harassed? Would these people be addressed that they shouldn't be behaving like this?

Sorry, but the poster before Bee, and Bee herself did not write anything that could be construed as harassment. If those posts deeply hurt you (as well as the original post that set you off) then I would strongly suggest that the Internet is NOT a place you should spend any time as your feelings are going to constantly get hurt. In fact, I'd suggest avoiding all contact with other people as much as possible if KiltedTim hurt you with his post.
As has been repeatedly explained, he merely asked because that is another avenue that could cause the Camera app to be removed, and he went on to explain how this happens. There is nothing personal in it, we don't care how you got your phone, where you work, what type of job you have, etc. He did care enough to join in and give another possibility as to why your camera icon was missing. If you do a search of these threads you will find that more than a few people have decided to put their work account on their personal iPhone and the profile installed on their iPhone by personnel at their workplace changes features on the iPhone.
Again, if this, and the answers here, deeply hurt you, pull the cable from the Internet immediately.

How do I report a user or violation of the Agreement?

User hakinianzfromhakinianz is posting multiple spam threads and I want to know how I can report this user/their posts.
Do I have to be a certain level to have this privelege?
Here is the profile: https://discussions.apple.com/people/hakinianzfromhakinianz?view=overview

d6d24r94 wrote:
User hakinianzfromhakinianz is posting multiple spam threads and I want to know how I can report this user/their posts.
Do I have to be a certain level to have this privelege?
Here is the profile: https://discussions.apple.com/people/hakinianzfromhakinianz?view=overview
Is reported to host.
You may also report by yourself. Right hand up "report abuse" near "email notification"

How to hide report engin

I am a new one in oracle and want to know how to hide report engin at runtime....
Can anybody help me.....
Thank you
Farhan

The following coding will help you to hide oracle report engin,
ADD_PARAMETER(idparam,'ORACLE_SHUTDOWN',TEXT_PARAMETER,'YES');

How to install Report server

Dear sir
On my XP I TRY TO RUN REPORT WITH REPORT SERVER I GET ERROR
ERR:41213 , CAN YOU HELP ME , HOW TO INSTALL REPORT SERVER IN ORACLE 9I REPORT WITH XP

Hello,
Test to start the Reports server from a "DOS Window" :
rwserver server=repserver
(replace repserver by the reports server name you want top use)
Regards

How to uninstall Report server

Hi 2 all DBA
plz inform me how to uninstall report server components from application server 10g , or inform me which components is required for report server in application server 10g
Thanks

Hello,
Test to start the Reports server from a "DOS Window" :
rwserver server=repserver
(replace repserver by the reports server name you want top use)
Regards

How can I connect personal hotspot to use the internet from my phone on my laptop?

I do not have internet at home and want to be able to connect using the personal hotspot on my phone. How do i do this??

How much would be a month?
       From: Verizon Wireless Customer Support <[email protected]>
To: kelly johnson <[email protected]>
Sent: Wednesday, October 8, 2014 12:02 PM
Subject: - How can I connect personal hotspot to use the internet from my phone on my laptop?
#yiv3595356488 img
|
|
|
A message from the Verizon Wireless Community
|
|   |
How can I connect personal hotspot to use the internet from my phone on my laptop?
created by Verizon Wireless Customer Support in iPhone 4S - View the full discussion             Hello kmj65
Thanks for replying. The plan you have it would be an additional charge to add the hotspot feature. It's not free with the Nationwide plan. You would need to add the feature online at www.verizonwireless.com/myverizon
JoeL_VZW
Follow us on Twitter @VZWSupport   Reply to this message by replying to this email -or- go to the message on Verizon Wireless Community Start a new discussion in iPhone 4S by email or at Verizon Wireless Community
|
|
© 2014 Verizon Wireless
Verizon Wireless
One Verizon Way
Mail Code: 180WVB
Basking Ridge, NJ 07920
Not interested in these emails anymore, or want to change how often they come? Update your email preferences by visiting https://community.verizonwireless.com/user-preferences!input.jspa.
|
We respect your privacy. Please review our privacy policy for more information
about click activity with Verizon Wireless and links included in this email.
|
|
|

HT1391 how do you report an ipod touch stolen with serial number.

I have the serial number of my ipod touch. How do I report it stolen to apple?

You don't. Report it to the police, and your insurer if it would be covered.
tt2

How to print report in jsp page?

excuse me,i am new to jsp
may i know how to pritn report in jsp page or html?
tq

here is a hacked up example.. i ripped out a lot, so it may not compile, but you get the idea... the full version is really long and not much new info.. just all awt/display stuff...
package rowe;
import javax.swing.*;
import java.util.*;
import java.awt.*;
import java.awt.image.*;
import java.awt.event.*;
import java.sql.*;
import utility.*;
import java.awt.print.*;
public class rowePrint extends JFrame implements ActionListener, Printable{
     String printType = "";
     static JButton j = new JButton("Print");
     FontMetrics fm;
     String jID, promotion, product, jComments;
     public void getInfo(int jid) {
          ResultSet rs;
          try {
               Class.forName("sun.jdbc.odbc.JdbcOdbcDriver");
               Connection conn = DriverManager.getConnection("jdbc:odbc:rowe");
               Statement stmt = conn.createStatement();
               rs = stmt.executeQuery("select j.id as jID, j.comments, p.title as pTitle, p.product, p.packagingCartonCost, p.foldingQuarterCostPerM, p.foldingQuarterCostPerM, j.customizationOption as setupFee, p.perMcost, p.qtyCarton, d.name as dName, d.contact as dContact, d.email as dEmail, d.address as dAddress, d.city as dCity, d.state as dState, d.zip as dZip, d.phone as dPhone, d.fax as dFax, r.name as rName, j.totalQty, j.orderIn, j.estFreight, j.miscCost, j.coverSelection, j.imprintSelection from jobs j, promotions p, dealers d, reps r where j.promotion = p.id and j.dealer = d.id and j.rep = r.id and j.id = " + jid);
               rs.next();
               jID = rs.getString("jID");
               jComments = rs.getString("comments");
               promotion = rs.getString("pTitle");
               product = rs.getString("product");
          } catch (Exception e) {
               System.out.println("getinfo: " + e);
   public void actionPerformed(ActionEvent e) {
        if (e.getSource() instanceof JButton) {
               wookie();
     public void wookie() {
          PrinterJob printJob = PrinterJob.getPrinterJob();
          Paper paper = new Paper();
          PageFormat page = new PageFormat();
          paper.setImageableArea(0, 0, 600, 780);
          page.setPaper(paper);
          printJob.setPrintable(this, page);
          try{
               //printJob.pageDialog(page);
          //     if (printJob.printDialog()) {
                    printJob.print();
          } catch (Exception e) {
               System.out.println("wookie1" + e);
     public static void main(String[] args) {
          rowePrint at = new rowePrint("Invoice");
          at.getInfo((new Integer(args[0])).intValue());
          at.drawShapes();
     //     at.wookie();
     public void drawShapes() {
          setBounds(0, 0, 670, 550);
          addWindowListener(new WindowAdapter() {public void windowClosing(WindowEvent e) {System.exit(0);}});
          j.setBounds(10, 10, 10, 10);
          j.addActionListener(this);
          getContentPane().setLayout(null);
          getContentPane().add(l);
          getContentPane().add(j);
          show();
     public rowePrint(String s){
          printType = s;
     public void paint(Graphics g) {
          g.setFont(new Font("Serif", Font.BOLD, 18));
          g.drawString(promotion, 20, 30);
          g.setFont(new Font("SansSerif", Font.PLAIN, 4));
          g.drawString("" + new java.util.Date(), 20, 37);
          g.setFont(new Font("Serif", Font.BOLD, 21));
          g.drawString("Rowe Furniture", 440, 35);
          g.fillRect(440, 40, 145, 25);
          g.setColor(Color.white);
          fm = g.getFontMetrics(new Font("Serif", Font.BOLD, 21));
          g.drawString(printType, 512 - (fm.stringWidth(printType) / 2), 60);
    public int print(Graphics g, PageFormat pf, int pi) throws PrinterException {
        if (pi >= 1) {
            return Printable.NO_SUCH_PAGE;
          paint(g);
        return Printable.PAGE_EXISTS;
}

How do a report a hotspot fault

Similar Messages

Maybe you are looking for