How to compare the date in filter.......

Hi,
I want to put the filter on the expiration date in Free characteristics. I need all the stock for which the expiration date is less than or equal to the current date.
I guess I need to create a variable for this , any suggestions ?
Thanks , Jeetu

Hi Jeetu,
you could just create a variable on the experation date. In the selection window choose selection 'Value range' and choose in the listbox next to it 'Less than or equal'. Now drag the variable 'Current calendar day' into the Selection box.
This should do the trick.
regards,
Raymond Baggen
Uphantis bv

Similar Messages

How to restrict the data with Filter in Query - Updated the description

Hi all,
Free Characteristics: u2018Service Orderu2019 & u2018Statusu2019.
Key Figures: u2018Response Timeu2019 & u2018Data Record Counteru2019.
Calculated Key Figure: u2018Resp Time > 1 hru2019.
Only u2018Plantu2019 is in ROWS and u2018Resp Time > 1 hru2019 & u2018Data Record Counteru2019 are in COLUMNS section.
The report looks like the below:
Plant---Resp Time > 1 hr -
Data Record Counter
100--1--
2
101--1--
3
After dragging the u2018Service Ordersu2019 from u2018Free Characteristicsu2019 , the report looks like the below:
Plant---Service Order -
Resp Time > 1 hr ---Data Record Counter
100--111--
1
100--120--
1
101--130--
1
101--141--
1
101--150--
1
I want only records whose u2018STATUSu2019 is u2018Yu2019. The u2018STATUSu2019 is u2018Blanku2019 for Service Orders 12, 13 & 15
and those records should not be there in the report.
The report should be like the below:
After dragging the u2018Service Ordersu2019 from u2018Free Characteristicsu2019, the report looks like the below:
Plant---Service Order -
Resp Time > 1 hr ---Data Record Counter
100--111--
1
101--141--
1
After creating the Restricted KF u2018Countu2019 on u2018Data Record Counteru2019 by restricting u2018STATUSu2019 to u2018Yu2019 and
dragging the u2018Service Ordersu2019 from u2018Free Characteristicsu2019, the Count shows ZERO :
Plant---Service Order -
Resp Time > 1 hr ---Count
100--111--
0
100--120--
0
101--130--
0
101--141--
0
101--150--
0
If I keep the Filter (globally) on 'STATUS = Y' then it returns 'NO Data'.
If I keep the u2018Service Ordersu2019 is in u2018Rowsu2019 and the Filter on u2018STATUSu2019 (u2018Yu2019) then it works fine, but the report should be based on PLANT.
Thanks in advance.
Reagrds,
Venkat.

Hi Gurus,
Thanks for u r all prompt replies...
Got the Solution...
Actually no need to work at query level...
iN Multiprovider.... we can select the WBS element Char for which ever cube data we want... just drop down the char in to the dimension which we need and R/click the Char select identification of participating char.. un-select the check box for char WBS element for the Cubes which we dont require the data......
Thanks to all
Cheers
Lajwanth
Edited by: Lajwanth Singh on Apr 27, 2010 10:41 PM

How to compare the date value with the date datatype column?

Hi,
I am executed a query to get output for the particular date in two different database.
I got output in one db environment, but in the another environment i didnt get the output.
APP_DECISION_DATE column contains date datatype
ex:
SQL> select DECISIONED_STAGE_ID,DECISIONED_STAGE_USER_ID from naap10_application where APP_DECISION_DATE = TO_DATE('23-JAN-07',
'DD-MON-YY'); 2
DECISIONED_STAGE_ID DECISIONED_STAG
2006060106 SYSTEM
DATABASE - II
SQL> select DECISIONED_STAGE_ID,DECISIONED_STAGE_USER_ID from naap10_application where APP_DECISION_DATE=
TO_DATE('31-JAN-2007','DD-MON-RRRR') and application_id=2007010028552;
no rows selected
in the same db i got the output while i used the TO_DATE(APP_DECISION_DATE)
SQL> select DECISIONED_STAGE_ID,DECISIONED_STAGE_USER_ID from naap10_application where TO_DATE(APP_DECISION_DATE)=
TO_DATE('31-JAN-2007','DD-MON-YYYY') and application_id=2007010028552; 2
DECISIONED_STAGE_ID DECISIONED_STAG
2006060113 SYSTEM
is it necessary to use TO_DATE function while i am using the data datatype column in the WHERE CLAUSE?
Thanks in advance.
siva

Sorry & thanks sathish,
Now i got the result.
SQL> select DECISIONED_STAGE_ID,DECISIONED_STAGE_USER_ID from naap10_application where APP_DECISION_DATE BETWEEN TO_DATE ('31.01.2007 00:00:00', 'DD.MM.YYYY HH24:MI:SS') AND TO_DATE ('31.01.2007 23:59:59', 'DD.MM.YYYY HH24:MI:SS')
2 and application_id=2007010028552;
DECISIONED_STAGE_ID DECISIONED_STAG
2006060113 SYSTEM
================================
But one doubt,
When i created the column with the date datatype how it gets the time value,
And in one environment db i got the result but in another environment i dont get,
Shall i want to change any session status of date?

How to compare the data in a highscore file(.txt) for a game?

As mention above,i would like to check the highscore everytime the game has finished,and updates it, what classes should be used? FileReader, FileWriter, or Properties? If so, how the codes is likely to be? Thanks a lot.

I would discourage you from using a plain old text file to save your high scores in. The obvious reason being is that your little brother can just edit the file in notepad, then run to you and taunt, "I've got the highest score, nyah nyah nyah!"
If you must do it, I would use PrintWriter and simply print out each line as needed. Reading the lines back into the game is only a tad more difficult, but you can simply read in each line as a String, and store each String in an array, or a Vector if you don't know how many high scores you will have.
In the long run, you should create a serializable object that contains either the Vector or the Array of scores and instruct the object to save itself or load itself as needed. This is essentially how Properties work except you have more control over the internal data format.
On second thought, Properties would work just fine, but you cannot guarantee that the scores will be saved in a particular order - you would have to add an additional routine to read in each Property (specifically, each name/score pair) and then sort them. Once you do that, there's no real difference between a Properties file and rolling your own Serializable array.

How to compare the data of two identical tables

My requirement is to compare two identical tables(eg., t1 and t2) and display the column, which value got changed, old value and its new value.
For eg:
T1:
StudId C1 C2 C3
1 40 50 90
2 30 80 100
3 20 10 11
T2:
StudId C1 C2 C3
1 100 60 90
2 30 90 100
3 20 60 80
output should be:
StudId Column prevvalue changedvalue
1 C1 40 100
1 C2 50 60
2 C2 80 90
3 C2 10 60
3 C3 11 80
Please help me to how to achieve using oracle pl/sql. It is bit urgent

No need of PL/SQL, you can do it in SQL as shown
SQL> create table t1
2 (
3 studentId number,
4 c1 number,
5 c2 number,
6 c3 number
7 );
Table created
SQL> insert into t1 values (1,40,50,90);
1 row inserted
SQL> insert into t1 values (2,30,80,100);
1 row inserted
SQL> insert into t1 values (3,20,10,11);
1 row inserted
SQL> commit;
Commit complete
SQL> create table t2
2 (
3 studentId number,
4 c1 number,
5 c2 number,
6 c3 number
7 );
Table created
SQL> insert into t2 values (1,100,60,90);
1 row inserted
SQL> insert into t2 values (2,30,90,100);
1 row inserted
SQL> insert into t2 values (3,20,60,80);
1 row inserted
SQL> commit;
Commit complete
SQL> select * from t1;
STUDENTID         C1         C2         C3
         1         40         50         90
         2         30         80        100
         3         20         10         11
SQL> select * from t2;
STUDENTID         C1         C2         C3
         1        100         60         90
         2         30         90        100
         3         20         60         80
SQL> select
2 t1.studentId StudId,'c1' ColumnName,t1.c1 prevvalue,t2.c1 changedvalue
3 from t1,t2
4 where t1.studentId = t2.studentId and
5 t1.c1 <> t2.c1
6 union
7 select
8 t1.studentId,'c2',t1.c2,t2.c2
9 from t1,t2
10 where t1.studentId = t2.studentId and
11 t1.c2 <> t2.c2
12 union
13 select
14 t1.studentId,'c3',t1.c3,t2.c3
15 from t1,t2
16 where t1.studentId = t2.studentId and
17 t1.c3 <> t2.c3
18 ;
    STUDID COLUMNNAME PREVVALUE CHANGEDVALUE
         1 c1                 40          100
         1 c2                 50           60
         2 c2                 80           90
         3 c2                 10           60
         3 c3                 11           80
SQL>

How to compare the data in a view with data present in a master data?

Hi All,
We have loaded some data into a Master Data Object (YMETADATA) in Development system.
Now, the same data can be present in a view RSDVCHA.
Our aim is to write a ABAP program, which would read a record from RSDVCHA and look into Master Data records and show whether it is present in the master data or not?
Has anyone written such type of code earlier, If so, please do help me out in writing this code?
Thanks in advance,
Anjum.

Hello Anjum,
It looks that the view is based on the master data table itself and view doesn't contain data and is a logical representation of the underlying database tables.
Moreover the view RSDVCHA is used for viewing the characteristics, basic chars and local properties.
Are you storing similar values in YMETADATA?
[Thanks|http://chandranonline.blogspot.com/]
[Chandran|http://chandranonline.blogspot.com/]

How to compare the Two Date field

Hi
i am doing a program with has two field in the Database IssueDate and the ReturnDate. But these two Field Data Type are Text. i don't use them as Data/Time. Now i want to compare the ReturnDate With Today's Date. That is whether ReturnDate is Less than Today's Date.
Please give me a suggestion to proceed with this Particular Program.
Thank you for your suggestion
jofin

Hi thank you for your reply
1) i am Creating a library system In that when i issue a book i have to add the number days that a candidate Eligible to hold the Book with a Issue Date and store it as a Return date.
2) i want to know who has to return the Books on Today.
3) i want to know you has to return the Book Yet.
For 1 st one i used GregorianCalendar gcal=new GregorianCalendar();
          ridate= gcal.get(Calendar.DATE);
          rimonth=(int)gcal.get(Calendar.MONTH)+1;
          riyear= gcal.get(Calendar.YEAR);
          rissuedate = ridate+"/"+rimonth+"/"+riyear;this and Calulate it the Returndate.
is it Possible to convert This rissuedate = ridate+"/"+rimonth+"/"+riyear; string into date like this Formate dd/mmd/yy. and store the Date in the Database
if so please tell me how to write a query to insert a date and while retriving how to retrive the Date.
i mean when we retrive a String from database we use getString(); method . Like this how to retrive the Date
Please help me on this Issue
Thank you very much for your Help
Cheers
Jofin

How to Audit the data displayed within a Webi report

Hi All,
We have BOBJ XI R2 SP4 installed on our server.
One of the requirements is to audit the data the user has viewed through Canned reports and also Adhoc reports created in Webi.
I understand that we can audit what reports are accessed by the user, but not sure how to audit the data within the report. Could someone please let me know if auditing data can be acheived form SDK ? If so how ?
Thanks,
Sireesha

Pablo,
The following should get you started;
This is a report to pull Universe Name, Report Name, Action Time (last refreshed), Action Duration (execution time), User Name and Object Name (universe objects used in reports).
The Result Objects are as follows:
Object Name from Actions/Action Details
Action Time from Actions
Action Duration from Actions
Action Type from Actions
Action Type Detail from Actions (detail object associated with Action Type)
User Name from Actions
Document Name from Actions/Document
Universe Name from Actions/Action Details
The Query Filters are as follows:
Action Time between Day1 And Day2
Note: The Query Filter is necessary (obviously) only to restrict the size of the query. I wouldn't run this query without a filter on demand. Depending on the size of your deployment, you might want to restrict the query initially to a specific universe/list of universes while testing.
At the report level, I moved Universe Name and Document Name in to (nested) sections.
i.e.
Section on: Universe Name
Section on: Document Name
Table
Another option would be to retrieve this information from the CMS tables using WID Scanner [here|http://www.forumtopics.com/busobj/viewtopic.php?t=80856]
The last option would be to use the Report Engine SDK (for Webi) to write a program extract this information from the CMS tables and pass it to another table. WID scanner (above) does effectively the same thing, passes the info to an MS Access table (if I remember correctly..I may be wrong. I have'nt used it since it last tried to create a report to extract all used objects.)
Best,
Srinivas

How to export the data to a excel file from RSA3?

Hi experts,
1.I am trying to save the RSA (SRM extractor) to excel spread sheet to compare SRM data with BI data. When i run the the transaction RSA3 it just showed me 10 different data packets. How to export the data to excel spread sheet for reconciliation?
2. Does any body know if the stepup tables exist for SRM extractors?
Thank in advance
Sharat.

Hello Sharat,
You have two options of saving data to excel sheet:
Step 1:
Goto RSA3, change the "Data Records / Calls" to 1000 and then execute. This way instead of 10 different packets you will get one packet.
Step2:
Click on the list button, open the packet by double clicking it. You will see all the data on your screen.
Step3:
Goto System -> List -> Save - > Local File -> Spreadsheet and give some name for your xls file.
Assign points if helpful.
Regards,
F-S

How to retrieve the data from SAP-BAPI by using VB Code

Hi ,
I am new to BAPI.
V have created an application in Visual Basic with the following fields
EmpNo , EmpName, Addr1, Addr2, City and Phone (Only for Test)
We have written the code for SAVING the data into SAP. Already we have
constructed a table with the respective fields in SAP.
For that we ourself created our own BAPI Structure / Function Group /
Function Module/ Business Object - RELEASED related elements.
1)Established the connection successfully.
2)Stored the data into SAP Successfully and v r in need of
3)HOW TO RETRIEVE THE DATA FROM SAP (USING GETLIST.....GETDETAIL....)
Following is the code :
'BAPI Structure : ZBAPIEMP
'Function Group : ZBAPIEMP
'Function Module : ZBAPI_EMP_CREATEFROMDATA
'Business Object : ZBAPIEMP
'Function Module : ZBAPI_EMP_GETLIST
Dim bapictrl As Object
Dim oconnection As Object
Dim boEmp As Object
Dim oZEmp_Header As Object
Dim oImpStruct As Object
Dim oExpStruct As Object
Dim oreturn As Object
Dim x As String
Private Sub Form_Load()
Set bapictrl = CreateObject("SAP.BAPI.1")
Set oconnection = bapictrl.Connection
oconnection.logon
Set boEmp = bapictrl.GetSAPObject("ZBAPIEMP")
Set oZEmp_Header = bapictrl.DimAs(boEmp, "CreateFromData", "EmployeeHeader")
Set oImpStruct = bapictrl.DimAs(boEmp, "GetList", "EmployeeDispStruct")
End Sub
Private Sub cmdSave_Click()
    oZEmp_Header.Value("EMPNO") = txtEmpNo.Text
    oZEmp_Header.Value("EMPNAME") = txtEmpName.Text
    oZEmp_Header.Value("ADDR1") = txtAddr1.Text
    oZEmp_Header.Value("ADDR2") = txtAddr2.Text
    oZEmp_Header.Value("CITY") = txtCity.Text
    oZEmp_Header.Value("PHONE") = txtPhone.Text
    boEmp.CreateFromData EmployeeHeader:=oZEmp_Header, Return:=oreturn
    x = oreturn.Value("Message")
    If x = "" Then
        MsgBox "Transaction Completed!..."
    Else
        MsgBox x
    End If
End Sub
Private Sub cmdView_Click()
End Sub
COULD ANYBODY GUIDE ME, HOW TO RETRIEVE THE DATA FROM BAPI, FOR THE WRITTEN CODE.

I didn't seen any other answers but here's how it's been done previously in our organization for a custom BAPI. In this example, we give material and language to return the part description. It's not specific to your project but may give you ideas..
-Tim
Option Compare Database
Dim SAPLOGIN As Boolean
Dim FunctionCtrl As Object
Dim SapConnection As Object
Sub SAPLOGOUT()
On Error GoTo LogoutFehler
    SapConnection.logoff
    SAPLOGIN = False
Exit Sub
LogoutFehler:
    If Err.Number = 91 Then
        Exit Sub
    Else
        MsgBox Err.Description, vbCritical, "Fehler-Nr." & CStr(Err.Number) & " bei SAP-Logout"
    End If
End Sub
Function SAPLOG() As Boolean
'Verbindungsobjekt setzen (Property von FunctionCtrl)
   Set FunctionCtrl = CreateObject("SAP.Functions")
   Set SapConnection = FunctionCtrl.Connection
'Logon mit Initialwerten
   SapConnection.Client = "010"
   SapConnection.Language = "EN"
   SapConnection.System = "PR1"
   SapConnection.SystemNumber = "00"
   'SapConnection.Password = ""
   SapConnection.GroupName = "PR1"
   SapConnection.HostName = "168.9.25.120"
   SapConnection.MessageServer = "168.9.25.120"
     If SapConnection.Logon(0, False) <> True Then 'Logon mit Dialog
         Set SapConnection = Nothing
         DoCmd.Hourglass False
         MsgBox "No connection to SAP R/3 !"
         SAPLOGIN = False
         SAPLOG = False
         Exit Function
      End If
    SAPLOG = True
End Function
Function MatDescr(MatNr As String)
Dim func1 As Object
Dim row As Object, X As Integer, ErsteNr As String
Dim DatensatzZähler As Long
Dim RowField(1 To 50, 0 To 1) As String, RowLine As Long
    If Not SAPLOGIN Then
        If Not SAPLOG() Then
            MsgBox "No connection to SAP !", 16
            SAPLOGOUT
            Exit Function
        End If
    End If
' Instanziieren des Function-Objektes
Set func1 = FunctionCtrl.Add("Z_BAPI_READ_MAKT")
' Export-Paramter definieren
func1.exports("MATNR") = MatNr
func1.exports("SPRAS") = "EN"
DoEvents
If Not func1.call Then
    If func1.exception <> "" Then
        MsgBox "Communication Error with RFC " & func1.exception
    End If
    DoCmd.Hourglass False
    SAPLOGOUT
    Exit Function
Else
MatDescr = func1.imports("MAKTX")
End If
If MatDescr = "" Then
    MatDescr = "PART NO. NOT FOUND"
End If
End Function

How to Compare two Dates in java

How to Compare two Date Field after getting the values from jTextField1.getText() and jTextField2.getText().

Date d1=DateFormat.getDateInstance().parse(yourstring1);
same for d2
d1.compareTo(d2);
could be that i misrememberd the exact naems of some functions or mixed up something in the equence of d1=

How to compare table data and table field

Hi buddy,
    I have some question about how to compare table data and table field.
   1. I know there is one method:   CL_ABAP_UNIT_ASSERT=>ASSERT_TABLE_CONTAINS , it use in unit test to compare the table data(A and B) , you can loop table A into structure A1, then use this mehtod it can compare whether table B contain structure A1. but when I try to use this in main program it will dump.
          CL_ABAP_UNIT_ASSERT=>ASSERT_TABLE_CONTAINS(
                                                                                                    LINE    = A1
                                                                                                    TABLE = B ).
       Is there any method or FM can be used to compare the table data ?
    2. I also want to compare two table field , try to find out the different. How to realize this.
Thank you for your sincerely answer.

Hi Zongjie,
What`s the difference, if you using loop A into wa_A, read table B into wa_B with all field, then compare with wa_A and wa_B.
The question 2, seems no standard FM available here.
Loop A into wa_A.
   Loop B into wa_B.
       if wa_A-field1 eq wa_B-field1.
       endif.
        if wa_A-field2 eq wa_B-field2.
       endif.
   endloop.
endloop.
regards,
Archer

How to compare the contents of two different tables

hello. can somebody give me an idean on how to compare the contents of two different tables in mysql?
example, i have a table named Main List and a table named New List.
The contents of the New List should be compared to the contents of the
Main List, to check if they are equal. I don't have any idea how to manipulate
this data. Hoping for your help. Thanks.

it is better to comapre it using java.. try get the resultset first and store that in collections then comapre the two collections

How to compare the value of a specied attribute to a string

I am looking for an example of how to compare the value of an attribute to a string. (I think)
I have been trying to:
if (attrs.get("title")== "Vampire") -- you already know this did not work.
How can I check to see if the title="Vampire"?
The code below will get me the title of admin (which should be Vampire)
import javax.naming.Context;
import javax.naming.directory.InitialDirContext;
import javax.naming.directory.DirContext;
import javax.naming.directory.Attributes;
import javax.naming.NamingException;
import java.util.Hashtable;
class Giles {
public static void main(String[] args) {
          Hashtable env = new Hashtable();
env.put(Context.INITIAL_CONTEXT_FACTORY,
     "com.sun.jndi.ldap.LdapCtxFactory");
env.put(Context.PROVIDER_URL, "ldap://192.168.1.55:389/o=sunnydale");
     try {
     DirContext ctx = new InitialDirContext(env);
     Attributes attrs = ctx.getAttributes("cn=admin");
     System.out.println("Title: " + attrs.get("title").get());
     ctx.close();
     } catch (NamingException e) {
     System.err.println("Problem getting attribute: " + e);
Thank you!!
Steve

I guess, you are looking for searching for attributes of an user object.
Here is the sample code to list all the attributes of an 'user' objectclass.
Tell me if it helps or not.
import java.util.Hashtable;
import javax.naming.ldap.*;
import javax.naming.directory.*;
import javax.naming.*;
public class GetAttributes
     public static void main (String[] args)
          Hashtable env = new Hashtable();
          //Must use either the userPrincipalName or samAccountName,
          //Cannot use the distinguished name
          String adminName = "cn=abcd,cn=Users,dc=ssotest,dc=com";
          String adminPassword = "DEF1234";
          String ldapURL = "ldap://pni3w067:389";
          env.put(Context.INITIAL_CONTEXT_FACTORY,"com.sun.jndi.ldap.LdapCtxFactory");
          env.put(Context.SECURITY_AUTHENTICATION,"simple");
          env.put(Context.SECURITY_PRINCIPAL,adminName);
          env.put(Context.SECURITY_CREDENTIALS,adminPassword);
          //connect to my domain controller
          env.put(Context.PROVIDER_URL,ldapURL);
          try {
               // Create the initial directory context
               DirContext ctx = new InitialLdapContext(env,null);
               // Create the search controls
               SearchControls searchCtls = new SearchControls();
               //Specify the search scope
               searchCtls.setSearchScope(SearchControls.SUBTREE_SCOPE);
               //specify the LDAP search filter
               String searchFilter = "(&(objectClass=user))";
               //Specify the Base for the search
               //cn=policygroup,ou=policyusers,ou=ssoanay,;
               //String searchBase = "ou=policyusers,ou=ssoanay,dc=ssotest,dc=com";
               String searchBase = "cn=abcd,cn=users,dc=ssotest,dc=com";
               //initialize counter to total the results
               int totalResults = 0;
               // Search for objects using the filter
               NamingEnumeration answer = ctx.search(searchBase, searchFilter, searchCtls);
               //Loop through the search results
               while (answer.hasMoreElements()) {
                    SearchResult sr = (SearchResult)answer.next();
                    totalResults++;
                    System.out.println("\nName of Object : " + sr.getName());
                    // Print out some of the attributes, catch the exception if the attributes have no values
                    Attributes attrs = sr.getAttributes();
                    //System.out.println("6");
                    if (attrs != null) {
                         try {
                              /*NamingEnumeration enum = attrs.getIDs();
                              while(enum.hasMore()) {
                                   System.out.println("IDs:"+enum.next().toString());
                              NamingEnumeration enum2 = attrs.getAll();
                              while(enum2.hasMore()) {
                                   System.out.println("Attribute - "+enum2.next().toString());
                         catch (Exception e)     {
                              System.out.println("Exception:" +e.getMessage());
                    else {
                         System.out.println("attribute is null");
               System.out.println("Total results: " + totalResults);
               ctx.close();
          catch (NamingException e) {
                    System.err.println("Problem searching directory: " + e);
     //return 0;
}

How to pull the data into smartform after designing layout?

how to pull the data into smartform after designing layout?

call the smartform in your Driver program and pass your output internal tables in the smartforms paramaters
Check the below Sample code.
FORM label_print.
DATA : g_fm_name TYPE rs38l_fnam,
         g_output TYPE ssfcompop,
         g_control TYPE ssfctrlop,
         g_form TYPE tdsfname VALUE 'ZPRINT_LABELS',
         g_dest TYPE rspopname,
         g_printer TYPE rspoptype..
REFRESH : i_out[],i_qals[].
SELECT matnr maktx
         INTO TABLE i_out
         FROM makt
         FOR ALL ENTRIES IN i_mseg
         WHERE matnr = i_mseg-matnr
         AND   spras = sy-langu.
SELECT prueflos objnr ersteldat erstelzeit matnr revlv charg mengeneinh
         INTO TABLE i_qals
         FROM qals
         FOR ALL ENTRIES IN i_mseg
         WHERE matnr = i_mseg-matnr
         AND   charg = i_mseg-charg.
*FM to accept the device type and returns the short name of the output device
CALL FUNCTION 'EFG_GET_PRINTER'
    EXPORTING
      x_no_dialog = ' '
      x_obligatory = 'X'
    IMPORTING
      y_tddest     = g_dest
    EXCEPTIONS
      cancelled    = 1
      failed       = 2
      OTHERS       = 3.
*device type name for the output device
SELECT SINGLE patype                                  "#EC CI_NOFIELD
         FROM tsp03d
         INTO g_printer
         WHERE padest = g_dest.
*printer setting
g_control-no_dialog = 'X'.
g_output-tdarmod = '1'.
g_output-tdcopies = '001'.
g_output-tddest = g_dest.
g_output-tdprinter = g_printer.
g_output-tdnewid = 'X'.
g_output-tdimmed = 'X'.
CLEAR wa_mseg.
LOOP AT i_mseg INTO wa_mseg.
    READ TABLE i_out INTO wa_out WITH KEY matnr = wa_mseg-matnr.
check for the status and filter the records
    CLEAR : wa_qals.
    LOOP AT i_qals INTO wa_qals WHERE matnr = wa_mseg-matnr
                                AND charg = wa_mseg-charg.
      CALL FUNCTION 'STATUS_TEXT_EDIT'
        EXPORTING
          objnr            = wa_qals-objnr
          spras            = sy-langu
        IMPORTING
          line             = l_status
        EXCEPTIONS
          object_not_found = 1
          OTHERS           = 2.
      IF l_status CS 'LTCA' OR l_status CS 'SKIP'.
        DELETE i_qals.
      ENDIF.
    ENDLOOP.
    SORT i_qals BY ersteldat DESCENDING erstelzeit DESCENDING.
    IF i_qals IS INITIAL.
      l_msg = text-002.
    ELSE.
      READ TABLE i_qals INTO wa_qals INDEX 1.
      SELECT prueflos vbewertung
             INTO TABLE i_qave
             FROM qave
             WHERE prueflos = wa_qals-prueflos
             AND   kzart = 'L'.
      IF sy-subrc <> 0.
        l_msg1 = text-003.
      ENDIF.
      SORT i_qave.
      CLEAR : wa_qave.
      IF NOT i_qave IS INITIAL.
        READ TABLE i_qave INTO wa_qave INDEX 1.
        IF wa_qave-vbewertung = 'A'.
          l_msg = text-002.
        ELSEIF wa_qave-vbewertung = 'R'.
          l_msg1 = text-003.
        ELSE.
          l_msg1 = text-003.
        ENDIF.
      ENDIF.
    ENDIF.
    CLEAR : wa_ser03.
    READ TABLE i_ser03 INTO wa_ser03 WITH KEY mblnr = wa_mseg-mblnr.
*Calling Smartform
    CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
      EXPORTING
        formname           = g_form
      IMPORTING
        fm_name            = g_fm_name
      EXCEPTIONS
        no_form            = 1
        no_function_module = 2
        OTHERS             = 3.
    LOOP AT i_objk INTO wa_objk WHERE obknr = wa_ser03-obknr.
*Calling FM generated from the smartform
      DATA : l_date(10) TYPE c,
             l_date1(10) TYPE c,
             l_date2(10) TYPE c,
             l_date3(10) TYPE c,
             l_hyphen(1) TYPE c VALUE '-'.
      CLEAR : l_date,l_date1,l_date2,l_date3.
      l_date1 = wa_mseg-vfdat+0(4).
      l_date2 = wa_mseg-vfdat+4(2).
      l_date3 = wa_mseg-vfdat+6(2).
      CONCATENATE l_date1 l_hyphen l_date2 l_hyphen l_date3 INTO l_date.
      CALL FUNCTION g_fm_name
        EXPORTING
          control_parameters = g_control
          output_options     = g_output
          user_settings      = ' '
          g_matnr            = wa_mseg-matnr
          g_mat_text         = wa_out-maktx
          g_batch            = wa_mseg-charg
          g_rev              = wa_qals-revlv
          g_edate            = l_date
          g_lot              = wa_qals-prueflos
          g_qty              = wa_mseg-erfmg
          g_uom              = wa_mseg-erfme
          g_serial           = wa_objk-sernr
          g_smsg             = l_msg
          g_fmsg             = l_msg1
        EXCEPTIONS
          formatting_error   = 1
          internal_error     = 2
          send_error         = 3
          user_canceled      = 4
          OTHERS             = 5.
      CLEAR g_output-tdnewid.
    ENDLOOP.
    IF sy-subrc <> 0.
      CLEAR : l_date,l_date1,l_date2,l_date3.
      l_date1 = wa_mseg-vfdat+0(4).
      l_date2 = wa_mseg-vfdat+4(2).
      l_date3 = wa_mseg-vfdat+6(2).
      CONCATENATE l_date1 l_hyphen l_date2 l_hyphen l_date3 INTO l_date.
      CALL FUNCTION g_fm_name
        EXPORTING
          control_parameters = g_control
          output_options     = g_output
          user_settings      = ' '
          g_matnr            = wa_mseg-matnr
          g_mat_text         = wa_out-maktx
          g_batch            = wa_mseg-charg
          g_rev              = wa_qals-revlv
          g_edate            = l_date
          g_lot              = wa_qals-prueflos
          g_qty              = wa_mseg-erfmg
          g_uom              = wa_mseg-erfme
          g_serial           = wa_objk-sernr
          g_smsg             = l_msg
          g_fmsg             = l_msg1
        EXCEPTIONS
          formatting_error   = 1
          internal_error     = 2
          send_error         = 3
          user_canceled      = 4
          OTHERS             = 5.
      CLEAR g_output-tdnewid.
    ENDIF.
ENDLOOP.
IF sy-subrc = 0.
    MESSAGE i000(zm).
ENDIF.
ENDFORM.                    " label_print

How to compare the date in filter.......

Similar Messages

Maybe you are looking for