How to hide rows in output

Hi Techis
i m doin a report for Sales order for finished goods..
here i am shwin Status eg RED for goods not delivered at all YELLOW for goods delivered partially and GREEN  for  goods completely delivered .
nw thing is dat i dont want to display goods that are completely deliverd i.e with GREEN status
So anybody have clue hw to hide or any condition so that it wont display at outout ....
Rewards will be gin for ans
Regards
Santosh L

Hi Santosh,
LOOP AT ITAB into wa_itab.
IF COLOR NE GREEN.
move wa_itab to wa_itab1.
append itab1 from wa_itab1.
ENDIF.
ENDLOOP.
Display the ALV with itab1.
Reward if useful.
Regards,
Chitra Parameswaran

Similar Messages

  • How to hide rows?

    Hello folks,
    I just would like to know that how to hide rows except dbms_rls package? I mean, it has been said that I can hide rows to create views but lets said that I have got 200 students and each student can see only their rows in students table, in that scenerio I have to create 200 views, isn't it? I just would like to learn that how to hide rows with using views? Do you have any ideas?
    Note: I know dbms_rls package, except this solution I am tryin to find onather solution.
    Thanks a lot.

    Hi,
    Polat wrote:
    Hello folks,
    I just would like to know that how to hide rows except dbms_rls package? I mean, it has been said that I can hide rows to create views but lets said that I have got 200 students and each student can see only their rows in students table, in that scenerio I have to create 200 views, isn't it? No! As you realized, that's not practical.
    If every student is a separate Oracle user, the USER fucntion will return the name of the current user. A view definition can reference that function, like this:
    CREATE OR REPLACE VIEW view_x
    AS
    SELECT   *
    FROM    table_x
    WHERE   student_account  = USER;If you logged in to Oracle as POLAT, then the view will contain only rows where student_account='POLAT'.
    If you logged in to Oracle as SYSTEM, then the view will contain only rows where student_account='SYSTEM'.
    If students do not have thier own Oracle accounts, then they are probably authenitcated by some procedure in your package. That procedure can set a SYS_CONTEXT variable, or write data to a global temporary table, which you can then use instead of the USER function in view definitions.
    Note: I know dbms_rls package, except this solution I am tryin to find onather solution.Why can't you use dbms_rls, or why don't you want to use it? It's a very powerful tool, and not vey hard to use.
    I'm not saying there's never a good reason not to use dbms_rls; I'm just asking if you have one.
    I hope this answers your question.
    If not, give a specific example of what you want. Post CREATE TABLE and INSERT statements for some sample data for all tables involved. Identify 2 or 3 different students, and show what the contents of the view should be for each student, given the same sample data. If students do not log in to Oracle with their own usernames, then explain how you know which student is currently logged in.

  • How to hide rows with merged cells?

    I would like to know how to hide rows on numbers with merged cells, could do it normally at excel but I am not being able to do it at Numbers.
    thanks!

    Felipe,
    To hide a row with Merged Cells, Un-Merge first, then Hide. Select the Merged Cells and Table > Unmerge.
    Note that this is only a problem with vertically merged cells when you want to Hide a Row.
    If you want to Hide a Column, you can't have a Horizontal Merge that involves that Column.
    Jerry

  • How to hide row in JTable?

    Hi all,
    How to hide some specific rows in JTable for user view filtering purpose?
    Thanks

    Try to use the Table Model.
    The "getValueAt" Methode decide what to Display.
    So a simple "if" command can hide the complete row - or a single Statement.
    public Object getValueAt(int row, int col) {
    ArrayList al = new ArrayList();
    StueliTeil tabellenzeile = (StueliTeil) getDaten().get(row);
    switch (col) {
    case 0 :
    return tabellenzeile.getUmfang();
    case 1 :
    return tabellenzeile.getTakt();
    ...

  • How  to hide Rows Conditionaly??

    Hi All BOBJ Experts,
    Is it possible to hide measure value conditionaly in WEBI XI 4.0.....i have 3 dimension Objects and 2 measure Objects..(i.e)Product Code,Name,Capacity,Quantity,Unit(Ton,Kg,Litters,etc).....i want to hide rows if Quantity is null...
    thanks in advance....
    Regards,
    Sella Perumal P

    check this:
    HOW TO HIDE A ROW ON WEBI REPORT WITH 0 AND NULL VALUES
    rgs,
    Parth.

  • How to hide rows if all values are Zero  (0) horizontally?

    Hi,
    I have got a requirement to hide rows from the results if all values are equal to zero horizontally.
    Example:
    Region   M1    M2   M3
    East     0      0    3
    West    10     20    0
    South   -5      0    5
    North    0      0    0In the above example only North Region row should be hidden from the results becasue all the measures values are zero.
    Can someone please let me know the logic to achieve this?
    Thank in advance.

    Hi Karthik,
    Your answer was spot on(you are awarded points) but not my question. My client uses some X erp, which removes all zero value records when he clicks to see results. He wanted the same thing for Answers (he does not want to add any filters). Is there anyway to achive that, like using javascript or something?
    Thanks in advance.

  • How to Hide Row in table view depend on condition

    Dear Friends,
    Please any one suggest how to do hide some rows in table depend on condtions.
    My Issue is :
    I have table with binding componant context controller, with in that some rows are no need to disply in my table, I tried to delete that entities from collection wrapper in do_prepare_output. but that entites are perminatly deleted from model node.
    how can achive this with out delete entities from model node and hide some rows in table view.
    thanks & Regards

    Hi Andrew,
    Please can you explain alobrate, because i wont' found that method in my implimentation and it's table config like follow
    <% IF attr->check_consistency( ) eq abap_true. %>
        <chtmlb:configTable  xml="<%= lv_xml %>"
                             id="TextList"
                             navigationMode="BYPAGE"
                             onRowSelection="select"
                             table="//Text/Table"
                             width="100%"
                             selectedRowIndex="<%=Text->SELECTED_INDEX%>"
                             selectedRowIndexTable="<%=Text->SELECTION_TAB%>"
                             selectionMode="<%=Text->SELECTION_MODE%>"
                             usage="ASSIGNMENTBLOCK"
                             visibleRowCount="3"/>
      <% ENDIF. %>
    thanks & Regards
    Ganesh

  • How to Hide rows in Reports

    Hi All,
    I'm working on OBIEE 10.1.3.4 version on windows envorinment.
    For one of my report am using Greand Total option. for example for grand total its shoeing 20 rows in these i need to hide some of the rows.
    How can achieve this, could you pls help me.

    Hi user,
    do you have condition on which to select the rows to be hidden?
    what do you exactly mean by hidden... do you mean they should be filtered? In that case you can apply a filter based on the condition.
    Please elaborate your requirement..
    Regards,
    Kiran

  • SQL Developer - how to limit rows in output

    I want to look at a record (Select * ), but only want to view the first 10 rows, for field info. How do I limit the row output to 10 rows?

    Welcome to the forum!
    >
    I want to look at a record (Select * ), but only want to view the first 10 rows, for field info. How do I limit the row output to 10 rows?
    >
    What does that have to do with SQL Developer?
    You can limit the rows a query returns by using ROWNUM
    SELECT * FROM myTable where rownum < 11If you just need column info you can describe the table
    SQL> set serveroutput on
    SQL> desc dept
    Name                                      Null?    Type
    DEPTNO                                    NOT NULL NUMBER(2)
    DNAME                                              VARCHAR2(14)
    LOC                                                VARCHAR2(13)
    SQL>If you have SQL questions you need to post them in the SQL and PL/SQL forum
    PL/SQL

  • How to hide row column on condition in report

    Hello everyone,
    Can its is possible to hide a Column of a row in report.
    For one customer i am having Opening Balance n Closing Balance data.....i m breaking my report on customer wise (First Column). So I can see Customer only one time not 5..... now i want to see Opening Balance Data only in first row n Closing Balance Data only in last row.
    How can i achieve this, pls help!
    regards,
    UKJ

    Hi,
    I have no idea but try this:SELECT  SEGMENT1,
            VENDOR_NAME,
            VENDOR_SITE_CODE,
            INVOICE_NUMBER,
            INVOICE_DATE,
            INVOICE_TYPE_LOOKUP_CODE,
            PAY_DATE,
            DESCRIPTION,
            CHECK_DATE,
            CHECK_NUMBER,
            VOUCHER_NUM,
            SUM(debit) debit,
            null credit,
            op_bal,
            cl_bal
    from (
    SELECT  SEGMENT1,
            VENDOR_NAME,
            VENDOR_SITE_CODE,
            INVOICE_NUMBER,
            INVOICE_DATE,
            INVOICE_TYPE_LOOKUP_CODE,
            PAY_DATE,
            DESCRIPTION,
            CHECK_DATE,
            CHECK_NUMBER,
            VOUCHER_NUM,
            SUM(debit) debit,
            null credit,
            op_bal,
            cl_bal
            row_number () over (partition by VENDOR_NAME order by INVOICE_DATE) rnk
    from (
    SELECT  SEGMENT1,
            VENDOR_NAME,
            VENDOR_SITE_CODE,
            INVOICE_NUMBER,
            INVOICE_DATE,
            INVOICE_TYPE_LOOKUP_CODE,
            PAY_DATE,
            DESCRIPTION,
            CHECK_DATE,
            CHECK_NUMBER,
            VOUCHER_NUM,
            SUM(debit) debit,
            null credit,
            op_bal,
            cl_bal   
        FROM (   
    SELECT POV.SEGMENT1,
           POV.VENDOR_NAME,
           pov.vendor_id,
           POVS.VENDOR_SITE_CODE,
           hou.SET_OF_BOOKS_ID,
           API.INVOICE_NUM INVOICE_NUMBER,
           API.INVOICE_DATE,
           API.INVOICE_TYPE_LOOKUP_CODE,
           APPL.ACCOUNTING_DATE PAY_DATE,
           API.DESCRIPTION DESCRIPTION,
           TO_CHAR(APC.CHECK_DATE, 'dd-MON-yyyy') CHECK_DATE,
           APC.CHECK_NUMBER,
           APC.DOC_SEQUENCE_VALUE VOUCHER_NUM,
           API.INVOICE_AMOUNT,appl.amount,
           DECODE(API.INVOICE_TYPE_LOOKUP_CODE,'CREDIT',API.INVOICE_AMOUNT ,appl.amount) debit,
           null credit,
           jai_ap_rpt_apcr_pkg.compute_credit_balance(API.INVOICE_DATE,pov.vendor_id,hou.SET_OF_BOOKS_ID,povs.VENDOR_SITE_CODE,:p22_org_id) cr_amt,
           jai_ap_rpt_apcr_pkg.compute_debit_balance(API.INVOICE_DATE,pov.vendor_id,hou.SET_OF_BOOKS_ID,povs.VENDOR_SITE_CODE,:p22_org_id) dr_amt,
           jai_ap_rpt_apcr_pkg.compute_credit_balance(:P22_FROM_DATE,pov.vendor_id,hou.SET_OF_BOOKS_ID,povs.VENDOR_SITE_CODE,:p22_org_id) -
           jai_ap_rpt_apcr_pkg.compute_debit_balance(:P22_FROM_DATE,pov.vendor_id,hou.SET_OF_BOOKS_ID,povs.VENDOR_SITE_CODE,:p22_org_id) op_bal,
           jai_ap_rpt_apcr_pkg.compute_credit_balance(:P22_TO_DATE,pov.vendor_id,hou.SET_OF_BOOKS_ID,povs.VENDOR_SITE_CODE,:p22_org_id) -
           jai_ap_rpt_apcr_pkg.compute_debit_balance(:P22_TO_DATE,pov.vendor_id,hou.SET_OF_BOOKS_ID,povs.VENDOR_SITE_CODE,:p22_org_id) cl_bal
        FROM AP_INVOICES_ALL API,
             AP_INVOICE_LINES_ALL APIL,
             AP_INVOICE_DISTRIBUTIONS_ALL APD,
             PO_VENDORS POV,
             PO_VENDOR_SITES_ALL POVS,
             AP_INVOICE_PAYMENTS_ALL APPL,
             AP_CHECKS_ALL APC,
             hr_operating_units hou
       WHERE API.INVOICE_ID = APIL.INVOICE_ID
         AND API.INVOICE_ID = APD.INVOICE_ID
         AND API.VENDOR_ID = POV.VENDOR_ID
         AND API.VENDOR_SITE_ID = POVS.VENDOR_SITE_ID
         AND API.INVOICE_ID = APPL.INVOICE_ID
         AND APPL.CHECK_ID = APC.CHECK_ID
         AND APIL.line_number = apd.invoice_line_number
         AND APD.match_status_flag='A'
         AND API.org_id=hou.ORGANIZATION_ID
         AND APIL.LINE_TYPE_LOOKUP_CODE='ITEM'
         AND api.org_id = nvl(:p22_org_id,api.org_id)
         AND TRUNC(API.INVOICE_DATE) BETWEEN NVL (:P22_FROM_DATE,API.INVOICE_DATE)AND NVL(:P22_TO_DATE,API.INVOICE_DATE)
    GROUP BY SEGMENT1,
             VENDOR_NAME,
             VENDOR_SITE_CODE,
             INVOICE_NUMBER,
             INVOICE_DATE,
             INVOICE_TYPE_LOOKUP_CODE,
             PAY_DATE,
             DESCRIPTION,
             CHECK_DATE,
             CHECK_NUMBER,
             VOUCHER_NUM,
             op_bal,
             cl_bal
    UNION
    SELECT SEGMENT1,
           VENDOR_NAME,
           VENDOR_SITE_CODE,
           INVOICE_NUMBER,
           INVOICE_DATE,
           INVOICE_TYPE_LOOKUP_CODE,
           PAY_DATE,
           DESCRIPTION,
           CHECK_DATE,
           CHECK_NUMBER,
           VOUCHER_NUM,
           debit,
           SUM(credit) credit,       
           op_bal,
           cl_bal
         FROM (  
    SELECT POV.SEGMENT1,
           POV.VENDOR_NAME,
           POVS.VENDOR_SITE_CODE,
           API.INVOICE_NUM INVOICE_NUMBER,
           API.INVOICE_DATE,
           API.INVOICE_TYPE_LOOKUP_CODE,
           NULL PAY_DATE,
           API.DESCRIPTION DESCRIPTION,
           NULL CHECK_DATE,
           NULL CHECK_NUMBER,
           NULL VOUCHER_NUM,
           DECODE(API.INVOICE_TYPE_LOOKUP_CODE,'CREDIT',NULL ,abs(API.INVOICE_AMOUNT))  credit,
           DECODE(API.INVOICE_TYPE_LOOKUP_CODE,'CREDIT',abs(API.INVOICE_AMOUNT))  DEBIT,
           jai_ap_rpt_apcr_pkg.compute_credit_balance(API.INVOICE_DATE,pov.vendor_id,hou.SET_OF_BOOKS_ID,povs.VENDOR_SITE_CODE,:p22_org_id) -
           jai_ap_rpt_apcr_pkg.compute_debit_balance(API.INVOICE_DATE,pov.vendor_id,hou.SET_OF_BOOKS_ID,povs.VENDOR_SITE_CODE,:p22_org_id) op_bal,
           jai_ap_rpt_apcr_pkg.compute_credit_balance(:P22_TO_DATE,pov.vendor_id,hou.SET_OF_BOOKS_ID,povs.VENDOR_SITE_CODE,:p22_org_id) -
           jai_ap_rpt_apcr_pkg.compute_debit_balance(:P22_TO_DATE,pov.vendor_id,hou.SET_OF_BOOKS_ID,povs.VENDOR_SITE_CODE,:p22_org_id) cl_bal
       FROM AP_INVOICES_ALL API,
            AP_INVOICE_LINES_ALL APIL,
            AP_INVOICE_DISTRIBUTIONS_ALL APD,
            PO_VENDORS POV,
            PO_VENDOR_SITES_ALL POVS,
            hr_operating_units hou
       WHERE 1=1
        and api.org_id=apil.org_id
        and API.INVOICE_ID = APIL.INVOICE_ID
        AND API.INVOICE_ID = APD.INVOICE_ID
        AND API.VENDOR_ID = POV.VENDOR_ID
        AND API.VENDOR_SITE_ID = POVS.VENDOR_SITE_ID
        and api.org_id =apil.org_id
        and api.org_id=hou.ORGANIZATION_ID
        and apil.line_number = apd.invoice_line_number
        AND apd.match_status_flag='A'
        and apil.LINE_TYPE_LOOKUP_CODE='ITEM'      
        AND api.org_id = nvl(:p22_org_id,api.org_id)
        AND TRUNC(APD.ACCOUNTING_DATE) BETWEEN NVL (:P22_FROM_DATE,APD.ACCOUNTING_DATE) AND NVL (:P22_TO_DATE,APD.ACCOUNTING_DATE)
    GROUP BY SEGMENT1,
             VENDOR_NAME,
             VENDOR_SITE_CODE,
             INVOICE_NUMBER,
             INVOICE_DATE,
             INVOICE_TYPE_LOOKUP_CODE,
             PAY_DATE,
             DEBIT,
             CREDIT,
             DESCRIPTION,
             CHECK_DATE,
             CHECK_NUMBER,
             VOUCHER_NUM,
             op_bal,
             cl_bal)
    where rnk = 1If it doesn't work as required then alter the line row_number () over (partition by VENDOR_NAME order by INVOICE_DATE) rnk
    I've just guessed that you can find a unique record (a persons account) by partitioning by the vendor_name at that point but perhaps you need other things.
    Mike

  • How to HIde rows based on User Selection

    I have a requirement where in I have to hide some rows based on Plant Name selected by USer at the time of opening the report.
    Here is the screen  shot:-
    Here I am seeing two Tag Types MACT and Average when User selects  Luling Plant. But When User selects some other Plant I don't want to see Tag Type 'MACT' in this table.
    We have a predefine filter for Plant.
    How can I achieve that. The data in White Rows is Average values.
    Please help.
    Regards

    Hi Shalini,
    Is user selecting Plant Name from the report prompt. If Yes, then try below-
    Create a variable-
    FilterSelect= If UserResponce("WritePromptTextHere") =" Luling Plant" and TagType inList ("MACT";"Average") Then 1 ElseIf  UserResponce("WritePromptTextHere") <>" Luling Plant" and TagType inList ("MACT";"Average") Then 3 Else 2
    Apply Filter on "FilterSelect" variable-
    FilterSelect=1 and 2
    ~Anuj

  • How to hide rows without data or all zero?

    Hi.experts:
        I have define a query that using query designer,and I have defined structure for both row and column,and then I have a free chatacteristic,such as 0MATERIAL,if I navigate by material then in each row,the material looks like read all the master data and displayed in the result area.
         How can  I hide these row without data.(or to say all with zero).where to using supress zero etc to avoid this?
         Your quick response is highly appreciated!!Thanks in advance.
    Best Regards
    Martin Xie

    Hi,
    you have the option of suppress zeroes in the properties of the queries where you can give the option whether you want to supress the rows or columns as well which conatains zeroes.
    Thanks
    Ajeet

  • How to hide rows and columns by AppleScript or Automator for printing

    Hello,
    I have to hide first empty rows (I do it by: organize - Column B is not empty)
    then: By context-menu in Header of Column K: Hide column
    and: By context-menu in Header of Column L: Hide column
    How can I make this 3 Steps automatic with AppleScript or Automator or maybe by formula?
    Thanks for any help

    Here is an edited version which allow you to choose the custom template on the fly.
    No need to edit a property in the script.
    --[SCRIPT printtable(s)_choosecustom]
    Enregistrer le script en tant que Script ou Application : printtable(s)_choosecustom.xxx
    déplacer le fichier ainsi créé dans le dossier
    <VolumeDeDémarrage>:Users:<votreCompte>:Library:Scripts:Applications:Numbers:
    Il vous faudra peut-être créer le dossier Numbers et peut-être même le dossier Applications.
    Sélectionner une partie de table, une table ou même plusieurs tables.
    Aller au menu Scripts , choisir Numbers puis choisir “printtable(s)_choosecustom”
    Le script crée un nouveau document depuis un modèle perso sélectionné,
    puis applique « Colle les valeurs » au contenu du presse-papiers.
    Il envoie enfin la commande d'impression.
    --=====
    L'aide du Finder explique:
    L'Utilitaire AppleScript permet d'activer le Menu des scripts :
    Ouvrez l'Utilitaire AppleScript situé dans le dossier Applications/AppleScript.
    Cochez la case "Afficher le menu des scripts dans la barre de menus".
    Sous 10.6.x,
    aller dans le panneau "Général" du dialogue Préférences de l'Éditeur Applescript
    puis cocher la case "Afficher le menu des scripts dans la barre des menus".
    --=====
    Save the script as a Script or an Application : printtable(s)_choosecustom.xxx
    Move the newly created file into the folder:
    <startup Volume>:Users:<yourAccount>:Library:Scripts:Applications:Numbers:
    Maybe you would have to create the folder Numbers and even the folder Applications by yourself.
    Select a subset of a table, a table or even several tables.
    Go to the Scripts Menu, choose Numbers, then choose “printtable(s)_choosecustom”
    The script create a new document based on the selected custom template,
    then apply “Paste Values” to the clipboard's contents.
    At last, it issue the print command.
    --=====
    The Finder's Help explains:
    To make the Script menu appear:
    Open the AppleScript utility located in Applications/AppleScript.
    Select the "Show Script Menu in menu bar" checkbox.
    Under 10.6.x,
    go to the General panel of AppleScript Editor’s Preferences dialog box
    and check the “Show Script menu in menu bar” option.
    --=====
    Yvan KOENIG (VALLAURIS, France)
    2011/02/20
    2011/03/16 -- replaced the Blank template by a custom one defined thru the property custom_template
    2011/03/17 -- Let choose the custom template, no longer Paste but Paste Values.
    --=====
    property theApp : "Numbers"
    --=====
    on run
    --my doyourduty()
    run script doyourduty
    end run
    script doyourduty
    --on doyourduty()
    my activateGUIscripting()
    Copy the selected items *)
    my raccourci(theApp, "c", "c") (* cmd + c *)
    Create a new document based upon Blank.template *)
    set myNewDoc to my makeAnIworkDocFromCustom()
    As it's a custom template, there is no default table to delete.
    Delete the default table *)
    tell application "Numbers" to tell document 1 to tell sheet 1 to delete table 1
    my selectMenu("Numbers", 4, 8) (* Paste Values *)
    my raccourci(theApp, "p", "c") (* cmd + p = Print *)
    my raccourci(theApp, return, "") (* return = validate the Print command*)
    --end doyourduty
    end script
    --=====
    Creates a new iWork document from a custom template and returns its name.
    example:
    set myNewDoc to my makeAnIworkDocFromCustom()
    on makeAnIworkDocFromCustom()
    set nb_chiffres to 3 (*
    2 = allow 99 templates
    3 = allow 999 templates *)
    Grab the localized names of the templates folders *)
    tell application "Numbers"
    set templates_loc to localized string "Templates"
    -- set myTemplates_loc to localized string "My Templates"
    end tell -- to application a
    Define the path to the folder storing custom templates *)
    --set chemindesmodeles to "" & (path to library folder from user domain) & "Application Support:iWork:Numbers:" & templates_loc & ":" & myTemplates_loc & ":"
    set chemindesmodeles to "" & (path to library folder from user domain) & "Application Support:iWork:Numbers:" & templates_loc & ":"
    Grab the list of every items stored in the folder *)
    tell application "Finder"
    set entire_contents to entire contents of folder chemindesmodeles
    end tell
    Build two lists. One contain the path to every custom templates.
    The other contain the names of these templates and the names of subfolders *)
    set indx to 1
    set cheminde_mesmodeles to {}
    set nomsde_mesmodeles to {}
    set le_conteneur to ""
    tell application "System Events"
    repeat with i from 1 to count of entire_contents
    set un_element to item i of entire_contents as text
    try
    if type identifier of disk item un_element is in {"com.apple.iwork.numbers.template", "com.apple.iwork.numbers.sfftemplate"} then
    if name of container of disk item un_element is not le_conteneur then
    set le_conteneur to name of container of disk item un_element
    copy (text 1 thru nb_chiffres of "---") & space & le_conteneur to end of nomsde_mesmodeles
    end if
    copy un_element to end of cheminde_mesmodeles
    copy text -nb_chiffres thru -1 of ("00" & indx) & space & name of disk item un_element to end of nomsde_mesmodeles
    set indx to indx + 1
    end if
    end try
    end repeat
    end tell -- System Events
    if my parleAnglais() then
    set le_titre to "Numbers’s custom templates"
    else
    set le_titre to "Modèles personnalisés de Numbers"
    end if
    Choose the template to use.
    If you select a subfolder name, the script beep and ask one more time *)
    tell application (path to frontmost application as string)
    repeat
    set mon_choix to choose from list nomsde_mesmodeles with title le_titre
    if mon_choix is false then error number -128
    try
    set mon_choix to text 1 thru nb_chiffres of (item 1 of mon_choix) as integer
    exit repeat
    on error
    beep 1
    end try
    end repeat
    end tell
    tell application "Numbers"
    set nb_doc to count of documents
    open (item mon_choix of cheminde_mesmodeles)
    repeat until (count of documents) > nb_doc
    delay 0.1
    end repeat
    set doc_name to name of document 1
    end tell -- the_App
    return doc_name
    end makeAnIworkDocFromCustom
    --=====
    on parleAnglais()
    local z
    try
    tell application theApp to set z to localized string "Cancel"
    on error
    set z to "Cancel"
    end try
    return (z is not "Annuler")
    end parleAnglais
    --=====
    on activateGUIscripting()
    (* to be sure than GUI scripting will be active *)
    tell application "System Events"
    if not (UI elements enabled) then set (UI elements enabled) to true
    end tell
    end activateGUIscripting
    --=====
    ==== Uses GUIscripting ====
    This handler may be used to 'type' text, invisible characters if the third parameter is an empty string.
    It may be used to 'type' keyboard raccourcis if the third parameter describe the required modifier keys.
    I changed its name « shortcut » to « raccourci » to get rid of a name conflict in Smile.
    on raccourci(a, t, d)
    local k
    tell application a to activate
    tell application "System Events" to tell application process a
    set frontmost to true
    try
    t * 1
    if d is "" then
    key code t
    else if d is "c" then
    key code t using {command down}
    else if d is "a" then
    key code t using {option down}
    else if d is "k" then
    key code t using {control down}
    else if d is "s" then
    key code t using {shift down}
    else if d is in {"ac", "ca"} then
    key code t using {command down, option down}
    else if d is in {"as", "sa"} then
    key code t using {shift down, option down}
    else if d is in {"sc", "cs"} then
    key code t using {command down, shift down}
    else if d is in {"kc", "ck"} then
    key code t using {command down, control down}
    else if d is in {"ks", "sk"} then
    key code t using {shift down, control down}
    else if (d contains "c") and (d contains "s") and d contains "k" then
    key code t using {command down, shift down, control down}
    else if (d contains "c") and (d contains "s") and d contains "a" then
    key code t using {command down, shift down, option down}
    end if
    on error
    repeat with k in t
    if d is "" then
    keystroke (k as text)
    else if d is "c" then
    keystroke (k as text) using {command down}
    else if d is "a" then
    keystroke k using {option down}
    else if d is "k" then
    keystroke (k as text) using {control down}
    else if d is "s" then
    keystroke k using {shift down}
    else if d is in {"ac", "ca"} then
    keystroke (k as text) using {command down, option down}
    else if d is in {"as", "sa"} then
    keystroke (k as text) using {shift down, option down}
    else if d is in {"sc", "cs"} then
    keystroke (k as text) using {command down, shift down}
    else if d is in {"kc", "ck"} then
    keystroke (k as text) using {command down, control down}
    else if d is in {"ks", "sk"} then
    keystroke (k as text) using {shift down, control down}
    else if (d contains "c") and (d contains "s") and d contains "k" then
    keystroke (k as text) using {command down, shift down, control down}
    else if (d contains "c") and (d contains "s") and d contains "a" then
    keystroke (k as text) using {command down, shift down, option down}
    end if
    end repeat
    end try
    end tell
    end raccourci
    --=====
    my selectMenu("Numbers",4, 8)
    ==== Uses GUIscripting ====
    on selectMenu(theApp, mt, mi)
    tell application theApp
    activate
    tell application "System Events" to tell process theApp to tell menu bar 1 to ¬
    tell menu bar item mt to tell menu 1 to click menu item mi
    end tell -- application theApp
    end selectMenu
    --=====
    --[/SCRIPT]
    Yvan KOENIG (VALLAURIS, France) jeudi 17 mars 2011 21:29:15

  • How to hide rows in a JTable

    Once I create a JTable, how can I hide a specific number of rows during runtime?
    Thanks,
    Surath.
    09/23/2001

    You program the getValueAt(r, c) method of your table model to return the value you want to appear in that row and column. In your particular example that could mean returning values in row r if r<cutoff and values in row r+n otherwise.

  • REUSE - how to hide row selection indicator

    Hi,
    I am using fm REUSE_ALV_GRID_DISPLAY , within i have an editable checkbox field.
    But in the grid i need to hide the row selection indicator. (ie the square push button appers first column of the gird)
    But if i am using REUSE_ALV_LIST_DISPLAY, the row indicator is not appearing?
    Any suggestions?
    Thanks
    aRs

    hi...
    here sending u the report i m currently working ( used REUSE_ALV_LIST_DISPLAY and output dont hav the selection tab )
    Plz check the FM for merge ALV.
    plz send me urs code, so if possible i ll try to fix it.
    thank-you
    REPORT  zrwty_wty_errors                        .
    TYPE
    TYPE-POOLS: slis, icon.
    Tables
    Tables : pnwtyh,
             balhdr.
    Data Decleration
    DATA: text(1000), lv_clmno(40).
    Internal table for messages ( Datewise )
    DATA: BEGIN OF it_balhdr OCCURS 0,
          lognumber TYPE balhdr-lognumber,
          log_handle TYPE  balhdr-log_handle,
          END OF it_balhdr.
    Internal table for PNWTYH
    DATA: BEGIN OF it_pnwtyh OCCURS 0,
          clmno TYPE pnwtyh-clmno,
          log_message TYPE pnwtyh-log_message,
          END OF it_pnwtyh.
    Internal table to fetch the actual text messages
    DATA: it_message LIKE balm OCCURS 0 WITH HEADER LINE.
    Internal Table to handle the ALV o/p
    DATA: BEGIN OF it_grid OCCURS 0,
          clmno TYPE pnwtyh-clmno,
          chgdat TYPE dats,
          icon TYPE icon-id," BALIMSGTY
          text(1000),
          END OF it_grid.
    Field Catelog and layout Decleration
    *DATA: it_fieldcat  TYPE lvc_t_fcat,
         wa_fieldcat TYPE lvc_s_fcat OCCURS 0 WITH HEADER LINE,
         x_fieldcat TYPE lvc_s_fcat OCCURS 0 WITH HEADER LINE.
    *DATA: x_layout TYPE lvc_s_layo.
    DATA: it_fieldcat  TYPE slis_t_fieldcat_alv," type slis_fieldcat_alv
          wa_fieldcat TYPE slis_fieldcat_alv OCCURS 0 WITH HEADER LINE,
          x_layout TYPE slis_layout_alv.
    DATA: lv_repid LIKE sy-repid.
    have hotspot for a PO.
    DATA: s_fieldcat LIKE LINE OF it_fieldcat.
    s_fieldcat-hotspot = 'X'.
    SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-002.
    SELECT-OPTIONS:
      s_aldate FOR balhdr-aldate.
        SELECTION-SCREEN END OF BLOCK b1.
    SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-001.
    PARAMETERS : r1 RADIOBUTTON GROUP rg DEFAULT 'X'.
    PARAMETERS : r2 RADIOBUTTON GROUP rg .
      SELECTION-SCREEN END OF BLOCK b2.
      if s_aldate-high = '00000000'.
      s_aldate-high = s_aldate-low.
      endif.
    FM to fetcht he messg no. based on date
    CALL FUNCTION 'APPL_LOG_READ_DB'
    EXPORTING
       object                   = 'WTY'
       subobject                = 'CLAIMMSG'
        EXTERNAL_NUMBER          = ' '
       date_from                = s_aldate-low
       date_to                  = s_aldate-high
         TIME_FROM                = '000000'
         TIME_TO                  = '240000'
         log_class                = '1'
        PROGRAM_NAME             = '*'
        TRANSACTION_CODE         = '*'
        USER_ID                  = ' '
        MODE                     = '+'
        PUT_INTO_MEMORY          = ' '
      IMPORTING
        NUMBER_OF_LOGS           =
    TABLES
        HEADER_DATA              =
        HEADER_PARAMETERS        =
       messages                 = it_message
        MESSAGE_PARAMETERS       =
        CONTEXTS                 =
    data: zlines type i.
    describe table it_message lines zlines.
    if it_message[] is initial.
    message S398(00) with 'No data found.'.
    exit.
    endif.
    IF radio button ERROR only is selected, Delete others
    IF r2 = 'X'          .
      DELETE it_message WHERE msgty <> 'E'.
    ENDIF.
    fetch log_handle from BALHDR
    SELECT lognumber log_handle FROM balhdr INTO TABLE it_balhdr FOR ALL
    ENTRIES IN
    it_message WHERE lognumber = it_message-lognumber.
    Based on log _handle fetch claim no from PNWTYH
    SELECT DISTINCT clmno log_message FROM pnwtyh INTO TABLE it_pnwtyh FOR
    ALL ENTRIES IN it_balhdr WHERE log_message = it_balhdr-log_handle.
    LOOP AT it_message.
    *select single clmno into lv_clmno from pnwtyh as a  inner join BALHDR
    *as
    b on
    *aLOG_MESSAGE = bLOG_HANDLE where b~LOGNUMBER = it_message-LOGNUMBER.
      READ TABLE it_balhdr WITH KEY lognumber = it_message-lognumber.
      IF sy-subrc = 0.
        READ TABLE it_pnwtyh WITH KEY log_message = it_balhdr-log_handle.
        IF sy-subrc = 0.
          lv_clmno = it_pnwtyh-clmno.
        ENDIF.
    FM to fetch the actual text message
        CALL FUNCTION 'FORMAT_MESSAGE'
          EXPORTING
            id        = it_message-msgid
            lang      = 'EN'
            no        = it_message-msgno
            v1        = it_message-msgv1
            v2        = it_message-msgv2
            v3        = it_message-msgv3
            v4        = it_message-msgv4
          IMPORTING
            msg       = text
          EXCEPTIONS
            not_found = 1
            OTHERS    = 2.
        IF sy-subrc <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
             WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
        ENDIF.
    *data: message like BAPIRET2-MESSAGE.
    *data: it_text like BAPITGB occurs 0.
    *CALL FUNCTION 'BAPI_MESSAGE_GETDETAIL'
    EXPORTING
       id                = it_message-msgid
       number            = it_message-msgno
      LANGUAGE          = SY-LANGU
       textformat        = 'RTF'
      LINKPATTERN       =
      MESSAGE_V1        =
      MESSAGE_V2        =
      MESSAGE_V3        =
      MESSAGE_V4        = -
    IMPORTING
      MESSAGE           = message
      RETURN            =
    TABLES
      TEXT              = it_text
        it_grid-clmno = lv_clmno.
        CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
          EXPORTING
            input  = it_grid-clmno
          IMPORTING
            output = it_grid-clmno.
    Local Variable to handle Date Data
        DATA: l_tmstp(30) TYPE c,
        l_date TYPE sydatum.
        WRITE it_message-time_stmp TO l_tmstp LEFT-JUSTIFIED DECIMALS 0
        NO-GROUPING.
        l_date = l_tmstp(8).
        it_grid-chgdat = l_date.
        it_grid-text = text.
        IF  it_message-msgty = 'E'.
          it_grid-icon = '@0A@'.
        ELSEIF it_message-msgty <> 'E' AND it_message-msgty <> 'S'.
          it_grid-icon = '@09@'.
        ENDIF.
        APPEND it_grid.
        CLEAR it_grid.
        CLEAR: lv_clmno, it_message, text.
      ENDIF.
    ENDLOOP.
    PERFORM display_alv.
    *&      Form  display_alv
          text
    -->  p1        text
    <--  p2        text
    FORM display_alv .
      PERFORM build_field_catalog.
      PERFORM build_layout.
    Assign program name to variable
      lv_repid = sy-repid.
    Call the ALV Grid FM for Display
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
         EXPORTING
           i_callback_program       = lv_repid
           i_grid_title             = 'Wty Errors'
           is_layout_lvc            = x_layout
           it_fieldcat_lvc          = it_fieldcat
           I_CALLBACK_USER_COMMAND  = 'USER_COMMAND'
         TABLES
           t_outtab                 = it_grid[]
         EXCEPTIONS
           program_error            = 1
           OTHERS                   = 2             .
    IF sy-subrc <> 0.
       MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
               WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
       EXPORTING
      I_INTERFACE_CHECK              = ' '
      I_BYPASSING_BUFFER             =
      I_BUFFER_ACTIVE                = ' '
         i_callback_program             = lv_repid
         I_GRID_TITLE                  = 'Display Messages'
      I_CALLBACK_PF_STATUS_SET       = ' '
       i_callback_user_command        = 'USER_COMMAND'
      I_STRUCTURE_NAME               =
         is_layout                      = x_layout
         it_fieldcat                    = it_fieldcat
      IT_EXCLUDING                   =
      IT_SPECIAL_GROUPS              =
      IT_SORT                        =
      IT_FILTER                      =
      IS_SEL_HIDE                    =
      I_DEFAULT                      = 'X'
      I_SAVE                         = ' '
      IS_VARIANT                     =
      IT_EVENTS                      =
      IT_EVENT_EXIT                  =
      IS_PRINT                       =
      IS_REPREP_ID                   =
      I_SCREEN_START_COLUMN          = 0
      I_SCREEN_START_LINE            = 0
      I_SCREEN_END_COLUMN            = 0
      I_SCREEN_END_LINE              = 0
    IMPORTING
      E_EXIT_CAUSED_BY_CALLER        =
      ES_EXIT_CAUSED_BY_USER         =
        TABLES
          t_outtab                       = it_grid[]
    EXCEPTIONS
      PROGRAM_ERROR                  = 1
      OTHERS                         = 2
      IF sy-subrc <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
    ENDFORM.                    " display_alv
    *&      Form  build_field_catalog
          text
    -->  p1        text
    <--  p2        text
    FORM build_field_catalog .
    wa_fieldcat-col_pos = 1.
    wa_fieldcat-fieldname = 'ICON'.
    wa_fieldcat-seltext_l = 'Mssg Type'.
    wa_fieldcat-icon = 'X'.
    wa_fieldcat-outputlen = 8.
    wa_fieldcat-tabname = 'IT_GRID'.
    APPEND wa_fieldcat TO it_fieldcat.
    CLEAR wa_fieldcat.
    wa_fieldcat-col_pos = 2.
    wa_fieldcat-fieldname = 'CHGDAT'.
    wa_fieldcat-seltext_l = 'Chg Date'.
    wa_fieldcat-outputlen = 10.
    wa_fieldcat-tabname = 'IT_GRID'.
    APPEND wa_fieldcat TO it_fieldcat.
    CLEAR wa_fieldcat.
    wa_fieldcat-col_pos = 3.
    wa_fieldcat-fieldname = 'CLMNO'.
    wa_fieldcat-seltext_l = 'Claim No'.
    wa_fieldcat-outputlen = 12.
    wa_fieldcat-tabname = 'IT_GRID'.
    APPEND wa_fieldcat TO it_fieldcat.
    CLEAR wa_fieldcat.
    wa_fieldcat-col_pos = 4.
    wa_fieldcat-fieldname = 'TEXT'.
    wa_fieldcat-seltext_l = 'Message Text'.
    wa_fieldcat-outputlen = 100.
    wa_fieldcat-tabname = 'IT_GRID'.
    APPEND wa_fieldcat TO it_fieldcat.
    CLEAR wa_fieldcat.
    MODIFY it_fieldcat FROM s_fieldcat TRANSPORTING hotspot
    WHERE fieldname = 'CLMNO'.
    *CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
       EXPORTING
         i_structure_name       = 'ZWTY_ERR'
         i_bypassing_buffer     = 'X'
       CHANGING
         ct_fieldcat            = it_fieldcat[]
       EXCEPTIONS
         inconsistent_interface = 1
         program_error          = 2
         OTHERS                 = 3.
    IF sy-subrc <> 0.
       MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
               WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
    CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      I_PROGRAM_NAME               =
      I_INTERNAL_TABNAME           =
       I_STRUCTURE_NAME             = 'ZWTY_ERR'
       I_CLIENT_NEVER_DISPLAY       = 'X'
      I_INCLNAME                   =
      I_BYPASSING_BUFFER           =
      I_BUFFER_ACTIVE              =
      CHANGING
        ct_fieldcat                  = it_fieldcat[]
    EXCEPTIONS
      INCONSISTENT_INTERFACE       = 1
      PROGRAM_ERROR                = 2
      OTHERS                       = 3
    IF sy-subrc <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
      wa_fieldcat-col_pos = 1.
      wa_fieldcat-fieldname = 'ICON'.
      wa_fieldcat-seltext_l = 'Mssg Type'.
    wa_fieldcat-seltext = 'Mssg Type'.
      wa_fieldcat-icon = 'X'.
    wa_fieldcat-SCRTEXT_L = 'Mssg Type'.
    wa_fieldcat-outputlen = 8.
    wa_fieldcat-tabname = 'IT_GRID'.
    APPEND wa_fieldcat TO it_fieldcat.
      MODIFY it_fieldcat FROM wa_fieldcat TRANSPORTING seltext_l WHERE
      fieldname = 'ICON' .
      CLEAR wa_fieldcat.
    MODIFY it_fieldcat FROM wa_fieldcat TRANSPORTING seltext icon
    *SCRTEXT_L
    *WHERE
    fieldname = 'ICON' .
    CLEAR wa_fieldcat.
      wa_fieldcat-col_pos = 2.
      wa_fieldcat-fieldname = 'CHGDAT'.
      wa_fieldcat-seltext_l = 'Chg Date'.
    wa_fieldcat-seltext = 'Chg Date'.
       wa_fieldcat-SCRTEXT_L = 'Chg Date'.
    wa_fieldcat-outputlen = 10.
    wa_fieldcat-tabname = 'IT_GRID'.
    APPEND wa_fieldcat TO it_fieldcat.
    CLEAR wa_fieldcat.
    MODIFY it_fieldcat FROM wa_fieldcat TRANSPORTING seltext_l WHERE
      fieldname = 'CHGDAT' .
      CLEAR wa_fieldcat.
    MODIFY it_fieldcat FROM wa_fieldcat TRANSPORTING seltext SCRTEXT_L
    *WHERE
    fieldname = 'CHGDAT' .
    CLEAR wa_fieldcat.
    wa_fieldcat-col_pos = 3.
    wa_fieldcat-fieldname = 'CLMNO'.
    wa_fieldcat-seltext_l = 'Claim No'.
    wa_fieldcat-outputlen = 12.
    wa_fieldcat-tabname = 'IT_GRID'.
    APPEND wa_fieldcat TO it_fieldcat.
    CLEAR wa_fieldcat.
      wa_fieldcat-col_pos = 4.
      wa_fieldcat-fieldname = 'TEXT'.
      wa_fieldcat-seltext_l = 'Message Text'.
    wa_fieldcat-seltext = 'Message Text'.
         wa_fieldcat-SCRTEXT_L = 'Chg Date'.
    wa_fieldcat-outputlen = 100.
    wa_fieldcat-tabname = 'IT_GRID'.
    APPEND wa_fieldcat TO it_fieldcat.
    CLEAR wa_fieldcat.
    MODIFY it_fieldcat FROM wa_fieldcat TRANSPORTING seltext_l WHERE
      fieldname = 'TEXT'.
      CLEAR wa_fieldcat.
    *MODIFY it_fieldcat FROM wa_fieldcat TRANSPORTING seltext SCRTEXT_L
    *WHERE
    fieldname = 'TEXT'.
    CLEAR wa_fieldcat.
    LOOP AT it_fieldcat.
       IF it_fieldcat-fieldname  = 'CLMTY'.
         it_fieldcat-seltext_l = 'ICON'.
         it_fieldcat-icon = 'X'.
         MODIFY it_fieldcat.
       ENDIF.
    ENDLOOP.
    *Adding the Text to be displayed
    x_fieldcat-reptext = 'Claim No.'.
    MODIFY it_fieldcat FROM x_fieldcat TRANSPORTING reptext WHERE
    fieldname = 'CLMNO' .
    CLEAR x_fieldcat.
    x_fieldcat-reptext = 'MSG TYPE'.
    x_fieldcat-icon = 'X'.
    MODIFY it_fieldcat FROM x_fieldcat TRANSPORTING reptext icon WHERE
    fieldname = 'CLMTY' .
    CLEAR x_fieldcat.
    x_fieldcat-reptext = 'Text'.
    MODIFY it_fieldcat FROM x_fieldcat TRANSPORTING reptext WHERE
    fieldname = 'TEXT' .
    CLEAR x_fieldcat.
      MODIFY it_fieldcat FROM s_fieldcat TRANSPORTING hotspot
      WHERE fieldname = 'CLMNO'.
    ENDFORM.                    " build_field_catalog
    *&      Form  Build_layout
          text
    -->  p1        text
    <--  p2        text
    FORM build_layout .
      CLEAR x_layout.
      x_layout-colwidth_optimize = 'X'.
      x_layout-zebra = 'X'.
    ENDFORM.                    " Build_layout
    FORM display_detail *
    --> UCOMM *
    --> SELFIELD *
    FORM user_command USING ucomm LIKE sy-ucomm
    selfield TYPE slis_selfield.
      IF ucomm = '&IC1'.
        READ TABLE it_grid INDEX selfield-tabindex.
    *IF sy-subrc = 0.
    *SET PARAMETER ID 'CLMNO' FIELD it_grid-clmno.
    *CALL TRANSACTION 'ZWTY' AND SKIP FIRST SCREEN.
    *ENDIF.
           IF sy-subrc EQ 0.
             SET PARAMETER ID 'CLMNO' FIELD it_grid-clmno.
             CALL TRANSACTION 'WTY' AND SKIP FIRST SCREEN.
           ENDIF.
        IF sy-subrc EQ 0.
    CALL 'WTY' FOR SELECTED CLAIM
          CALL FUNCTION 'ZWTY_CLAIM_DISPLAY'
            EXPORTING
              i_clmno          = it_grid-clmno
              iv_from_doc      = 'J'
            EXCEPTIONS
              not_found        = 1
              authority_failed = 2
              no_claimtype     = 3
              OTHERS           = 4.
          IF sy-subrc <> 0.
            MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                    WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
          ENDIF.
        ENDIF.
      ENDIF.
    ENDFORM.                    "user_command
    regards
    vinsee

Maybe you are looking for