Variant -Variables

Hi,
This is Urgent ..please
I have a requirement like .. I know the VARIABLE name , i need to findout the VARIANT names which are using this VARIABLE.
Ex: Variable name = LAST_WEEK . Please let me know how to findout the VARIANT names which is using the LAST_WEEK.

Hi,
Check the following tables:
VARI ABAP/4: Variant storage (similar to INDX)
VARICON Selection variants: Content
VARICONCI Selection Variants: Content (Cross-Client)
VARID Variant directory
VARID_CI Variant Catalog, Cross-Client
VARIDESC Selection Variants: Description
VARIDESCCI Selection Variants: Description (Cross-Client)
VARINUM Internal number assignment for variants
VARIS Assignment of variant to selection screen
VARIS_CI Assignment of Variant to Selection Screen
VARIT Variant texts
VARIT_CI Variant Texts, Cross-Client
Also you can check FM RS_VARIANT_*
Regards,
Bhaskar

Similar Messages

Non-varying variable in Constrained Nonlinear Optimization

I have built a labview VI so as to execute an optimization problem that I had previously solved using Matlab's fmincon. The transition wasn't difficult and the VI mostly works except for one variable.
The VI is expected to optimize an array of four variables: the first three will be input to a control systems function, and the last is converted to int to be used for array allocation (think of it as a time switch for the second and the third variable). When I run the code, that last variable doesn't change, not by one iota. To confirm this, I set a breakpoint with a probe and watch as Labview would modify the three other variable but still has the fourth variable at 140.00000 . I've tried varying the criteria and settings, but to no avail.
What am I missing, or is this somehow normal?
Solved!
Go to Solution.

not all optimization routines use partial derivatives (hence "non-linear")
I've attached the main file that decouples the variables. The resulting output will be the input to a control system whose output will be compared to a specific predetermined plot.
Attachments:
sequenceToRateError.vi ‏18 KB
Times.ctl ‏5 KB

Dynamic Variant (Variables)

Hi all,
I'm trying to create a variant to the program SAPF080. This program runs as a job once a month.
In here I need to create a variant to automatically determine the entry date. This entry date should be the last financial period (not equal to the month) until the day it runs.
Lets imagine that the period is from the 28 of January until the 25 of February. The report runs in the 10th of March.
The selection for the entry date should start on the 28th of january until the 10th of March.
How can I create a rule to dynamically use in the variant with this logic?
Regards,
Pedro

Try this, When you save variant after you given the values (but dont give the fiscal date) you can see 'Selection variables' column, Select 'D' there and when you click on 'Name of Variable' you can see different variables selections, check to use one of them . I am not sure how to include our own calculated variable there. I will try to find it.
Thanks
Satyasuresh Donepudi

Problem creating variant variable

Hello!
I have issues with the filetype VARIANT and the Excel function Excel_WorkbookSaveAs.
I am getting the following error:
159, 5 error: unexpected type name 'VARIANT': expected expression
Below you will finde an excerpt of my code. I am creating the VARIANT var to store the filename of an Excel Workbook. To concert a string to variant I am using CA_VariantSetCString. I assume the reason for the error is a missing header file where the type VARIANT is defined, but I couldn't figure out which one.
Does anyone has an idea how to fix this error?
Thanks!
#include "excelreport.h"
#include "excel2000.h"
#include <cvirte.h>
#include <userint.h>
VARIANT vFilename;
CA_VariantSetCString(&vFilename,"Test_xlsx_xls");
Excel_WorkbookSaveAs(workbookHandle, NULL,vFilename, CA_DEFAULT_VAL, CA_DEFAULT_VAL, CA_DEFAULT_VAL, CA_DEFAULT_VAL, CA_DEFAULT_VAL, ExcelConst_xlNoChange, CA_DEFAULT_VAL,CA_DEFAULT_VAL,CA_DEFAULT_VAL,CA_DEFAULT_VAL);

From the code excerpt you posted it's not possible to understand what that error means; neither we know on which line the error arises...
VARIANT type is defined in OAIdl.h file: nevertheless, I discourage you from including this file alone, since you may be missing some other necessary include. Additionally, simply including excel2000dem.h should be enough for the program to compile successfully. In my opinion the error is not in a missing include, especially if you are using VARIANT type elsewere in the code without similar errors: it possibly lies in some problem in the lines immediately preceding the offending one (e.g. a missing semicolon or something like that).
BTW, the filename you are using is missing the necessary extension: this can prevent automatically opening the file once created and could ultimately generate runtime errors while running the code (I don't remember how tolerant is Excel automation in this respect).
Proud to use LW/CVI from 3.1 on.
My contributions to the Developer Zone Community
If I have helped you, why not giving me a kudos?

TVARVC(Table of Variant Variables (Client-Specific))

Hi All,
I need to update the TVARVC table with latest Run date in field LOW
When I tried to Update or modify TVARVC in program level it is taking very long time, in back ground it is taking 48 hours ,In foreground it is going to dump.
After that I tried to change the filed value in debug mode, but in this also it is taking too much time and giving dump.
Here what could be the reason to giving dump while in debug mode also.
How to over come this problem? Please help me this
Thanks and Regards,
Rambabu.A

Hi All,
My problem got solved, thanks for giving support to solve the problem
Actual problem is this TVARVC table contains client specific field that needs fill with 'X' then only it will consider to save the or modify the record other wise it will search for all client sin the server
My code is :
SELECT SINGLE INTO wa_tvarvc
 FROM tvarvc
 WHERE name = 'ZFI_LAST_RUN_DATE'
AND type = 'P'
 AND numb = c_0001
*begin of change
 AND CLIE_INDEP = 'X'.
*End of change
p_date = tvarvc-low .
p_date = wa_tvarvc-low .
*<<End of change @003
w_date = sy-datum + 1 .
*Begin of change
tvarvc-low = w_date .
 wa_tvarvc-low = w_date .
 wa_tvarvc-CLIE_INDEP = u2018Xu2019.
UPDATE tvarvc .
 MODIFY tvarvc FROM wa_tvarvc.
Thanks and Regards,
Rambabu.A

Variable values in Variant

Hi Gurus,
I want to create one variant for transaction 'FPB3' so that i can pass different 'Identification' and 'filename' each time under the same variant to a background job.
Is there any possible way to pass the variable values of fields in an variant of FPB3 transaction.
Your help is appreciated.
Thanks 'n Regards,
Ashwani

Ashwani,
You can create an entry TVARV table with that variant When u create a variant variable(in the tcode STVARV) of type select option and chose different selections(Include single values, Include range, exclude single values, exclude range) through multiple selections button, then a separate entry will be created in the database table TVARVC(with a different NUMB value) for each selection made in multiple selections dialog box .You can access this table in your program while executing the in background.
Hope this helps
Veera

Dynamic Variant for Date Range

Making the Variant for Date or Date Range Dynamic in the Selection Screen of any Program.
There are actually many ways you can make the Variant for Dateu2019s Dynamic.
1.     Providing he Values in the Variant Variables.
2.     By creating the variables in the table TVARVC
3.     By Initializing the values in the program itself.
I saw many posts with respect to these and found that everyone has their own way of dealing. Even I wrote code in the program initialization to get this done.
Here in this post I am showing you the easiest option which is available in the Variant creation.
EX : If you want to execute the batch job based on a date range.
     SY-DATE u2013 60 days , that means always your program should execute the batch job based on System Date. And the variant should change accordingly.
Following are the step by stop to do that.
1. Select your program and select the Variant Radio button and then Click on Display.
2. It will pop up a screen with variant option below the program name.
3. Enter the Variant name and click on Create
4. You will see a screen, with the Attributes button.
5. Once you click on the Attributes button, it will take you a screen with selection option.
6. In my scenario my input is based on Calender Day, so select the Selection Variable for Calender Day: You will find 2 options T & D.
7. Select D: Dynamic date Calculation, then select the Name of Variable (input using f4). You can find many options.
8. Scroll down the Variant Attributes and select current date u2013 xxx, current date + yyy
9.Though it seems to be inactive, just double click on the row to provide the date range.
10. Just enter the value for xxx and yyy to get you dynamic range based on number of days
11. In my scenario I have to consider System Date u2013 60 days. 0 means current day.
12. Click on OK to check the range has been reflected or not. Then save the Variant and check the value by executing the program with saved Variant.
You can check the same in blog with all the screen shots attached but this thing is so easy you don't require screen shots.
Regards
Shankar Chintada

Hi Shankar,
It would be great if you can put this information in Wiki .
Pravender

Save/create a variant in user defined screen in dialog program

is there a way to save/create a variant in user defined screen in dialog program?
thanks...

Few important tables for Variants:
VARI - ABAP/4: Variant storage (similar to INDX)
VARID - Variant directory
VARINUM - Internal number assignment for variants
VARIT - Variant texts
TVARV - Table of variables in selection criteria
TVARC - Variant conditions
TVARUVN - Individual Variant Variable: Assignment TVARV
TVARCT - Text for Variants Conditions
TVARH - Header entries for screen variants
TVARIND - Save screen variants
Regards,
Vishal

To set up variant

I need to set up the variant of program to run in background everyday.
For that one field is date and that needs to be a system date. so how can I setup
that variant.
variable name is p_date and that should be sy-datum.
thanks,
Manan.

- Plug in all the selection parameters value and click the save button to save it as a variant.
- On the ABAP: Save as variant screen, check the selection variable checkbox for that date field and click the selection variable button.
- Click on the D: dynamic date calculation column to mark the traffic light to green.
- Then click the drop down button to choose the 'current date'.
- Click SAVE buttons twice to save the variant.
Hope this helps.
Points are always welcome!

Multiple ALV Grid Controls per report - problem with default displ.variant

Hi,
I have a report with few screens called sequentialy. Each one of the screens has implemented own instance of ALV Grid Control within custom container, means:
- screen 100 has container Cont100 and grid control "grid100",
- screen 110 has container Cont110 and grid control "grid110"
- screen 120 has container Cont120 and grid control "grid120"
and so on...
Each one of the grid controls is initialized with own field catalog table, with own layout and variant structure definitions. My problem occurs when the user changes the display variant for some of the grid controls and save the layout variant using "default setting" checkbox. In this case next time the program is started all other grid controls behaves like they don't have their own variant definitions, but uses the default setting of the mentioned screen. This leads (usualy) to unsuable grid controls by default, because usualy different controls have no equal field-definition tables. I have the same behaviour even when there are more than 1 ALV grids on a single screen (for example - 2).
For now I don't provide variant variables at selection screen, but it seems there is no way to provide such variables for each one of the grid-controls.
Is anyone aware how to control this? Means no matter if there is default setting in use for some of the grid-controls, how to manipulate other grid-controls not to use this default setting?
Many thanks in advance.
Regards,
Ivaylo Mutafchiev

check this sample code which displays 4 grids in 4 different tabs and with 4 different handles
PROGRAM sapmzsdpp MESSAGE-ID z1.
Table Declarations                                                   *
TABLES:
vbpa,                                " Sales Document: Partner
kna1,                                " Customer Master
vbap.                                " Sales Document: Item Data
Tab Strip Declarations                                              *
CONTROLS:
tabstrip_sdpp TYPE TABSTRIP.         " Tabstrip
Constants declarations                                               *
CONSTANTS:
c_rep_zm(2)   TYPE c VALUE 'ZM',     " Outside Sales Representative
c_rep_ve(2)   TYPE c VALUE 'VE',     " Inside Sales Representative
c_rep_zi(2)   TYPE c VALUE 'ZI',     " Sales Manager
c_abgru_08(2) TYPE c VALUE '08',     " Reason for Rej: SO Not Closed
c_stock_ind_e TYPE c VALUE 'E',      " Stock Idctr : Orders on hand
c_gauge(5)    TYPE c VALUE 'GAUGE', " Characteristic Name - GAUGE
c_width(5)    TYPE c VALUE 'WIDTH', " Characteristic Name - WIDTH
c_gauge_metric(12)                   " Character Name - GAUGE_METRIC
                TYPE c VALUE 'GAUGE_METRIC',
c_width_metric(12)                   " Character Name - WIDTH_METRIC
                TYPE c VALUE 'WIDTH_METRIC',
c_eng_metric(14)                     " Charac Value - ENGLISH_METRIC
                TYPE c VALUE 'ENGLISH_METRIC',
c_coil(4)     TYPE c VALUE 'COIL',   " For Value COIL
c_spec_bf(7) TYPE c VALUE 'SPEC_BF'," Charac value SPEC_BF
c_wadat_ist(8)                       " Actual Goods Movement Date
                TYPE c VALUE '00000000',
c_mcha(4)     TYPE c VALUE 'MCHA',   " Database Table 'MCHA'
c_classtype_022(3)
                TYPE c VALUE '022',    " Class Type : BATCH
c_pipe(2)     TYPE c VALUE '06',     " Material Pricing Group: Pipes
c_item_ctgry_ztam(4)
                TYPE c VALUE 'ZTAM',   " Item Cat:Certificate Mnfctr
c_lab_result(10)                     " Charac Value LAB_RESULT
                TYPE n VALUE '0000001392',
c_none_reqd(10)                      " For Value NONE REQD
                TYPE c VALUE 'NONE REQD.',
c_passed(6)   TYPE c VALUE 'PASSED', " For Value PASSED
c_pending(12) TYPE c                 " For Value TEST PENDING
                VALUE 'TEST PENDING',
c_bundling(13)                       " For Value TEST BUNDLING
                TYPE c VALUE 'TEST BUNDLING',
c_normal(2)   TYPE c VALUE '01'.     " Priority: Normal
Internal Table Declarations                                          *
DATA :
Internal table to hold common data for all reports
BEGIN OF t_common_data OCCURS 0,
   kunnr        LIKE vbak-kunnr,       " Customer Number
   vbeln        LIKE vbap-vbeln,       " Sales Document Number
   posnr        LIKE vbap-posnr,       " Sales Document Item Number
   ihrez_e      LIKE vbkd-ihrez_e,     " Mill Order Number
   matnr        LIKE vbap-matnr,       " Material Number
   pstyv        LIKE vbap-pstyv,       " Sales Document Item Category
   kwmeng       LIKE vbap-kwmeng,      " Cumulative Order Quantity
   lprio        LIKE vbap-lprio,       " Delivery Priority
   werks        LIKE vbap-werks,       " Plant
   kondm        LIKE vbap-kondm,       " Material Pricing Group
   aedat        LIKE vbap-aedat,       " Date of Last Change
   cuobj        LIKE vbap-cuobj,       " Configuration
   saldata      LIKE vbap-zzcust_req_avail,
                                       " Required Availability Date
END OF t_common_data,
Internal table to hold Customer Number
BEGIN OF t_cust_temp OCCURS 0,
    kunnr       LIKE vbak-kunnr,       " Customer Number
END OF t_cust_temp,
Internal table to hold stock details
BEGIN OF t_stock OCCURS 0,
   vbeln        LIKE mska-vbeln,       " Sales Document Number
   posnr        LIKE mska-posnr,       " Sales Document Item Number
   matnr        LIKE mska-matnr,       " Material Number
   werks        LIKE mska-werks,       " Plant
   charg        LIKE mska-charg,       " Batch Number
   kalab        LIKE mska-kalab,       " Valuated Stock
   ersda        LIKE mska-ersda,
END OF t_stock,
Internal table to hold deliveries
BEGIN OF t_delivery_data OCCURS 0,
vbeln         LIKE lips-vbeln,       " Delivery Document Number
vgbel         LIKE lips-vgbel,       " Document No of Ref Document
vgpos         LIKE lips-vgpos,       " Item No of Ref Item
END OF t_delivery_data,
Internal table to hold released tons & released days
BEGIN OF t_released_tons_days OCCURS 0,
vbeln         LIKE likp-vbeln,       " Delivery Document Number
btgew         LIKE likp-btgew,       " Total Weight
bldat         LIKE likp-bldat,       " Document Date in Document
END OF t_released_tons_days,
Internal table to hold Pre-Production-Pending Orders (Report-1)
BEGIN OF t_pre_prod_ord OCCURS 0,
   sortl1       LIKE zcustcode-sortl, " Customer Search Term
   ihrez_e1     LIKE vbkd-ihrez_e,     " Mill Order Number
   salord1(17) TYPE c,                " Sales Order Document & Item
   descri       TYPE char70,           " Specification of the Item
   speci        TYPE char30,           " Description of the Item
   days_entry   LIKE zlgcyinfo-days_since_entry,
                                       " Days Since Entry
   dept         LIKE zlgcyinfo-bklog, " Department
   notes1       LIKE zcsimemo-text,    " CSI File Memo Text
*/ Request No. DV2K904687
   chng_date    LIKE vbap-aedat,       " Date of Last Change
END OF t_pre_prod_ord,
Internal table to hold Delinquent Orders (Report-2)
BEGIN OF t_delinquent_ord OCCURS 0,
   sortl2       LIKE zcustcode-sortl, " Customer Search Term
   ihrez_e2     LIKE vbkd-ihrez_e,     " Mill Order Number
   salord2(17) TYPE c,                " Sales Order Document & Item
   descri       TYPE char70,           " Specification of the Item
   speci        TYPE char30,           " Description of the Item
   saldata      LIKE vbap-zzcust_req_avail,
   schdate      LIKE vbep-edatu,       " Schedule Line Date
   days_late    LIKE zlgcyinfo-dayslate,
                                       " Days Late
   unit         LIKE zlgcyinfo-unit,   " Status of Consolidation Units
   days_at_unit LIKE zlgcyinfo-daysatunit,
   notes2       LIKE zcsimemo-text,    " CSI File Memo Text
END OF t_delinquent_ord,
Internal table to hold Processed Material Orders (Report-3)
BEGIN OF t_processed_ord OCCURS 0,
   sortl3       LIKE zcustcode-sortl, " Customer Search Term
   ihrez_e3     LIKE vbkd-ihrez_e,     " Mill Order Number
   salord3(17) TYPE c,                " Sales Order Document & Item
   descri       TYPE char70,           " Specification of the Item
   speci        TYPE char30,           " Description of the Item
   order_tons   LIKE vbap-kwmeng,      " Cumulative Order Quantity
   fin_tons     LIKE mska-kalab,       " Val.Stock With Unres Usage
   fin_days     TYPE i,                " Finished Days
   rel_tons     LIKE likp-btgew,       " Total Weight
   rel_days     TYPE i,                " No.of.Days Order is Released
   status(15)   TYPE c,                " Status Of Stock
   tb_tons      LIKE zlgcyinfo-tons,   " Tons
   notes3       LIKE zcsimemo-text,    " CSI File Memo Text
END OF t_processed_ord,
Internal table to hold Flagged Orders (Report-4)
BEGIN OF t_flagged_ord OCCURS 0,
   sortl4       LIKE zcustcode-sortl, " Customer Search Term
   ihrez_e4     LIKE vbkd-ihrez_e,     " Mill Order Number
   salord4(17) TYPE c,                " Sales Order Document & Item
   descri       TYPE char70,           " Specification of the Item
   speci        TYPE char30,           " Description of the Item
   saldata      LIKE vbap-zzcust_req_avail,
   unit         LIKE zlgcyinfo-unit,   " Status of Consolidation Units
   tons         LIKE zlgcyinfo-tons,   " Tons
   priority     LIKE vbap-lprio,       " Delivery Priority
   notes4       LIKE zcsimemo-text,    " CSI File Memo Text
END OF t_flagged_ord,
Internal table to hold CSI memo file data
BEGIN OF t_csi_memo_data OCCURS 0,
   vbeln        LIKE zcsimemo-vbeln,   " Sales Document Number
   posnr        LIKE zcsimemo-posnr,   " Sales Order line item
   text         LIKE zcsimemo-text,    " CSI File Memo Text
END OF t_csi_memo_data,
Internal table to hold Customer Codes
BEGIN OF t_customer_code OCCURS 0,
   sortl        LIKE zcustcode-sortl, " Sort Field
   kunnr        LIKE zcustcode-kunnr, " Customer Number
END OF t_customer_code,
Internal table to hold schedule line dates
BEGIN OF t_schedule_line_date OCCURS 0,
   vbeln        LIKE vbep-vbeln,       " Sales Document Number
   posnr        LIKE vbep-posnr,       " Sales Document Item Number
   edatu        LIKE vbep-edatu,       " Schedule line date
END OF t_schedule_line_date,
Internal table to hold Characteristic values
t_configuration
                TYPE TABLE OF conf_out
                WITH HEADER LINE,
Internal tables to hold legacy data
t_lgcyinfo    TYPE TABLE OF zlgcyinfo
                WITH HEADER LINE.
Work variables declarations                                          *
DATA:
gv_parvw      LIKE kupav-parvw,      " Partner function
gv_abgru      LIKE vbap-abgru,       " Reason to eject sales order
gv_gauge      LIKE conf_out-atwtb,   " Charac Value Description
gv_width      LIKE conf_out-atwtb,   " Charac Value Description
gv_ok_code    LIKE sy-ucomm,         " Usercommand
gv_okcode     LIKE sy-ucomm,         " User Command
gv_number     LIKE sy-dynnr
                VALUE '0101',          " Initial Sub Screen Number
gv_vbeln      LIKE vbak-vbeln,       " Sales Order
gv_posnr      LIKE vbup-posnr,       " Sales Item
*/ Request No. DV2K904687
gv_del_prio   LIKE vbap-lprio,       " Delivery Priority
gv_obj_key    LIKE inob-objek,       " Object Key
gv_config     LIKE inob-cuobj,       " Configuration
gv_lab_result LIKE ausp-atwrt,       " Lab Result Value
gv_pass_stock LIKE mska-kalab,       " Finished Stock
gv_fail_stock LIKE mska-kalab,       " Failed Stock
gv_tp_tons    LIKE mska-kalab,       " Test Pending Tons
gv_csi_stock LIKE mbew-lbkum,       " CSI Stock On Hand
gv_val_stock LIKE mska-kalab,       " Valuated Stock
gv_fin_tons   LIKE mska-kalab,       " Finished Tons
gv_fin_days   TYPE i,                " Finished Days
gv_rel_tons   LIKE likp-btgew,       " Released Tons
gv_rel_days   TYPE i,                " Released Days
gv_no_delivery                       " Number of Delivery Documents
                TYPE i,
gv_bund_tons LIKE zlgcyinfo-tons,   " Bundling Tons
gv_net_weight LIKE mara-ntgew,       " Net Weight
gv_tb_tons    LIKE zlgcyinfo-tons,   " Test/Bundling Tons
gv_date       LIKE mska-ersda,       " Date
gv_tabix      LIKE sy-tabix,         " Table Index
gv_flg        TYPE c,                " Flag Variable
gv_exit       TYPE c.                " For Parameter Exit
Constant declarations for ALV Grid                                   *
CONSTANTS:
c_cont_pre_prod_ord
                 TYPE scrfname VALUE 'CUST_PPP',
                                       " Custom Container for Report-1
c_cont_delinquent_ord
                 TYPE scrfname VALUE 'CUST_DIP',
                                       " Custom Container for Report-2
c_cont_processed_ord
                 TYPE scrfname VALUE 'CUST_PMS',
                                       " Custom Container for Report-3
c_cont_flagged_ord
                 TYPE scrfname VALUE 'CUST_FLGORD',
                                       " Custom Container for Report-4
c_handle1(3)   TYPE c VALUE 'G_1',   " Handle for PPP rpt Grid
c_handle2(3)   TYPE c VALUE 'G_2',   " Handle for DIP rpt Grid
c_handle3(3)   TYPE c VALUE 'G_3',   " Handle for PMS rpt Grid
c_handle4(3)   TYPE c VALUE 'G_4',   " Handle for FLGORD rpt Grid
c_true         TYPE c VALUE 'X',     " For value 'X'
c_save         TYPE c VALUE 'A'.     " User-Defd & Global Variants
Selection Screen                                                     *
SELECTION-SCREEN BEGIN OF SCREEN 500 AS WINDOW.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-014.
PARAMETERS :
p_osr       RADIOBUTTON GROUP g1
              DEFAULT 'X',             " Outside Sales Representative
p_isr       RADIOBUTTON GROUP g1,    " Inside Sales Representative
p_s_mgr     RADIOBUTTON GROUP g1.    " Sales Manager
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-005.
SELECT-OPTIONS:
s_pernr     FOR vbpa-pernr
              OBLIGATORY,              " Employee Number
s_kunnr     FOR kna1-kunnr,          " Customer Number
s_sortl     FOR kna1-sortl,          " Customer Search Term
s_kondm     FOR vbap-kondm.          " Material Pricing Group
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-006.
PARAMETERS:
p_open      RADIOBUTTON GROUP g2
              DEFAULT 'X',             " Open Orders
p_closed    RADIOBUTTON GROUP g2.    " Closed Orders
SELECTION-SCREEN END OF BLOCK b3.
SELECTION-SCREEN BEGIN OF BLOCK b4 WITH FRAME TITLE text-007.
PARAMETERS:
p_var1      LIKE disvariant-variant, " Variant For Report-1
p_var2      LIKE disvariant-variant, " Variant For Report-2
p_var3      LIKE disvariant-variant, " Variant For Report-3
p_var4      LIKE disvariant-variant. " Varinat For Report-3
SELECTION-SCREEN END OF BLOCK b4.
SELECTION-SCREEN END OF SCREEN 500.
*/ Begin of Modification - Request No. DV2K904687
Selection Screen for Changing Sales Order Priority
SELECTION-SCREEN BEGIN OF SCREEN 1100 AS WINDOW.
SELECTION-SCREEN BEGIN OF BLOCK b5 WITH FRAME TITLE text-044.
PARAMETERS    p_sonum LIKE vbap-vbeln." Sales Order Number
SELECT-OPTIONS s_item FOR vbap-posnr." Sales Order Item
PARAMETERS     p_delpr LIKE vbap-lprio." Delivery Priority
SELECTION-SCREEN END OF BLOCK b5.
SELECTION-SCREEN END OF SCREEN 1100.
*/ End of Modification - Request No. DV2K904687
CLASS lcl_gv_event_receiveriver DEFINITION                           *
CLASS lcl_event_receiver DEFINITION DEFERRED.
ALV Grid - Work Variables Declarations                               *
DATA:
gv_cont_pre_prod_ord   TYPE REF
                           TO cl_gui_custom_container,
                                       " Custom Cont For Report-1
gv_cont_delinquent_ord TYPE REF
                           TO cl_gui_custom_container,
                                      " Custom Cont For Report-2
gv_cont_processed_ord TYPE REF
                           TO cl_gui_custom_container,
                                       " Custom Cont For Report-3
gv_cont_flagged_ord    TYPE REF
                           TO cl_gui_custom_container,
                                       " Custom Cont For Report-4
gv_grid_pre_prod_ord   TYPE REF
                           TO cl_gui_alv_grid,
                                       " Grid For Report-1
gv_grid_delinquent_ord TYPE REF
                           TO cl_gui_alv_grid,
                                       " Grid For Report-2
gv_grid_processed_ord TYPE REF
                           TO cl_gui_alv_grid,
                                       " Grid For Report-3
gv_grid_flagged_ord    TYPE REF
                           TO cl_gui_alv_grid,
                                       " Grid For Report-4
gv_event_receiver      TYPE REF
                           TO lcl_event_receiver,
                                       " Object For Local Class
gs_lay_pre_prod_ord    TYPE lvc_s_layo,
                                       " Work Area for Grid layout
gs_lay_delinquent_ord TYPE lvc_s_layo,
                                       " Work Area for Grid layout
gs_lay_processed_ord   TYPE lvc_s_layo,
                                       " Work Area for Grid layout
gs_lay_flagged_ord     TYPE lvc_s_layo,
                                       " Work Area for Grid Layout
gs_var_pre_prod_ord    TYPE disvariant,
                                       " Layout Structure
gs_var_delinquent_ord TYPE disvariant,
                                       " Layout Structure
gs_var_processed_ord   TYPE disvariant,
                                       " Layout Structure
gs_var_flagged_ord     TYPE disvariant,
                                       " Layout Structure
t_fcat_pre_prod_ord    TYPE lvc_t_fcat
                         WITH HEADER LINE,
                                       " Field Catalog For Report-1
t_fcat_delinquent_ord TYPE lvc_t_fcat
                         WITH HEADER LINE,
                                       " Field Catalog For Report-2
t_fcat_processed_ord   TYPE lvc_t_fcat
                         WITH HEADER LINE,
                                       " Field Catalog For Report-3
t_fcat_flagged_ord     TYPE lvc_t_fcat
                         WITH HEADER LINE,
                                       " Field Catalog For Report-4
t_exclude              TYPE ui_functions,
                                       " Function Code Table
gs_exclude             TYPE ui_func. " Function Code Structure
CLASS lcl_gv_event_receiver DEFINITION                               *
CLASS lcl_event_receiver DEFINITION.
PUBLIC SECTION.
    METHODS:
      handle_hotspot
        FOR EVENT hotspot_click OF cl_gui_alv_grid
          IMPORTING e_row_id e_column_id es_row_no,
      handle_top_of_page
                      FOR EVENT print_top_of_page OF cl_gui_alv_grid,
*/ Begin of Modification - Request No. DV2K904687
    handle_toolbar
        FOR EVENT toolbar OF cl_gui_alv_grid
            IMPORTING e_object e_interactive,
    handle_user_command
        FOR EVENT user_command OF cl_gui_alv_grid
            IMPORTING e_ucomm.
*/ End of Modification - Request No. DV2K904687
ENDCLASS.                              " LCL_EVENT_RECEIVER DEFINITION
CLASS IMPLEMENTATION                                                 *
CLASS lcl_event_receiver IMPLEMENTATION.
METHOD handle_hotspot.
    CASE e_column_id-fieldname.
      WHEN 'SALORD1'.
        CLEAR t_pre_prod_ord.
        READ TABLE t_pre_prod_ord
              INTO t_pre_prod_ord
             INDEX e_row_id-index.
      Call VA03 To View Sales Order Line Item Details
        PERFORM call_va03 USING t_pre_prod_ord-salord1.
      WHEN 'SALORD2'.
        CLEAR t_delinquent_ord.
        READ TABLE t_delinquent_ord
              INTO t_delinquent_ord
             INDEX e_row_id-index.
      Call VA03 To View Sales Order Line Item Details
        PERFORM call_va03 USING t_delinquent_ord-salord2.
      WHEN 'SALORD3'.
        CLEAR t_processed_ord.
        READ TABLE t_processed_ord
              INTO t_processed_ord
             INDEX e_row_id-index.
      Call VA03 To View Sales Order Line Item Details
        PERFORM call_va03 USING t_processed_ord-salord3.
      WHEN 'SALORD4'.
        CLEAR t_flagged_ord.
        READ TABLE t_flagged_ord
              INTO t_flagged_ord
             INDEX e_row_id-index.
      Call VA03 To View Sales Order Line Item Details
        PERFORM call_va03 USING t_flagged_ord-salord4.
      WHEN 'SORTL1'.
        CLEAR t_pre_prod_ord.
        READ TABLE t_pre_prod_ord
              INTO t_pre_prod_ord
             INDEX e_row_id-index.
    Call ZSD11 for Customer Search Term
        PERFORM call_zsd11_cust_code USING t_pre_prod_ord-sortl1.
      WHEN 'SORTL2'.
        CLEAR t_delinquent_ord.
        READ TABLE t_delinquent_ord
              INTO t_delinquent_ord
             INDEX e_row_id-index.
      Call ZSD11 for Customer Search Term
        PERFORM call_zsd11_cust_code USING t_delinquent_ord-sortl2.
      WHEN 'SORTL3'.
        CLEAR t_processed_ord.
        READ TABLE t_processed_ord
              INTO t_processed_ord
             INDEX e_row_id-index.
      Call ZSD11 for Customer Search Term
        PERFORM call_zsd11_cust_code USING t_processed_ord-sortl3.
      WHEN 'SORTL4'.
        CLEAR t_flagged_ord.
        READ TABLE t_flagged_ord
              INTO t_flagged_ord
             INDEX e_row_id-index.
      Call ZSD11 for Customer Search Term
        PERFORM call_zsd11_cust_code USING t_flagged_ord-sortl4.
      WHEN 'IHREZ_E1'.
        CLEAR t_pre_prod_ord.
        READ TABLE t_pre_prod_ord
              INTO t_pre_prod_ord
             INDEX e_row_id-index.
      Call ZSD11 for Mill Order
        PERFORM call_zsd11_millorder USING t_pre_prod_ord-ihrez_e1.
      WHEN 'IHREZ_E2'.
        CLEAR t_delinquent_ord.
        READ TABLE t_delinquent_ord
              INTO t_delinquent_ord
             INDEX e_row_id-index.
      Call ZSD11 for Mill Order
        PERFORM call_zsd11_millorder USING t_delinquent_ord-ihrez_e2.
      WHEN 'IHREZ_E3'.
        CLEAR t_processed_ord.
        READ TABLE t_processed_ord
              INTO t_processed_ord
             INDEX e_row_id-index.
      Call ZSD11 for Mill Order
        PERFORM call_zsd11_millorder USING t_processed_ord-ihrez_e3.
      WHEN 'IHREZ_E4'.
        CLEAR t_flagged_ord.
        READ TABLE t_flagged_ord
               INTO t_flagged_ord
              INDEX e_row_id-index.
      Call ZSD11 for Mill Order
        PERFORM call_zsd11_millorder USING t_flagged_ord-ihrez_e4.
      WHEN 'NOTES1'.
        CLEAR t_pre_prod_ord.
        READ TABLE t_pre_prod_ord
              INTO t_pre_prod_ord
             INDEX e_row_id-index.
      Call zsd00087 program to edit CSI Memo Text
        PERFORM edit_notes USING t_pre_prod_ord-salord1.
      WHEN 'NOTES2'.
        CLEAR t_delinquent_ord.
        READ TABLE t_delinquent_ord
              INTO t_delinquent_ord
             INDEX e_row_id-index.
      Call zsd00087 program to edit CSI Memo Text
        PERFORM edit_notes USING t_delinquent_ord-salord2.
      WHEN 'NOTES3'.
        CLEAR t_processed_ord.
        READ TABLE t_processed_ord
              INTO t_processed_ord
             INDEX e_row_id-index.
      Call zsd00087 program to CSI Memo Text
        PERFORM edit_notes USING t_processed_ord-salord3.
      WHEN 'NOTES4'.
        CLEAR t_flagged_ord.
        READ TABLE t_flagged_ord
              INTO t_flagged_ord
             INDEX e_row_id-index.
      Call zsd00087 program to CSI Memo Text
        PERFORM edit_notes USING t_flagged_ord-salord4.
    ENDCASE.                           " CASE E_COLUMN_ID ...
ENDMETHOD.                           " HANDLE_HOTSPOT
METHOD handle_top_of_page.
    PERFORM write_report_header.
ENDMETHOD.                           " METHOD HANDLE_TOP_OF_PAGE
*/ Begin of Modification - Request No. DV2K904687
METHOD handle_toolbar.
    DATA: ls_toolbar TYPE stb_button.
append a separator to normal toolbar
    CLEAR ls_toolbar.
    MOVE 3 TO ls_toolbar-butn_type.
    APPEND ls_toolbar TO e_object->mt_toolbar.
    CLEAR ls_toolbar.
append a button for Change Delivery Priority
    MOVE 'CHNG_PRIO' TO ls_toolbar-function.
    MOVE 'Change SO Delivery Priority'(048)
         TO ls_toolbar-quickinfo.
    MOVE 'Change SO Priority'(049) TO ls_toolbar-text.
    MOVE 0 TO ls_toolbar-butn_type.
    APPEND ls_toolbar TO e_object->mt_toolbar.
ENDMETHOD.                           " handle_toolbar
METHOD handle_user_command.
    DATA: t_sel_row TYPE lvc_t_roid,
          gs_sel_row TYPE lvc_s_roid,
          gs_flagged_ord LIKE t_flagged_ord,
          lv_lines   TYPE i.
    CASE e_ucomm.
      WHEN 'CHNG_PRIO'.
        REFRESH t_sel_row.
        CLEAR e_ucomm.
        CALL METHOD gv_grid_flagged_ord->get_selected_rows
          IMPORTING
            et_row_no = t_sel_row.
        CLEAR: t_flagged_ord,
               gv_vbeln,
               gv_posnr,
               gv_del_prio.
        DESCRIBE TABLE t_sel_row LINES lv_lines.
        IF lv_lines GT 1.
          MESSAGE i001 WITH 'Select only one row'(043).
        ELSEIF lv_lines EQ 1.
          READ TABLE t_sel_row INTO gs_sel_row INDEX 1.
          READ TABLE t_flagged_ord INTO gs_flagged_ord
               INDEX gs_sel_row-row_id.
          IF sy-subrc EQ 0.
            SPLIT gs_flagged_ord-salord4 AT '-' INTO gv_vbeln gv_posnr.
            gv_del_prio = gs_flagged_ord-priority.
            CLEAR: s_item, s_item[].
            p_sonum    = gv_vbeln.
            p_delpr    = gv_del_prio.
            s_item-low = gv_posnr.
            APPEND s_item TO s_item.
            CLEAR s_item.
          ENDIF.                       " IF sy-subrc EQ 0
        ENDIF.                         " IF lv_lines GT 1
        IF lv_lines LE 1.
          CALL SELECTION-SCREEN '1100' STARTING AT 30 2
                                       ENDING   AT 110 7.
          LEAVE TO SCREEN 100.
        ENDIF.
    ENDCASE.                           " CASE e_ucomm
ENDMETHOD.                           " handle_user_command
*/ End of Modification - Request No. DV2K904687
ENDCLASS.                              " LCL_EVENT_RECEIVER
" IMPLEMENTATION
Form WRITE_REPORT_HEADER                                            *
This subroutine displays Report Header which includes                *
Report Name, Executed by, Execution date, Execution Time             *
There are no parameters to be passed to this subroutine              *
FORM write_report_header.
DATA lv_rep_tit(72) TYPE c.
FORMAT COLOR COL_KEY.
MOVE sy-title TO lv_rep_tit.
CONDENSE lv_rep_tit.
SKIP 1.
WRITE: /3 sy-repid,
          25 'California Steel Industries, Inc.'(040),
          75 'Page'(041),
          80(4) sy-pagno.
WRITE: /3 sy-uzeit,
          25 lv_rep_tit,
          75 sy-datum.
FORMAT RESET.
ENDFORM.                               " WRITE_REPORT_HEADER
At selection-output                                                  *
AT SELECTION-SCREEN OUTPUT.
CLEAR sy-ucomm.
IF sy-dynnr EQ '0500'.
Initialize layout variant for report-1
    CLEAR gs_var_pre_prod_ord.
    gs_var_pre_prod_ord-report = sy-cprog.
    gs_var_pre_prod_ord-handle = c_handle1.
    PERFORM initialize_layoutvariant CHANGING gs_var_pre_prod_ord.
    p_var1 = gs_var_pre_prod_ord-variant.
Initialize layout variant for report-2
    CLEAR gs_var_delinquent_ord.
    gs_var_delinquent_ord-report = sy-cprog.
    gs_var_delinquent_ord-handle = c_handle2.
    PERFORM initialize_layoutvariant CHANGING gs_var_delinquent_ord.
    p_var2 = gs_var_delinquent_ord-variant.
Initialize layout variant for report-3
    CLEAR gs_var_processed_ord.
    gs_var_processed_ord-report = sy-cprog.
    gs_var_processed_ord-handle = c_handle3.
    PERFORM initialize_layoutvariant CHANGING gs_var_processed_ord.
    p_var3 = gs_var_processed_ord-variant.
Initialize layout variant for report-4
    CLEAR gs_var_flagged_ord.
    gs_var_flagged_ord-report = sy-cprog.
    gs_var_flagged_ord-handle = c_handle4.
    PERFORM initialize_layoutvariant CHANGING gs_var_flagged_ord.
    p_var4 = gs_var_flagged_ord-variant.
*/ Begin of Modification - Request No. DV2K904687
ELSEIF sy-dynnr EQ '1100'.
    DATA t_exclude TYPE TABLE OF sy-ucomm.
    SET PF-STATUS 'MENU_1100'.
To use your own GUI status for a selection screen
    CALL FUNCTION 'RS_SET_SELSCREEN_STATUS'
      EXPORTING
        p_status = 'MENU_1100'
      TABLES
        p_exclude = t_exclude.
ENDIF.                               " IF sy-dynnr EQ '0500'
*/ End of Modification - Request No. DV2K904687
At Selection Screen                                                  *
AT SELECTION-SCREEN.
*/ Begin of Modification - Request No. DV2K904687
CASE sy-dynnr.
    WHEN '1100'.
      IF sy-ucomm IS INITIAL.
        CLEAR sy-ucomm.
        LEAVE TO SCREEN 1100.
      ENDIF.                           " IF sy-ucomm IS INITIAL
      CASE sy-ucomm.
        WHEN 'SAVE'.
          CLEAR sy-ucomm.
        Change Delivery Priority using BAPI method
          PERFORM change_del_priority.
          CLEAR: sy-ucomm,
                 gv_vbeln,
                 gv_posnr,
                 gv_del_prio,
                 p_sonum,
                 s_item,
                 s_item[],
                 p_delpr.
          LEAVE TO SCREEN 0.
        WHEN 'CANCEL'.
          CLEAR: sy-ucomm,
                 gv_vbeln,
                 gv_posnr,
                 gv_del_prio,
                 p_sonum,
                 s_item,
                 s_item[],
                 p_delpr.
          LEAVE TO SCREEN 0.
      ENDCASE.                         " CASE sy-ucomm
    WHEN '0500'.
      IF sy-ucomm EQ 'CRET'.
        LEAVE TO SCREEN 100.
      ELSEIF sy-ucomm IS INITIAL.
        LEAVE TO SCREEN 500.
      ENDIF.                           " IF SY-UCOMM EQ 'CRET'
ENDCASE.                             " CASE sy-dynnr
*/ End of Modification - Request No. DV2K904687
Selection Screen: Validations                                        *
AT SELECTION-SCREEN ON s_pernr.
Validate Employee Number
PERFORM validate_employee_number.
AT SELECTION-SCREEN ON s_kunnr.
Validate Customer Number
IF NOT s_kunnr IS INITIAL.
    PERFORM validate_customer_number.
ENDIF.                               " IF NOT S_KUNNR IS INITIAL
AT SELECTION-SCREEN ON s_sortl.
Validate Search Term
IF NOT s_sortl IS INITIAL.
    PERFORM validate_search_term.
ENDIF.                               " IF NOT S_SORTL IS INITIAL
AT SELECTION-SCREEN ON s_kondm.
Validate Product
IF NOT s_kondm IS INITIAL.
    PERFORM validate_product.
ENDIF.                               " IF NOT S_KONDM IS INITIAL
Validate p_var1
AT SELECTION-SCREEN ON p_var1.
CLEAR gs_var_pre_prod_ord.
gs_var_pre_prod_ord-report = sy-cprog.
gs_var_pre_prod_ord-handle = c_handle1.
gs_var_pre_prod_ord-variant = p_var1.
IF p_var1 IS NOT INITIAL.
    PERFORM validate_variant CHANGING gs_var_pre_prod_ord.
ENDIF.                               " IF P_VAR1 IS NOT INITIAL
Validate p_var2
AT SELECTION-SCREEN ON p_var2.
CLEAR gs_var_delinquent_ord.
gs_var_delinquent_ord-report = sy-cprog.
gs_var_delinquent_ord-handle = c_handle2.
gs_var_delinquent_ord-variant = p_var2.
IF p_var2 IS NOT INITIAL.
    PERFORM validate_variant CHANGING gs_var_delinquent_ord.
ENDIF.                               " IF P_VAR2 IS NOT INITIAL
Validate p_var3
AT SELECTION-SCREEN ON p_var3.
CLEAR gs_var_processed_ord.
gs_var_processed_ord-report = sy-cprog.
gs_var_processed_ord-handle = c_handle3.
gs_var_processed_ord-variant = p_var3.
IF p_var3 IS NOT INITIAL.
    PERFORM validate_variant CHANGING gs_var_processed_ord.
ENDIF.                               " IF P_VAR3 IS NOT INITIAL
Validate p_var4
AT SELECTION-SCREEN ON p_var4.
CLEAR gs_var_flagged_ord.
gs_var_flagged_ord-report = sy-cprog.
gs_var_flagged_ord-handle = c_handle4.
gs_var_flagged_ord-variant = p_var4.
IF p_var4 IS NOT INITIAL.
    PERFORM validate_variant CHANGING gs_var_flagged_ord.
ENDIF.                               " IF P_VAR4 IS NOT INITIAL
Selection Screen: Value Request for ALV GRID Variants                *
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_var1.
CLEAR gs_var_pre_prod_ord.
gs_var_pre_prod_ord-report = sy-cprog.
gs_var_pre_prod_ord-handle = c_handle1.
PERFORM f4_variant CHANGING gs_var_pre_prod_ord
                              gv_exit.
IF gv_exit NE c_true.
    p_var1 = gs_var_pre_prod_ord-variant.
ENDIF.                               " IF GV_EXIT NE c_true
F4 help for variant p_var2
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_var2.
CLEAR:
    gs_var_delinquent_ord,
    gv_exit.
gs_var_delinquent_ord-report = sy-cprog.
gs_var_delinquent_ord-handle = c_handle2.
PERFORM f4_variant CHANGING gs_var_delinquent_ord
                              gv_exit.
IF gv_exit NE c_true.
    p_var2 = gs_var_delinquent_ord-variant.
ENDIF.                               " IF GV_EXIT NE c_true
F4 help for variant p_var3
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_var3.
CLEAR:
    gs_var_processed_ord,
    gv_exit.
gs_var_processed_ord-report = sy-cprog.
gs_var_processed_ord-handle = c_handle3.
PERFORM f4_variant CHANGING gs_var_processed_ord
                              gv_exit.
IF gv_exit NE c_true.
    p_var3 = gs_var_processed_ord-variant.
ENDIF.                               " IF GV_EXIT NE c_true
F4 help for variant p_var4
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_var4.
CLEAR:
    gs_var_flagged_ord,
    gv_exit.
gs_var_flagged_ord-report = sy-cprog.
gs_var_flagged_ord-handle = c_handle4.
PERFORM f4_variant CHANGING gs_var_flagged_ord
                              gv_exit.
IF gv_exit NE c_true.
    p_var4 = gs_var_flagged_ord-variant.
ENDIF.                               " IF GV_EXIT NE c_true
Form validate_employee_number                                       *
This subroutine validates Employee Number                            *
There are no parameters to need be passed to this subroutine         *
FORM validate_employee_number.
DATA lv_pernr LIKE vbpa-pernr.
SELECT SINGLE pernr
    INTO lv_pernr
    FROM vbpa
   WHERE pernr IN s_pernr.
IF sy-subrc NE 0.
    MESSAGE e001 WITH text-010.
ENDIF.                               " IF SY-SUBRC NE 0
CLEAR lv_pernr.
ENDFORM.                               " VALIDATE_EMPLOYEE_NUMBER
Form validate_customer_number                                       *
This subroutine validates Customer Number                            *
There are no parameters need to be passed to this subroutine         *
FORM validate_customer_number.
SELECT SINGLE kunnr
    INTO t_common_data-kunnr
    FROM kna1
   WHERE kunnr IN s_kunnr.
IF sy-subrc NE 0.
    MESSAGE e001 WITH text-011.
ENDIF.                               " IF SY-SUBRC NE 0
CLEAR t_common_data-kunnr.
ENDFORM.                               " VALIDATE_CUSTOMER_NUMBER
Form validate_search_term                                           *
This subroutine validates Search Term                                *
There are no parameters need to be passed to this subroutine         *
FORM validate_search_term.
SELECT SINGLE sortl
    INTO t_customer_code-sortl
    FROM kna1
   WHERE sortl IN s_sortl.
IF sy-subrc NE 0.
    MESSAGE e001 WITH text-012.
ENDIF.                               " IF SY-SUBRC NE 0
CLEAR t_customer_code-sortl.
ENDFORM.                               " VALIDATE_SEARCH_TERM
Form validate_product                                               *
This subroutine validates Product                                    *
There are no parameters need to be passed to this subroutine         *
FORM validate_product.
SELECT SINGLE kondm
    INTO t_

Dynamic variant creation, Current date "-NNNN" *(4 digit number)*

Hi,
Is there any way of creating "-NNNN (4 digit number)" for dynamic date calculation in variant variables?
I need to set 4 digit number in the "DLFL to Change Date (Old ver: To Change date)" field but system only allow total 4 digit including +/-. I'll be using the "Current date +/- ??? days" option to set date dynamically.
In order to set deletion flag for PM orders older than 6 years, I need "Current date -2190".
Or is there other way to set it as MONTH when calculating the change date?
I'm using PM order initial archiving job whose report name is RIARCORV.
Thanks in advance,
Alex
Edited by: Alex Kwon on Jul 16, 2009 2:44 AM
Edited by: Alex Kwon on Jul 16, 2009 2:45 AM

Alex,
I dont think its possible to do the same using the variant functionality. You will have to do some workaround to accomplish the same by either using other fields like Order number.You could also look at enhancing the code implicitly in the RIARCORV program, if you are in ECC6.0 or above versions.
Regards
Narasimhan

How to set as default current year & period in variant

Hi SAP Guru,
Can anyone help me on how to set as default the current year and period in variant. I want to do a background job for our program using save variants. But I need the period and year to always be assigned what ever is the current year and period.
Hope someone can help.
Thanks
Daboi

- Create variables for variants: use transaction STVARV. You should create one variable for fiscal year with type 'parameter', one for period with type 'parameter', one for fiscal year 'select option' and one for period 'select option'.
- when saving your variants for the different programs, fill the checkbox 'Selection variables' in the attributes for fiscal year and period; use the button 'selection variables' for choosing the variables created in STVARV.
- When closing the period, you should use STVARV for changing the variables. All the variant using the variant variables will then automaticaly use the new value.

What is the use of variant in the alv report

hello all,
what is the use of variant in the alv report

Hi,
For Variants
follow the link:
http://help.sap.com/search/highlightContent.jsp
Variants allow you to save sets of input values for programs that you often start with the same selections. You can use them for any programs except subroutine pools (type S).
Contents
Variants: Overview
Initial Screen
Displaying a Variant Overview
Creating and Maintaining Variants
Creating Variants
Attributes of Variants
Changing Variants
Deleting Variants
Printing Variants
Variable Values in Variants
Creating Variables for Date Calculations
User-specific Selection Variables
Creating User-specific Variables
Changing Values Interactively
Changing Values from the Program
Fixed Values from Table TVARV
Creating Table Variables from TVARV
Changing TVARV entries
Running a Program with a Variant
Variants: Overview
Use
Whenever you start a program in which selection screens are defined, the system displays a set of input fields for database-specific and program-specific selections. To select a certain set of data, you enter an appropriate range of values.
For further information about selection screens, see Working with selection screens in the ABAP User's Guide.
If you often run the same program with the same set of selections (for example, to create a monthly statistical report), you can save the values in a selection set called a variant.
You can create any number of variants for any program in which selection screens are defined. Variants are assigned exclusively to the program for which they were created.
You can also use variants to change the appearance of the selection screen by hiding selection criteria. This is particularly useful when you are working with large selection screens on which not all of the fields are relevant.
Reports, module pools, and function groups may have several selection screens. It is therefore possible to create a variant for more than one selection screen.
Variants are an interface between the user and the selection screen. They can be used both in dialog and in background mode, although their uses are slightly different.
Variants in Dialog Mode
In dialog mode, variants make things easier for the user, since they save him or her from continually having to enter identical values. They can also make the selection screen easier to read, because you can use them to hide input fields. Running an executable program with a variant containing an optimal set of values also reduces the capacity for user error. The optimized database selections speed up the runtime of the program.
Variants in Background Mode
Variants are the only method for passing values to a report program in a background job. Therefore, when you run a program in the background, you must use a variant (or SUBMIT... VIA JOB). To avoid you having to create a new variant each time you run the report, ABAP contains a mechanism allowing you to pass variable values to variants. See variable values in variants.
To ensure that an executable program is always started using a variant, you can specify in the program attributes that the program may only be started in this way.
Features
Creation of variants
Display, change, copy, print, and delete variants
Use and definition of variables in variants
Variable date calculation
User-specific fixed values
Fixed values in table TVARV
You access the variant maintenance tool from the initial screen of the ABAP Editor. Enter the name of the program, select Variants in the Sub-objects group box, and then choose Display or Change.
Functions
The above screen allows you to:
Create variants
Display the variant directory
Display and change values and attributes
Copy, delete, and rename variants
Before creating a new variant for a program, you should check whether you can use or adapt an existing variant instead.
There are two ways to display variants:
Position the cursor on the Variant field on the initial screen and press F4. The following dialog box lists all of the available variants:
Choose Variants ® Directory on the initial screen:
Creating Variants
Prerequisites
You must have defined one or more selection screens for the relevant program. The program may have any type except type S.
Procedure
On the initial screen of the ABAP Editor, enter the name of the program for which you want to create a variant, select Variants in the Sub-objects group box, and choose Change.
On the variant maintenance initial screen, enter the name of the variant you want to create.
Note the naming convention for variants (see below).
Choose Create.
If the program has more than one selection screen, a dialog box appears in which you can assign the variant to one or more screens. The dialog box does not appear if the program only has one selection screen. In this case, the selection screen of the program appears straight away.
If there is more than one selection screen, select the screens for which you want to create the variant.
Example:
If you choose Variant for all selection screens, the variant also applies to any selection screens that you create after creating the variant.
Otherwise, the variant only supplies values to the selection screens that you select in the list.
Choose Continue.
The (first) selection screen of the program appears.
If your program has more than one selection screen, use the scroll buttons in the left-hand corner of the application toolbar to navigate between them. If you keep scrolling forwards, the Continue button appears on the last selection screen.
Enter the required selections, including multiple and dynamic selections.
Choose Continue.
Result
When you have finished, an overview screen appears (ABAP: Save Attributes of Variant), on which you can enter the attributes of your variant and save it.
Note that when you create a new variant, you must enter both values and attributes.
Names of variants: Names can consist of up to 14 alphanumeric characters. The "% " character is not allowed. If you want the variant to be transported automatically with its program, you must create a system variant. The name of a system variant starts "CUS&" for customers, and "SAP&" for SAP system variants. You can only use the "&" character within this prefix in the name of a system variant. It may not occur in any other context. System variants are administered by the Workbench Organizer. Although you can create and access variants from any client, they are always stored in client "000".
Creating Variants
Prerequisites
You must have defined one or more selection screens for the relevant program. The program may have any type except type S.
Procedure
On the initial screen of the ABAP Editor, enter the name of the program for which you want to create a variant, select Variants in the Sub-objects group box, and choose Change.
On the variant maintenance initial screen, enter the name of the variant you want to create.
Note the naming convention for variants (see below).
Choose Create.
If the program has more than one selection screen, a dialog box appears in which you can assign the variant to one or more screens. The dialog box does not appear if the program only has one selection screen. In this case, the selection screen of the program appears straight away.
If there is more than one selection screen, select the screens for which you want to create the variant.
Example:
If you choose Variant for all selection screens, the variant also applies to any selection screens that you create after creating the variant.
Otherwise, the variant only supplies values to the selection screens that you select in the list.
Choose Continue.
The (first) selection screen of the program appears.
If your program has more than one selection screen, use the scroll buttons in the left-hand corner of the application toolbar to navigate between them. If you keep scrolling forwards, the Continue button appears on the last selection screen.
Enter the required selections, including multiple and dynamic selections.
Choose Continue.
Result
When you have finished, an overview screen appears (ABAP: Save Attributes of Variant), on which you can enter the attributes of your variant and save it.
Note that when you create a new variant, you must enter both values and attributes.
Names of variants: Names can consist of up to 14 alphanumeric characters. The "% " character is not allowed. If you want the variant to be transported automatically with its program, you must create a system variant. The name of a system variant starts "CUS&" for customers, and "SAP&" for SAP system variants. You can only use the "&" character within this prefix in the name of a system variant. It may not occur in any other context. System variants are administered by the Workbench Organizer. Although you can create and access variants from any client, they are always stored in client "000".
reward all help full answers

How to extract data from this Variant?

Hi All,
I hope someone could help me in solving this problem.
I have a VARIANT variable named "num". I know that it contains an array of strings. By using the command:
type = CA_VariantGetType(&num);
I obtain type=4211, that should correspond to an array of BSTR.
However, if I add "num" to "watch expression", I get "value={VT_BSTR | VT_ARRAY}" and the bitwise OR is 8200.
Now my questions are:
1- is it possible to see this array directly from the watch expression?
2- how can I extract this array of strings from the VARIANT?
This is really becoming challenging for me...
Regards and thanks for the attention
Francesco

You're right, maybe it won't work with an array of BSTR.
In this case I think we have to options since in LabWindows/CVI we have the possibility to store an array of BSTR as a pointer using the function CA_VariantSetBSTRPtr () but we can also store it as an array using the function CA_VariantSet1DArray ().
You can know which of them was used to create your variant by using the function CA_VariantHasPtr () that returns TRUE only if the variant was created using CA_VariantSetBSTRPtr () and you can use CA_VariantHasArray () that returns TRUE if the variant was created using the CA_VariantSet1DArray ().
Once you know how your variant was created you can convert it to the array of BSTR using the function CA_VariantGetBSTRPtr() or CA_VariantGet1DArray().
I created a little project and tested this functions.
As you can see, the code creates an array of BSTR strings and store them in two different variants using both the ways I explained and then convert the variant back to two array of strings (they are pointers actually) and take the first string of both pointer that can be seen into the watch-expression window.
Here you have the code:
size_t numberOfElements;
BSTR *myNEWBSTRArray;
BSTR *myNEWBSTRPointer;
HRESULT variantHasPointer;
HRESULT variantHasArray;
unsigned int variantTypeBSTRPointer;
unsigned int variantTypeBSTRArray;
BSTR myBSTR[3];
VARIANT myVariantBSTRPointer;
VARIANT myVariantBSTRArray;
char *ptrString;
char *arrayString;
BSTR firstOfPtr, firstOfArray ;
//Allocate Variants
myVariantBSTRPointer = CA_VariantEmpty ();
myVariantBSTRArray = CA_VariantEmpty ();
//Create the array of BSTR strings
myBSTR[0] = SysAllocString(L"I am a happy BSTR");
myBSTR[1] = SysAllocString(L"I am another happy BSTR");
myBSTR[2] = SysAllocString(L"I am one more happy BSTR");
//FIRST WAY: Convert the BSTR array to a BSTR pointer variant
CA_VariantSetBSTRPtr (&myVariantBSTRPointer, myBSTR);
//Get the variant type
variantTypeBSTRPointer = CA_VariantGetType (&myVariantBSTRPointer);
//this is true since the variant was created as BSTRPtr
variantHasPointer = CA_VariantHasPtr (&myVariantBSTRPointer);
// Retrieve the BSTR array as a new BSTR pointer
CA_VariantGetBSTRPtr (&myVariantBSTRPointer, &myNEWBSTRPointer);
//Take the first BSTR string stored in this array
firstOfPtr = myNEWBSTRPointer[0];
//SECOND WAY: Convert the BSTR array to a 1D array of BSTR variant
CA_VariantSet1DArray (&myVariantBSTRArray, CAVT_BSTR, 3, myBSTR);
//Get the variant type
variantTypeBSTRArray = CA_VariantGetType (&myVariantBSTRArray);
//this is true because this second variant was created as 1DArray
variantHasArray = CA_VariantHasArray (&myVariantBSTRArray);
//Retrieve the BSTR array as 1DArray.
//NOTE: myNEWBSTRArray is a BSTR* just like myNEWBSTRPointer variable was.
CA_VariantGet1DArray (&myVariantBSTRArray, CAVT_BSTR, &myNEWBSTRArray, &numberOfElements);
//Take the first BSTR string stored in this array
firstOfArray = myNEWBSTRArray[0];
//Convert the two BSTR strings to C-Strings that can be seen into the watch-expression
CA_BSTRGetCString (firstOfArray, &arrayString);
CA_BSTRGetCString (firstOfPtr, &ptrString);
Let me know if it helps
Best Regards
Luca Gallo
Application Engineer
National Instruments Italy

Job with dynamic variant

Hello everybody,
Could somebody help me to run a job with a dynamic variant (for instance a report with the changes for the last N days).
I read things about SAP_StoreVariant and RedwoodScript but I'm not able to perform the job...
Thanks for your help.

Go through this link...
http://help.sap.com/saphelp_47x200/helpdata/en/d1/802cfc454211d189710000e8322d00/frameset.htm
In this page
ABAP Workbench tools -->
VARIANTS -->
VARIABLE VALUES IN VARIANTS.
Hope this helps u a lot...
reward if it helps u...
sai ramesh.

Variant -Variables

Similar Messages

Maybe you are looking for