Form getting held after a report sent to printer directly.

Hii
I am using developer 6i.
From a form i am sending a report direct to printer using run_product & adding printer parameter.
That works fine, but after the report is sent to printer the form gets held. It doesnt do anything e.g. query etc. Nothing happens by clicking on F7 or F8.
Can anyone give an idea ?
Regards
Capri !!!

Did you try specifying the commmode as ASYNCHRONOUS. This may help.
NumbNutz

Similar Messages

Forms gets hang after 15 mins in 11.5.10.2

Hi,
I have cloned an instance from production. Now my forms in production are getting hanged after 15 mins but the development instance is running fine. The EBS version is 11.5.10.2. Linux RedHat 4.0. Jserv 1.1.
Everytime this is happening at 15-20 mins interval. I have seen the log files in iAS_HOME/Apache but they are clean.
Can anyone plz help on this.
Thanks.
Neeraj.

Rapid Clone does not modify the source system. adpreclone.pl prepares the source system to be cloned by collecting information about the database and creating generic templates of files containing source specific hardcoded values.
I suggest you use Forms Runtime Diagnostics (FRD) to debug the issue, for more details on how to use it please check Note: 150168.1 - Obtaining Forms Runtime Diagnostics (FRD) In Oracle Applications 11i
https://metalink.oracle.com/metalink/plsql/ml2_documents.showDocument?p_database_id=NOT&p_id=150168.1

If I print an email after it's sent, it prints out Subj, from,date,to and text info. I want to print all this info before I send, not just the text. How?

If I address and compose an email and try to print it before I send it, it only prints the text, not the "Subject," "From, Date," and "To" lines in the email. After I send it, if I go into the sent register and print the same e-mail it prints out all these lines along with the text.
I want to print the email before I send it and have the print-out contain all these lines along with the text. How do I set Thunderbird to do this all the time?

You will get the details you want if you print from the draft folder.

REP-50159 - REP-50151 when report sent to printer

I am using weblogic 11 rel1 server.
REP-50159: The report generated successfully but distribution to destinations failed.
REP-50151: Destination ID truckers_all_location failed with error An error occurred while sending the file to the printer: LexmarkOptra - Cannot run program "C:\Oracle\Middleware\asinst_dev\config\reports\bin\rwlpr": CreateProcess error=2, The system cannot find the file specified..

Copy rwlpr.exe from Oracle_Home\bin to Oracle_Instance\config\reports\bin
This fixed a problem

Sending report output to printer directly (on Unix)

Hello.
Please help.
I was previously using LPD for printing my oracle character mode reports. Now we have migrated to a new versions which has more graphics and colours. Also, some of my new reports are in PDF format.
I would need some help sorting out how to configure my new printers (Deskjets and Laser - replacing some of my dot matrix).
I had created all my printers using SAM->Printers and Plotters->LP Spooler->Printers and Plotters
Also, i use Print Server Emulator programs running under Microsoft Windows to accept printjobs from queues and print.
Thank you in advance for a reply
YD

Check the reports job queue for the exact error message.
I doubt if this is a valid printer name. Check if this printer is defined on the server. It can also be that the user that runs the Oracle reports service has no access to the printer.

10g Form gets Frozen

Hello all,
We are using Oracle 10g forms as a web aplication, and one of our forms gets frozen after being used for some time, this doesn't happen all the time, and this issue has nothing to do with any query (we have run traces an all the queries look ok).
More details...
Whithin this form we have a window with a lot of items (buttons, check, text fields, trees, lists), the Enable, Visible and Navigatable properties of these items are changed based on user's selection, this could happend several times (some times more than 30).
As we haven't been able to find the root cause of this in the code, I believe the issue could be that the porperty of the items are being changed a lot of times, and this might cause a memory issue on the JVM or something like that.
Has anyone faced with a similar issue?
BTW, we don´t get any error message, the entire application gets frozen, we can't even open the Java console.
Thanks.

Hi.
I have the same situation here. I am using forms 10.1.2.3 with latest patch applied. On the client side there is JRE 1.6.14. No matter if I use IE or Mozilla the form or better to say whole browser gets frozen. The most funny thing is this problem started with users who have got new computers. So on old computers there are no problems but on the new ones the browser gets freezed five to ten times per day. Our impression is this is happening in certain combionation with JDK and hardware. I should mention I have switched three users back to Jinitiator and there were no problems. The worst problem is there are no log or trace files when browser freezes.
I am sorry I could not help you but at least you will not feel you are alone. If I will manage to find some solution I will let you know.
Best regards.

HT204088 How long does it take to get a response or a credit after you 'Report a Problem' of a charge not being correct?

How long does it take to get a response or credit after you 'Report a Problme' w/ something billed to your account incorrectly?

Try again... you should get a response within 24 hours.
Use the email form here > Apple - Support - Mac App Store - Contact Support

Hi my iPhone 4 is stolen, I ve on it Igotya app. It sent me the pic and location of the *******. I don't know what to do next; a question plz does the phone get locked after 3 times of entering wrong password lock, thanks

Hi my iPhone 4 is stolen, I ve on it Igotya app. It sent me the pic and location of the *******. I don't know what to do next; a question plz does the phone get locked after 3 times of entering wrong password lock, thanks

What To Do If Your iDevice Is Lost Or Stolen
If your iPhone, iPod, iPod Touch, or iPad is lost or stolen what do you do? There are things you should do in advance - before you lose it or it's stolen - and some things to do after the fact. Here are some suggestions:
Reporting a lost or stolen Apple product
What-To-Do-When-Iphone-Is-Stolen
Lost or Stolen iPhone? Here’s What to do.
6 Ways to Track and Recover Your Lost/Stolen iPhone
It pays to be proactive by following the advice on using Find My Phone before you lose your device:
Find My iPhone
Setup your iDevice on MobileMe
How To Set Up Free Find Your iPhone (Even on Unsupported Devices

Production Reporting out put not getting deleted after 30mins what we set.

Hi,
This issue regarding Production Reporting. In the workspace the report output not getting deleted after 30minutes (while publishing the report settings were like delete after 30 mins). Any suggestions please .....
Thanks
Venkat

Hi Deepak,
Please chek the field / value which u have changed is relavant to printouts of the change.
You can check with following path
SPRO> MM > Purchasing > Message > Fields Relevant to Printouts of Changes.
Confirm tick is provided for PO ( P)
Vivek

Reports not getting posted after webserver bounce.

Hi Gurus,
The reports are not getting posted after the webserver bounce occurred. This is the same webserver on which report repository is located.
However if we boot this webserver first and run a report, then it gets posted. And then after all the other webservers are booted, then the issue does not occur.
Please advise.
Thanks

Sounds a bit like the problem described in this Oracle Solution: ID 660253.1?
https://support.oracle.com/CSP/main/article?cmd=show&type=NOT&doctype=PROBLEM&id=660253.1

How can I get Status of the report using after report trigger

I want to get Status of my report on GUI . I am aware that we can look into XMLP_SCHED_OUTPUT table to get all the required details but I am not aware as how I can pull data from this table and make it available on GUI screen. Or is there any way to use jobid of the report and use in Data template of the same report?
Any help on this will be greatly appreciated.

What/which GUI? One of your own making? Design it and query from the table(s) of interest, and populate fields based on the results. Which job ID? The latest or one of your choosing? Add a drop down list or menu and let the user select which job. Fairly vague requirements you've listed.

Selection Screen getting refreshed after execution..

Hello All,
I have a strange problem..
My selection-screen values are getting refreshed after execution and come back to selection screen. I am using normal ALV Fm to display the values. Can some suggest a possible reason?
Many thanks,
V Nair

No .. I have checked it..Selection variables are not getting refreshed.
My Code Below
REPORT yhr_icm_exception_report.
Type Pool declarations
TYPE-POOLS: slis,                                     "For AlV
            sdydo,                                    "Dynamic Documents
            icon.                                     "For ICON
Table declarations
TABLES : yhr_icm_exp_log,                             "ICM Exceptions Log
         yhr_icm_exp_hist.                            "ICM Exception History
Include Constants
INCLUDE   yhr_icm_constants .                         "Program to hold constants
Types declarations
*-To hold return field
TYPES: BEGIN OF ty_returntab.
        INCLUDE STRUCTURE ddshretval.                 "Interface Structure
TYPES: END OF ty_returntab.
*-To hold deletion records
TYPES : BEGIN OF ty_icm_del,
           tab_name      TYPE yhr_tabname,            "Internal table name
           objid         TYPE hrobjid,                "Object ID
           begda         TYPE begda,                  "Begin Date
           otype         TYPE otype,                  "Object Type
        END OF ty_icm_del.
*-Message details to be displayed
TYPES : BEGIN OF ty_message,
          msgnr          TYPE msgno,                 "System message number
          text           TYPE yhr_icm_exp_log-msgxx, "Message Text
        END OF ty_message.
*-To hold exception log
TYPES : BEGIN OF ty_icm_exp_log,
         msgno           TYPE msgnr,                  "Message number
         run_id          TYPE yhr_icm_erun_id,        "Exception Run ID
         delta_id        TYPE yhr_icm_run_id,         "Run ID
         record_type     TYPE yhr_icm_exp_type,       "Record Type
         otype           TYPE yhr_otype,              "Object Type
         objid           TYPE hrobjid,                "Object ID
         begda           TYPE begda,                  "Begin Date
         msgxx           TYPE msgxx,                  "Message
         status          TYPE yhr_icm_icon,           "Status
         delta_relevance TYPE yhr_delta_rel,          "Delta Relevance
        END OF ty_icm_exp_log.
*-To hold email attachment
TYPES: BEGIN OF ty_attach,
           text(500)     TYPE c,                      "Text
END OF ty_attach.
*To hold object type & text
TYPES :BEGIN OF ty_objid_text,
          objid          TYPE objid,                  "Object ID
          text           TYPE emnam,                  "Object Text
       END OF ty_objid_text.
*-To hold counter values - Exp , Del & historical
TYPES :BEGIN OF ty_count,
          exp(10)        TYPE c,                      "Exceptions
          del(10)        TYPE c,                      "Deletions
          hist(10)       TYPE c,                      "Historical Deletions
       END OF ty_count.
*- To hold lock details
TYPES : BEGIN OF ty_lock,
          live           TYPE c,                      "Live Callidus Program
          genr           TYPE c,                      "Generation Program
          exp            TYPE c,                      "Exception Program
        END OF ty_lock.
Range Declarations
RANGES :
       gr_objid          FOR hrp1001-objid,           "Range for Object ID
       gr_pernr          FOR pa0000-pernr.            "Range for Employee number
Internal Table Declarations
DATA : gt_records        TYPE STANDARD TABLE OF yhr_icm_exp_report,
       gt_objid_text     TYPE STANDARD TABLE OF ty_objid_text,
       gt_icm_exp_log    TYPE STANDARD TABLE OF ty_icm_exp_log,
       gt_returntab      TYPE STANDARD TABLE OF ty_returntab,
       gt_t777o          TYPE STANDARD TABLE OF t777o,
       gt_diff_tab       TYPE STANDARD TABLE OF yhr_icm_diff,
       gt_del_tab        TYPE STANDARD TABLE OF ty_icm_del, "#EC *
       gt_iattach        TYPE STANDARD TABLE OF ty_attach,
       gt_message        TYPE STANDARD TABLE OF ty_message,
       gt_fieldcat       TYPE slis_t_fieldcat_alv,
       gt_heading        TYPE slis_t_listheader,
       gt_exceptions     TYPE yhr_icm_exp_list_t,
       gt_events         TYPE slis_t_event.
Structure Declarations
DATA : gs_objid_text     TYPE ty_objid_text,
       gs_icm_exp_log    TYPE ty_icm_exp_log,
       gs_records        TYPE yhr_icm_exp_report,
       gs_exceptions     TYPE yhr_icm_exp_list,
       gs_count          TYPE ty_count,
       gs_fieldcat       TYPE slis_fieldcat_alv,            "#EC *
       gs_returntab      TYPE ty_returntab,
       gs_icm_exp_hist   TYPE yhr_icm_exp_hist,
       gs_iattach        TYPE ty_attach,
       gs_message        TYPE ty_message,                   "#EC *
       gs_layout         TYPE slis_layout_alv,
       gs_t777o          TYPE t777o,
       gs_lock           TYPE ty_lock.
Constant declarations
CONSTANTS:
       c_yes             TYPE string        VALUE 'YES',
       c_no              TYPE string        VALUE 'NO',
       c_true            TYPE c             VALUE 'X',
       c_deletions       TYPE c             VALUE 'D',
       c_delta_no        TYPE c             VALUE 'N',
       c_delta_yes       TYPE c             VALUE 'Y',
       c_historical      TYPE c             VALUE 'H',
       c_a               TYPE c             VALUE 'A',
       c_error           TYPE c             VALUE 'E',
       c_equal(2)        TYPE c             VALUE 'EQ',
       c_participants    TYPE c             VALUE 'P',
       c_include         TYPE c             VALUE 'I',
       c_position        TYPE c             VALUE 'S',
       c_organization    TYPE c             VALUE 'O',
       c_runlock         TYPE string        VALUE 'RUN_LOCK',
       c_parameter       TYPE string        VALUE 'P',
       c_selfield        TYPE string        VALUE 'SEL_FIELD' ,
       c_type            TYPE string        VALUE 'TYPE',
       c_topofpage       TYPE string        VALUE 'TOP_OF_PAGE',
       c_rectype         TYPE string        VALUE ' S_RECTYPE',
       c_objectkey       TYPE string        VALUE 'OBJECTKEY1',
       c_icon_green      TYPE string        VALUE '@08@',
       c_icon_red        TYPE string        VALUE '@0A@',
       c_icon_amber      TYPE string        VALUE '@09@',
       c_green           TYPE string        VALUE 'GREEN',
       c_amber           TYPE string        VALUE 'AMBER',
       c_red             TYPE string        VALUE 'RED',
       c_tabname         TYPE slis_tabname VALUE 'GT_RECORDS',
       c_structname      TYPE dd02l-tabname VALUE 'YHR_ICM_EXP_REPORT' ,
       c_siwb_wallpaper TYPE sdydo_key     VALUE 'SIWB_WALLPAPER',
       c_user_command    TYPE slis_formname VALUE 'F01_ALV_EVENT_USER_COMMAND',
       c_genname         TYPE trdir-name    VALUE 'YHR_ICM_GENERATE_EXCEPTIONS',
       c_expname         TYPE trdir-name    VALUE 'YHR_ICM_EXCEPTION_REPORT',
       c_pf_status       TYPE slis_formname VALUE 'SET_PF_STATUS',
       c_msg_class       TYPE string        VALUE 'YHR_ICM'.
Global Variable Declarations
DATA: gv_email_error    TYPE c,
       gv_email_sent     TYPE c,
       gv_exit           TYPE c.
Selection Screen - Block I
SELECTION-SCREEN:   BEGIN OF BLOCK b3 WITH FRAME TITLE text-s07.
SELECT-OPTIONS:
*- Run ID
    s_run_id             FOR yhr_icm_exp_hist-run_id,
*- Exception Type
    s_rectyp             FOR yhr_icm_exp_log-record_type NO INTERVALS,
*- Object Type
    s_otype              FOR yhr_icm_exp_log-otype NO INTERVALS,
*- Object ID
    s_objid              FOR yhr_icm_exp_log-objid NO INTERVALS,
*- Start Date
    s_begda              FOR yhr_icm_exp_log-begda,
*- Message number
    s_msgno              FOR yhr_icm_exp_log-msgno,
*- Message Text
    s_msgxx              FOR yhr_icm_exp_log-msgxx.
SELECT-OPTIONS:
*- Delta Relevance
   s_relv                FOR yhr_icm_exp_log-delta_relevance NO INTERVALS.
PARAMETERS:
*- Long Text
   p_ltext               AS   CHECKBOX DEFAULT ' '.
SELECTION-SCREEN:   END OF BLOCK b3.
Selection Screen - Block II
SELECTION-SCREEN:   BEGIN OF BLOCK b2 WITH FRAME TITLE text-s08.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(14) text-033.
*-Sucess
PARAMETERS:
p_stat_s               AS CHECKBOX.                  "D11K917251
SELECTION-SCREEN COMMENT 24(14) text-034.
*-Warning
PARAMETERS:
p_stat_w               AS CHECKBOX.                  "D11K917251
SELECTION-SCREEN COMMENT 48(15) text-035.
PARAMETERS:
*-Error
p_stat_e               AS CHECKBOX .                 "D11K917251
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN:   END OF BLOCK b2.
Selection Screen - Block III
SELECTION-SCREEN:   BEGIN OF BLOCK b4 WITH FRAME TITLE text-s09.
*-Email Details
PARAMETERS:
p_email(128)            TYPE c.
SELECTION-SCREEN:   END OF BLOCK b4.
             Selection Screen on value request.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR s_msgno-low.
PERFORM f4_message.
             Selection Screen Output.
AT SELECTION-SCREEN OUTPUT.
CHECK gt_returntab[] IS NOT INITIAL.
REFRESH s_msgno.
s_msgno-option = c_equal.
s_msgno-sign = c_include.
LOOP AT gt_returntab INTO gs_returntab.
    s_msgno-low = gs_returntab-fieldval.
    s_msgno-high = space.
    APPEND s_msgno.
ENDLOOP.
At Selection Screen for Validation
AT SELECTION-SCREEN.
CLEAR gv_email_error.
*-Validate Object Type
PERFORM validate_objecttype.
*-Validate Exception ID
PERFORM fetch_exp_header.
*-Validate Exception Type
PERFORM validate_exptype.
*-Validate Message Number
PERFORM validate_msgno.
*-Validate Message Type
PERFORM validate_msgtype.
*-Validate Delta
PERFORM validate_delta.
*-Validate Email ID
PERFORM validate_email USING p_email
                         CHANGING gv_email_error.
IF gv_email_error IS NOT INITIAL.
    MESSAGE e000(yhr_icm) WITH text-027.
ENDIF.
Initialization
INITIALIZATION.
Initialization
PERFORM initialization.
Start Of Selection
START-OF-SELECTION.
CLEAR : gv_email_error,
          gv_email_sent,
          gv_exit,
          gs_lock.
Try locking the main program
PERFORM lock_generation_program.
CHECK gs_lock IS INITIAL.
*-Fetch the messages stored in table
PERFORM fetch_item_records.
Read object type text.
PERFORM read_text.
Get Object Text
PERFORM get_object_text.
*-Fetch the current SAP messages
PERFORM fetch_records.
*-Update Delta Flag
PERFORM update_delta_flag.
*-Compare messages in table & in SAP
PERFORM compare_message.
If receiver is not blank, try sending out mail
PERFORM send_mail USING p_email.
End Of Selection
END-OF-SELECTION.
IF gv_exit IS NOT INITIAL.
    EXIT.
ENDIF.
*-Display ALV
PERFORM display_alv.
*-Build the event table for ALV display
PERFORM build_eventtab CHANGING gt_events[].
*-Fill the layout details
PERFORM layout_build .
Release all locks
PERFORM release_locks.
*-Finally call the grid display
PERFORM display_data.
*&      Form set_pf_status
      text
     -->RT_EXTAB   text
FORM set_pf_status USING rt_extab TYPE slis_t_extab.        "#EC *
Set PF Status
SET PF-STATUS 'STANDARD'.
ENDFORM. "Set_pf_status
*&      Form DISPLAY_ALV
      text
--> p1        text
<-- p2        text
FORM display_alv .
*- Use FM to create field catalog
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_program_name         = sy-repid
      i_internal_tabname     = c_tabname
      i_structure_name       = c_structname
    CHANGING
      ct_fieldcat            = gt_fieldcat
    EXCEPTIONS
      inconsistent_interface = 1
      program_error          = 1
      OTHERS                 = 1.
IF sy-subrc = 1.
    MESSAGE i000(yhr_icm) WITH text-001.
    EXIT.
ENDIF.
*- Remove SEL Field Column as it is not required
DELETE gt_fieldcat WHERE fieldname = c_selfield.
*-If user chooses long text, activate icon
IF p_ltext IS INITIAL.
    LOOP AT gt_fieldcat INTO gs_fieldcat WHERE fieldname = c_type.
      gs_fieldcat-icon = c_true.
    ENDLOOP.
ENDIF.
ENDFORM.                    " DISPLAY_ALV
*&      Form BUILD_EVENTTAB
      text
     <--P_GT_EVENTS[] text
FORM build_eventtab CHANGING    p_events TYPE slis_t_event.
DATA: ls_event TYPE slis_alv_event.
*-Get the list of event for alv
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type = 0
    IMPORTING
      et_events   = p_events.
*-Add top of page event to event list
READ TABLE p_events
        WITH KEY name = slis_ev_top_of_page
         INTO ls_event.
IF sy-subrc = 0.
    MOVE c_topofpage TO ls_event-form.
    APPEND ls_event TO p_events.
ENDIF.
ENDFORM.                    " BUILD_EVENTTAB
*&      Form LAYOUT_BUILD
      text
--> p1        text
<-- p2        text
FORM layout_build .
gs_layout-zebra                = c_true.
gs_layout-colwidth_optimize    = c_true.
gs_layout-detail_popup         = c_true.
gs_layout-detail_initial_lines = c_true.
gs_layout-detail_titlebar      = text-044.
gs_layout-box_fieldname        = c_selfield.
ENDFORM.                    " LAYOUT_BUILD
*&      Form DISPLAY_DATA
      text
--> p1        text
<-- p2        text
FORM display_data .
*-Display ALV display
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_user_command = c_user_command
      i_background_id          = c_siwb_wallpaper
      i_callback_program       = sy-repid
      i_callback_pf_status_set = c_pf_status
      i_default                = c_true
      i_save                   = c_a
      is_layout                = gs_layout
      it_fieldcat              = gt_fieldcat
      it_events                = gt_events
    TABLES
      t_outtab                 = gt_records.
ENDFORM.                    " DISPLAY_DATA
*&      Form FETCH_RECORDS
      text
--> p1        text
<-- p2        text
FORM fetch_records .
REFRESH : gt_diff_tab,
            gt_del_tab,
            gr_pernr,
            gt_exceptions.
CLEAR:    gs_icm_exp_log.
*-Get Employee details
PERFORM get_person_data.
*-Get Position Details
PERFORM get_position_data.
*-Get Organization Details
PERFORM get_org_data.
*-Get Exception current SAP exception list.
PERFORM get_exception_list.
*-Add deletion records
PERFORM filter_deletions.
ENDFORM.                    " FETCH_RECORDS
*&      Form top_of_page
      text
FORM top_of_page.                                           "#EC *
PERFORM build_comment   USING    gt_heading.
*-Display Use FM to display Top Of Page
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = gt_heading[].
CLEAR gt_heading.
ENDFORM.                    "TOP_OF_PAGE
*&      Form build_comment
      text
     -->P_HEADING text
FORM build_comment USING p_heading TYPE slis_t_listheader.
DATA: ls_hline     TYPE slis_listheader,
        lv_text(120) TYPE c.
*-Display report title
ls_hline-typ = c_historical.
WRITE text-006 TO lv_text.
ls_hline-info = lv_text.
APPEND ls_hline TO p_heading.
CLEAR ls_hline.
ls_hline-typ = c_s.
*-Remove leading & trailing spaces
CONDENSE : gs_count-del, gs_count-exp, gs_count-hist.
*-If the count is space then pass 0
IF gs_count-del = space.
    gs_count-del = 0.
ENDIF.
IF gs_count-exp = space.
    gs_count-exp = 0.
ENDIF.
IF gs_count-hist = space.
    gs_count-hist = 0.
ENDIF.
IF gs_lock IS INITIAL.
*-Display Deletion, Exception, Historical Count
    CONCATENATE text-037 gs_count-del
                 text-032 gs_count-exp
                 text-039 gs_count-hist
            INTO ls_hline-info SEPARATED BY space.
ELSEIF gs_lock-live IS NOT INITIAL.
    ls_hline-info = text-007.
ELSEIF gs_lock-genr IS NOT INITIAL.
    ls_hline-info = text-008.
ELSEIF gs_lock-exp IS NOT INITIAL.
    ls_hline-info = text-009.
ENDIF.
APPEND ls_hline TO p_heading.
CLEAR ls_hline.
ENDFORM.                    "BUILD_COMMENT
*&      Form INITIALIZATION
      text
--> p1        text
<-- p2        text
FORM initialization .
Read Previous run
SELECT MAX( run_id )
   INTO s_run_id-low
   FROM yhr_icm_exp_hist.                                  "#EC *
s_run_id-option = c_equal.
s_run_id-sign = c_include.
APPEND s_run_id.
s_rectyp-option = c_equal.
s_rectyp-sign = c_include.
s_rectyp-low = c_error.
APPEND s_rectyp.
s_rectyp-low = c_deletions.
APPEND s_rectyp.
PERFORM restrict_selections.
*Get the message from Message Class YHR_ICM
SELECT msgnr
         text
    FROM t100
    INTO TABLE gt_message
   WHERE arbgb = c_msg_class AND
         msgnr GT '000'.                                    "#EC *
ENDFORM.                    " INITIALIZATION
*&      Form F4_MESSAGE
      text
     <--P_P_MSGNO text
FORM f4_message.
F4 Help - Display all messages
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield        = 'MSGNR'
      dynpprog        = sy-cprog
      dynpnr          = sy-dynnr
      dynprofield     = 'S_MSGNR'
      window_title    = text-045
      value_org       = c_s
      multiple_choice = c_true
    TABLES
      value_tab       = gt_message
      return_tab      = gt_returntab
    EXCEPTIONS
      parameter_error = 1
      no_values_found = 2
      OTHERS          = 1.
IF sy-subrc = 1.
    MESSAGE i000(yhr_icm) WITH text-002.
    EXIT.
ELSEIF sy-subrc = 2.
    MESSAGE i000(yhr_icm) WITH text-003.
    EXIT.
ENDIF.
ENDFORM.                    " F4_MESSAGE
*&      Form VALIDATE_OBJECTTYPE
      text
--> p1        text
<-- p2        text
FORM validate_objecttype .
CHECK s_otype-low IS NOT INITIAL.
CONDENSE s_otype-low.
Validate object type to check whether user has entered only S, P or O
IF s_otype-low NE c_organization AND
        s_otype-low NE c_position AND
          s_otype-low NE c_participants .
    MESSAGE e000(yhr_icm) WITH 'Enter either S(Position), P(Person) or O(Org Unit)'(021).
ENDIF.
ENDFORM.                    " VALIDATE_OBJECTTYPE
*&      Form VALIDATE_OBJECTTYPE
FORM f01_alv_event_user_command USING r_ucomm LIKE sy-ucomm
                                      rs_selfield TYPE slis_selfield."#EC *
DATA : lv_answer TYPE c,
         lt_fields TYPE STANDARD TABLE OF sval,
         ls_fields TYPE sval.
*-Get the row user has selected in ALV list
READ TABLE gt_records INTO gs_records INDEX rs_selfield-tabindex.
CASE r_ucomm.
    WHEN 'DISP'.
      CASE gs_records-otype.
        WHEN 'S'.
          SET PARAMETER ID 'POT' FIELD gs_records-otype.
          SET PARAMETER ID 'PON' FIELD gs_records-objid.
          CALL TRANSACTION 'PP01_DISP' AND SKIP FIRST SCREEN.
        WHEN 'P'.
          SET PARAMETER ID 'PER' FIELD gs_records-objid.
          CALL TRANSACTION 'PA20' AND SKIP FIRST SCREEN.
        WHEN 'O'.
          SET PARAMETER ID 'POT' FIELD gs_records-otype.
          SET PARAMETER ID 'PON' FIELD gs_records-objid.
          CALL TRANSACTION 'PP01_DISP' AND SKIP FIRST SCREEN.
      ENDCASE.
    WHEN 'CHNG'.
      CASE gs_records-otype.
        WHEN 'S'.
          SET PARAMETER ID 'POT' FIELD gs_records-otype.
          SET PARAMETER ID 'PON' FIELD gs_records-objid.
          CALL TRANSACTION 'PP01' AND SKIP FIRST SCREEN.
        WHEN 'P'.
          SET PARAMETER ID 'PER' FIELD gs_records-objid.
          CALL TRANSACTION 'PA30' AND SKIP FIRST SCREEN.
        WHEN 'O'.
          SET PARAMETER ID 'POT' FIELD gs_records-otype.
          SET PARAMETER ID 'PON' FIELD gs_records-objid.
          CALL TRANSACTION 'PP01' AND SKIP FIRST SCREEN.
      ENDCASE.
    WHEN 'EMAIL'.
*-    Check whether email has already been sent
      IF gv_email_sent = c_true.
*-      If yes, then display pop up to confirm for mailing again
        CALL FUNCTION 'POPUP_TO_CONFIRM'
          EXPORTING
            text_question = text-041
            text_button_1 = text-042
            text_button_2 = text-043
          IMPORTING
            answer         = lv_answer
          EXCEPTIONS
            text_not_found = 1
            OTHERS         = 1.
        IF sy-subrc = 1.
          MESSAGE i000(yhr_icm) WITH text-004.
          EXIT.
        ENDIF.
*-     Continue only if user has selected Yes
        CHECK lv_answer = '1'.
      ENDIF.
*-      Add Email Field & Table
      ls_fields-tabname = 'SZA5_D0700'.
      ls_fields-fieldname = 'SMTP_ADDR'.
      APPEND ls_fields TO lt_fields.
*-      Use FM to get new Email ID
      CALL FUNCTION 'POPUP_GET_VALUES'
        EXPORTING
          popup_title     = text-s09
          start_column    = '5'
          start_row       = '5'
        TABLES
          fields          = lt_fields
        EXCEPTIONS
          error_in_fields = 1
          OTHERS          = 1.
      IF sy-subrc = 1.
        MESSAGE i000(yhr_icm) WITH text-004.
        EXIT.
      ENDIF.
*-    Get the Email user has entered
      READ TABLE lt_fields INTO ls_fields INDEX 1.
*-      Validate Email ID
      PERFORM validate_email USING ls_fields-value
                     CHANGING gv_email_error.
*-    If the flag is not initial, indicates possible error
      IF gv_email_error IS NOT INITIAL.
        MESSAGE i000(yhr_icm) WITH text-027.
        EXIT.
      ELSE.
      If no error, then try ending email
        PERFORM send_mail USING ls_fields-value.
      ENDIF.
    WHEN 'REFRESH'.
*-    Fetch the current SAP messages
      PERFORM fetch_records.
*-    Update Delta Flag
      PERFORM update_delta_flag.
*-    Compare messages in table & in SAP
      PERFORM compare_message.
*-    Refresh alv which is already displayed
      rs_selfield-refresh = c_true.
ENDCASE.
ENDFORM.                    "F01_ALV_EVENT_USER_COMMAND
*&      Form RESTRICT_SELECTIONS
      text
--> p1        text
<-- p2        text
FORM restrict_selections .
TYPE-POOLS sscr.
STATICS: lt_restrict TYPE sscr_restrict,
           lt_opt_list TYPE sscr_opt_list,
           ls_***      TYPE sscr_***.
Restrict the wage type selection so the user can only enter
values with the 'EQ' clause.
CLEAR lt_opt_list.
MOVE c_objectkey TO lt_opt_list.
MOVE c_true TO: lt_opt_list-options-eq,
                  lt_opt_list-options-bt,
                  lt_opt_list-options-cp,
                  lt_opt_list-options-eq,
                  lt_opt_list-options-ge,
                  lt_opt_list-options-gt,
                  lt_opt_list-options-le,
                  lt_opt_list-options-lt.
APPEND lt_opt_list TO lt_restrict-opt_list_tab.
MOVE: c_s         TO ls_***-kind,
        c_rectype   TO ls_***-name,
        c_include         TO ls_***-sg_main,
        space       TO ls_***-sg_addy,
        c_objectkey TO ls_***-op_main.
APPEND ls_***     TO lt_restrict-***_tab.
*-Restrict the values OTYPE
MOVE 'S_OTYPE'    TO ls_***-name.
APPEND ls_***      TO lt_restrict-***_tab.
*-Restrict the values OBJID
MOVE    'S_OBJID' TO ls_***-name.
APPEND ls_***      TO lt_restrict-***_tab.
*-Use FM to restrict the values
CALL FUNCTION 'SELECT_OPTIONS_RESTRICT'
    EXPORTING
      restriction = lt_restrict.
ENDFORM.                    " RESTRICT_SELECTIONS
*&      Form GET_PERSON_DATA
      text
--> p1        text
<-- p2        text
FORM get_person_data .
DATA : lt_del_tab TYPE STANDARD TABLE OF yhr_icm_diff.
SORT gt_icm_exp_log BY msgno .
gr_pernr-sign = c_include.
gr_pernr-option = c_equal.
LOOP AT gt_icm_exp_log INTO gs_icm_exp_log WHERE otype = c_participants AND
                                                   record_type = c_error.
*- Sort the table based on msgno and collect pernr
    gr_pernr-sign = c_include.
    gr_pernr-option = c_equal.
    gr_pernr-low = gs_icm_exp_log-objid.
    APPEND gr_pernr.
    CLEAR gr_pernr-low.
    AT END OF msgno.                                        "#EC *
*-    For the list of Pernr having same PERNR get the current exp details
      IF gs_icm_exp_log-msgno = c_msg_100.
*-      Export the pernr list to memory id & import in the below FM
*-      Selection of records should be based on values exported from here
        EXPORT gr_pernr TO MEMORY ID 'PERNR_0001'.
      Get Org Assignment 0001 Data
        CALL FUNCTION 'Y_HR_DIFF_PERNR_0001_DATA'
          EXPORTING
            period_begda = gs_icm_exp_hist-begda
            period_endda = gs_icm_exp_hist-endda
            refresh      = space
            UPDATE       = space
          TABLES
            diff_tab     = gt_diff_tab
            del_tab      = lt_del_tab.
    ELSEIF gs_icm_exp_log-msgno = c_msg_101. "Y_HR_DIFF_PERNR_0001_ORG_DATA
      ELSEIF gs_icm_exp_log-msgno = c_msg_102 .
        EXPORT gr_pernr TO MEMORY ID 'PERNR_0000'.
      Get Actions 0000 Data
        CALL FUNCTION 'Y_HR_DIFF_PERNR_0000_DATA'
          EXPORTING
            period_begda = gs_icm_exp_hist-begda
            period_endda = gs_icm_exp_hist-endda
            refresh      = space
            UPDATE       = space
          TABLES
            diff_tab     = gt_diff_tab
            del_tab      = lt_del_tab.
      ELSEIF gs_icm_exp_log-msgno = c_msg_103.
        EXPORT gr_pernr TO MEMORY ID 'PERNR_0002'.
      Get Personal Details 0002 Data
        CALL FUNCTION 'Y_HR_DIFF_PERNR_0002_DATA'
          EXPORTING
            period_begda = gs_icm_exp_hist-begda
            period_endda = gs_icm_exp_hist-endda
            refresh      = space
            UPDATE       = space
          TABLES
            diff_tab     = gt_diff_tab
            del_tab      = lt_del_tab.
      ELSEIF gs_icm_exp_log-msgno = c_msg_104.
        EXPORT gr_pernr TO MEMORY ID 'PERNR_0004'.
      Get Disability 0004 Data
        CALL FUNCTION 'Y_HR_DIFF_PERNR_0004_DATA'
          EXPORTING
            period_begda = gs_icm_exp_hist-begda
            period_endda = gs_icm_exp_hist-endda
            refresh      = space
            UPDATE       = space
          TABLES
            diff_tab     = gt_diff_tab
            del_tab      = lt_del_tab.
      ELSEIF gs_icm_exp_log-msgno = c_msg_105.
        EXPORT gr_pernr TO MEMORY ID 'PERNR_0006'.
      Get Addresses 0006 Data
        CALL FUNCTION 'Y_HR_DIFF_PERNR_0006_DATA'
          EXPORTING
            period_begda = gs_icm_exp_hist-begda
            period_endda = gs_icm_exp_hist-endda
            refresh      = space
            UPDATE       = space
          TABLES
            diff_tab     = gt_diff_tab
            del_tab      = lt_del_tab.
      ELSEIF gs_icm_exp_log-msgno = c_msg_106.
        EXPORT gr_pernr TO MEMORY ID 'PERNR_0007'.
      Get Planned Time 0007 Data
        CALL FUNCTION 'Y_HR_DIFF_PERNR_0007_DATA'
          EXPORTING
            period_begda = gs_icm_exp_hist-begda
            period_endda = gs_icm_exp_hist-endda
            refresh      = space
            UPDATE       = space
          TABLES
            diff_tab     = gt_diff_tab
            del_tab      = lt_del_tab.
      ELSEIF gs_icm_exp_log-msgno = c_msg_107.
        EXPORT gr_pernr TO MEMORY ID 'PERNR_0016'.
      Get Contract Element 0016 Data
        CALL FUNCTION 'Y_HR_DIFF_PERNR_0016_DATA'
          EXPORTING
            period_begda = gs_icm_exp_hist-begda
            period_endda = gs_icm_exp_hist-endda
            refresh      = space
            UPDATE       = space
          TABLES
            diff_tab     = gt_diff_tab
            del_tab      = lt_del_tab.
      ELSEIF gs_icm_exp_log-msgno = c_msg_108.
        EXPORT gr_pernr TO MEMORY ID 'PERNR_0077'.
      Get Additional Personal 0077 Data
        CALL FUNCTION 'Y_HR_DIFF_PERNR_0077_DATA'
          EXPORTING
            period_begda = gs_icm_exp_hist-begda
            period_endda = gs_icm_exp_hist-endda
            refresh      = space
            UPDATE       = space
          TABLES
            diff_tab     = gt_diff_tab
            del_tab      = lt_del_tab.
      ELSEIF gs_icm_exp_log-msgno = c_msg_109 .
        EXPORT gr_pernr TO MEMORY ID 'PERNR_0105'.
      Get Communications 0105 Data
        CALL FUNCTION 'Y_HR_DIFF_PERNR_0105_DATA'
          EXPORTING
            period_begda = gs_icm_exp_hist-begda
            period_endda = gs_icm_exp_hist-endda
            refresh      = space
            UPDATE       = space
          TABLES
            diff_tab     = gt_diff_tab
            del_tab      = lt_del_tab.
      ELSEIF gs_icm_exp_log-msgno = c_msg_110.
        EXPORT gr_pernr TO MEMORY ID 'PERNR_2001'.
      Get Absences 2001 Data
        CALL FUNCTION 'Y_HR_DIFF_PERNR_2001_DATA'
          EXPORTING
            period_begda = gs_icm_exp_hist-begda
            period_endda = gs_icm_exp_hist-endda

Reports attachement pdf printing after report printing

Oracle : 9.2.0.6
forms 6.0.8 reports
os : linux :
I have a peculear requirement for the inhouse application.
I generate a standard Purchase order report with normal requirements using d2k reports. This report is being printed as soon as the transaction commits and goes to the printer.
The Purchase order comes in 2 pages dependsing on the items and terms and conditions.
I have a standard Pdf doc comp_prof.pdf (which changes regular intervals conists of various comp. info and not related any database activity).
Currently this information is being printed manually after the Purchaae order is being printed.
I tried to incorporated in after report trigger. I was not succesful.
Pl. help what are the various options I have to solve this.
If I convert a PO to mail this doc also should go.

the pdf need to print is not from oracle d2k report. That is pdf is a particular location. The pdf is not getting generated form oracle or any d2k component.
It is a standard any pdf doc consists of 3 page information.

How to know the report has already been sent to printer?

Dear All,
I have one problem to check that the report has been printed on paper through a printer after user already previewed and pressed Printer button. Is there any parameter will be sent back from system to inform the program? Please suggest me if you have developed or solved this problem.
Thank you in advance.
Pawinee H.
e-mail: [email protected]
null

Yes. I ran the code example and it ran successfully.
So if we wanna generate report by java code, we should use the code as a http client to access report server to do it.
I think we could use url http://server:port/reports/rwservlet/showjobid to know the status of generating report (i.e. successful or failed).
And one more question is that could I get the jobid by any url as soon as I generate my report?
Thanks a lot.
Best Regards.

Getting the old EWA reports

Dear Forum,
I had a problem with the EWA reports on our Solman from the satellite systems. It got a syntax error, since solman tried to execute the session that was obsolette. Then I got a solution by refreshing service definision as in the note 727998. For the first trials I did it on one of the satellite systems and the solman. It worked and I was able to get the old EWA that failed before.
Now there are still some old EWA on the satellite systems that were not sent to solman, yet. I have tried to send them by executing send session data in SDCCN, but nothing came to solman. It is a solman 3.2. The weekly EWA works fine, the sessions are ready on the satellite systems.
So, my question is how to get the old EWA reports that generated by the old session?
Regards
Agoes

Hi Mathias,
Thanks for your reply.
Andy Lam from OSS helped me with this solution:
==========================
05.07.2007 - 03:35:19 CET SAP Reply
Hello Agoes,
Move your mouse pointer to the grey diamond icon and there will be a
popup of the session no.
Copy it down and goto txn DSA -> Selected Session -> put in the session
no. -> enter
Double click on the session number and on the left panel, right click
on the "EarlyWatch Alert" -> Session Components -> Reset.
Then double click on "EarlyWatch Alert" -> EN language
Then the system to try to regenerate the report again.
If this still comes out with the Grey Diamond status, please kindly
revert this message back to me and I will have my SV-SMG-SDD colleague
to look into it.
Thanks & Best Regards
Andy Lam
Active Global Support - SolMan & Technology (APA Timezone UTC+8)
==========================
After this process, I need to send them manually to the people that should receive the EWA reports.
Many thanks to Andy.
Regards,
Agoes

Form getting held after a report sent to printer directly.

Similar Messages

Maybe you are looking for