Execution of a report after execution of a transaction automatically

Dear All,
i want to execute one standard report after the completion of one transaction.
Can any body guide me in how to do this without executing the report separetly means the report should be called after the completion of the transaction automatically.
I dont want to use workflow also so is there any other way?
Warm Regards,
N.Jain

Hello,
What i understood was that you need to run a standard transaction after another transaction to run automatically.....
it is possible if the program for the first t-code is that of a 'Zprogram'
so in the program for the first tcode..if it is performing an operation and does not need user interaction(like user inputs) then in the end of the code,You need to
do a call transaction and return <b>or</b> Submit program and return
wherein you need to pass all sufficient parameters to the second program
Reward if helpful
Regards
Byju

Similar Messages

F4 help in alv report ( after execution )

hi all,
i want f4 help in my alv report( after execute it) in a particular filed.
is this possible???
In Advance Thanks
Amit Singh

hi,
use ref_fieldname and ref_tabname
like below
wa_fieldcat-ref_fieldname= 'NAME1'.
wa_fieldcat-ref_tabname = 'KNA1'.
Hope this helps
Regards
Ritesh J

How to capture the first execution of a report

Hi,
I am executing a report in background. The first time the report is executed I have to do a different processing. After the 1st execution I have to different processing.
Someone please tell me how to capture the 1st execution of a report. Is there a system variable ?
Appreciate your <removed by moderator> response.
Thanks,
Dikshitha G
Edited by: Thomas Zloch on May 12, 2011 11:36 AM

Keshav.T wrote:
Are you going to create a Z table for this ???? ... Is there nobody to advice you in your firm ???
Hello Keshav,
A couple of years ago i would have recommended using the INDX table, but it has got it's demerits.
Maintenance of Z-table is easier than the INDX table. Say there is some error in the program & you want to override the flag. Will it be easier to do so in the INDX table or via SM30 for the Z-Table?
As a matter-of-fact i will recommend using the solution provided by Florian the TVARVC technique.
1. Create a parameter(specific to your program) & transport it.(See the trxn STVARV)
2. In your program check the value of this param & set it accordingly.
Using TVARVC you will 2 birds with one stone:
1. You don't have to create a custom table.
2. Easy maintenance via STVARV trxn.
Hope you get the point!
Cheers,
Suhas
PS: In our system we have a Z-table designed specifically for this particular purpose. All the programs having this kind of requirement refer to this table.

Sequence of events execution in ABAP reports

can anyone explain me the Sequence of events execution in ABAP reports

Ámit Güjärgoüd wrote:
> search-before-post Event Must before any posting.Else <delete-after-input event triggered by moderator> would be trigger and thread may be going to Dump as well without ST22 information(What haapend,How to correct error) available
>
> Edited by: Ámit Güjärgoüd on Oct 7, 2008 7:42 AM
this looks perfect ABAP event sequence example.

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

Why status is change every time after execution of VI??

Hello,
I am not much familiar with Modbus communication,
I got one problem regarding to Modbus that when ever run my vi then after execution the status of DO3 is always changed and jump to the Alarm mode.
In attachment I have attached my screen shots you will get more clear Idea about my problem.
In LHS there is software window and before connection that software with instrument normally I set my DO3 at status mode but when I run my vi in order to check the supply voltage and after execution when I again connect that software then DO3 status always change and its come to Alarm mode.
Can you tell me that why its happen so??
and what kind of changes I have to do in order to avoid this problem....
Thank you very much.
Attachments:
DO3.png ‏386 KB

ok this problem is solve now that i have to make read holding register instead of write...
but still I am confuse about the mesurment of voltage generally i have to set like
1) when (Do3 and datalogger switch both are closed) wired is connected with DO3 and relay on data logger is closed then its shoud show me voltage less then 2V,
2)DO3 is open and datalogger is connected then voltage shoud be near to V+ (12v in my case)
3)both are open then output shoud be 0V
4)datalogger is open and DO3 is closed then voltage shoud be V+
and in above four case i have problem in 1st case only...other 3 are working OK
will you please guide me that is ther any change I have to do in data logger and what king of settign I have to to in order to get desired Output.
I am not much familier with Data logger,i have read datasheet regarding to this and i am using Agilent Data logger 34970A.
Thank you very much...
Attachments:
MeasureDO3.vi ‏33 KB

CDHDR table is not updated after execution of transaction CK 24

Hi Experts ,
I am Triggering my workflow from for CK 24 transaction based on the change document entry from CDHDR table , once the CK24 transaction executes .
Now the problem is after execution of the CK24 transaction now its not updating the table CDHDR, which was happening before .
Note: No customization has been made which can affect this updation .
Can any body please guide me on this , why the standard table is not being updated now with the change document entries .
Regards
Sarmistha

You can use following FMs
CHANGEDOCUMENT_READ_HEADERS Change document: Read change document header
CHANGEDOCUMENT_READ_POSITIONS Change document: Read change document items
IN CDPOS you have to give the same thing as CDHDR. You have to search with the respective Object class and provide the Object Id(Key fields like Document number). Another thing you will also get the change document number from the transaction itself from which you are change the Document.
Thanks
Arghadip

Execution method of report created using Web Intelligence

Hi everyone,
Could anyone please let me know of the way data in a report created as web intelligence document is refreshed? Is it real-time data each time the report is executed or do I have to explicitly hit the "Refresh" button in order to get latest data?
In case data is cached and renewed only when "Refresh" is clicked, which execution of the report is taken for the cache - let's say in case 100 users access the same report.
Thanks,
Maria

You don't have to refresh every time there is new data, it is real-time. It should automatically refreshed.
if your universe is created on the BI query, in BI there is caching you can enable in rsrt and that will take care of it. I am not sure if there is any caching mechanism in Webi.
thanks.
Wond

Report script execution is getting failed

Hi ,
We are facing one strange issue while executing the Essbase report script. I am new to the report script and I am not getting how to resolve the issue.
When we are changing the year in code from FY13 to FY14 the script is getting failed however the same script is successfully generating the report if we keep year as FY13 in code.
Could you please let me know where would be the problem , below is the part of the code form Report script.
{MISSINGTEXT "0"} // replace #Missing with 0
<Link ((<LEV("Customer", "Lev0,Customer")) AND ( <IDESC("All Customers")))
<Link ((<LEV("Product", "Lev0,Product")) AND ( <IDESC("All Products")))
<Link ((<LEV("Period", "Lev0,Period")) AND ( <IDESC("YearTotal")))
FY14

Hi ,
I am getting below error message.
"Report Script execution Failed. Please see message panel for details " and in message panel It is not showing any details , just displaying Execute Report script Failed with date and time details.
I also checked that FY14 do exist in the application and no duplicate FY14 member exist in the outline.
Could you please suggest where would be the problem.

In VL10A tcode after execution in section scr "Incorrect factory calendar"

Hi,
After execution of the tcode VL10A gives the information messge in the selection screen as
"Incorrect factory calendar; date calculation not possible".
How to remove this informaition message.
Thanks,
Sanjay

Do check with your FICO people and they will be able to help you to check on the factory calendar problem.

Run time error in FMBB after execution of RGZZGLUX GETWA_NOT_ASSIGNED FM

Hello Experts,
We have activated funds management in Development it is working fine without any issues. Transported same changes to Quality system and executed Program RGZZGLUX.
Issue: Run time error in FMBB transaction code even after execution of program RGZZGLUX. similar error in funds center group also.
Category               ABAP Programming Error
Runtime Errors         GETWA_NOT_ASSIGNED
ABAP Program           SAPLFMBD_DATABASE_ACCESS
Application Component PSM-FM-BCS-BU
Date and Time          10.06.2014 13:28:36
Short text
    Field symbol has not yet been assigned.
Requirement: Please let us know how to solve this issue
we have checked note:0000939958 - and changed Inactive status for tables FMIT, FMIP and FMIA, but no use, when we run program RGZZGLUX, it has deactivated this tables again.
Regards,
Chalapathi

Hello Shyam / Javed,
Thank you for your inputs.
I have solved issue, now it is working fine.
Activated EA-PS and included into transport request. executed program RGZZGLUX.
Note used to solve issue :0000908007
Regards,
Chalapathi

I have result after execution of OperationBinding. How can i parse and store in list.

I have result after execution of operation binding. how can i parse and store in list

Hi,
I Thought u have custom method in AM which returns List Data type. What is the requirement exactly, bcz commit operation have void return type.
Ex: create custom method in AMimple class
public List sampleData(){
// code here to set the values in List object.
now expose the above method in client interface. Then add the Method action binding in pageDef file and execute the below code in managed bean
OperationBinding operationBinding = (OperationBinding)bindings.getOperationBinding("sampleData");
List result =(List) operationBinding.execute();
Thanks
Nitesh

Returning to same tab after execution

I have a selection screen with 6 tabs. After execution, the screen always returns to the first tab. This is very annoying to my users and potentially can cause mistakes on re-running the application. Does anyone know of a way to go back to the same tab that was open when the program was executed?
Thanks.

I answered this once on this forum...others have answered, also, so suggest you search. I don't recall the exact details, but I think I stored the ACTIVETAB value to memory, then recalled prior to returning to the selection screen.
Perhaps here:
[Return to TabStrip|Return to same tabstrip on selection screen;

Size of SQL query before execution and after execution

hi all
I need help on how can i find out the size of SQL query before execution and after execution in java
The query can be any query select / insert / update
Can anyone help me if any system tables help to find out the required size i mentioned
Urgent help is required
Thanking in advance

I need the size in terms of bytes
like the rquirement is stated as below
select ................: 10 B , return 250 B
so i need size before and after execution in terms of bytes

How to get multiple output formats for each execution of the report?

Hi,
Is it possible to get multiple output formats for each execution of the report? If so can you provide some details?
Thanks

In Reports 6i, Reports Distribution was introduced. This allows you to run the report once and output to a number of destinations with a different format. It also allows you to distribute individual sections within a report to different destinations in different formats.
The Destinations for a Report to distribute to are defined either in a distribution file and passed on the command line or inside of the report definition.
To add a destination to the the report definition, bring up the property palette against the report object and then select the "Distribution" property under the "Report" node. This will bring up a dialog that allows you to create a distribution list. You can then test this list by selecting "file->distribute" from the menu.
To run a report that is to be distributed through rwrun60, you need to add "distribute=yes" to the command line. It will pick up the destinations from the report definition. If you add "destination=<filename>" then it will pick up the destinations from the specified "<filename>" and ignore the destinations in the report definition.
Note: if "distribute=yes" is specified on the command line then the destype/desname/desformat parameters will be used to format the report (ie: which printer/display to use during formatting for sizing objects) but will be ignored when the report is sent to the destinations.

Execution of a report after execution of a transaction automatically

Similar Messages

Maybe you are looking for