How to adjust the frame number in this script?

I have a timeline slider part to my animation which starts at frame 1089 and ends at frame 1173, I have a script which allows me to do this and works perfectly when I build it in a new flash file starting at frame 1, I need this code to work for the animation I have built at frame 1089, I dont know which number "1's" in the script relate to the frame number, I have tried changing them all to 1089 but that doesn't work! at the moment as soon as I click on this it jumps back to frame number 1 - which I believe as the code stands is exactly what it should be doing. Please could anyone edit this code so that it realises which frames I want it to work in?  Thank you in anticipation, Ellie x
var numOfFrames:Number = 84; // number of frames in the timeline to scrub
var widthOfScrubber:Number = 500; // width in pixels of scrubber bar
var widthOfScrubberSlider:Number = 25; // width in pixels of scrubber slider
var widthOfScrub:Number = widthOfScrubber - widthOfScrubberSlider;
var stepValue:Number = Math.round(widthOfScrub / numOfFrames);
var scrubX:Object = scrubber.scrubberSlider;
var isPlaying:Number = 1;
var home = this;
scrubX._x = 0;
onEnterFrame = function() {
if (scrubber.activeNow == 1 && isPlaying == 0) {
var frameNum = Math.round(scrubX._x / stepValue);
gotoAndStop(frameNum);
} else if (scrubber.activeNow == 1 && isPlaying == 1) {
var frameNum = Math.round(scrubX._x / stepValue);
gotoAndPlay(frameNum);
} else if (scrubX._x <= widthOfScrub && scrubber.activeNow != 1 && isPlaying == 1) {
scrubX._x = scrubX._x + stepValue;
} else {
isPlaying = 0;
playBTN.onRelease = function() {
scrubber.activeNow = 0;
isPlaying = 1;
home.play();
pauseBTN.onRelease = function() {
scrubber.activeNow = 0;
isPlaying = 0;
home.stop();

try:
var numOfFrames:Number = 84; // number of frames in the timeline to scrub
var widthOfScrubber:Number = 500; // width in pixels of scrubber bar
var widthOfScrubberSlider:Number = 25; // width in pixels of scrubber slider
var startFrame:Number = 1089
var widthOfScrub:Number = widthOfScrubber - widthOfScrubberSlider;
var stepValue:Number = Math.round(widthOfScrub / numOfFrames);
var scrubX:Object = scrubber.scrubberSlider;
var isPlaying:Number = 1;
var home = this;
scrubX._x = 0;
onEnterFrame = function() {
if (scrubber.activeNow == 1 && isPlaying == 0) {
var frameNum = startFrame-1+Math.round(scrubX._x / stepValue);
gotoAndStop(frameNum);
} else if (scrubber.activeNow == 1 && isPlaying == 1) {
var frameNum = Math.round(scrubX._x / stepValue);
gotoAndPlay(frameNum);
} else if (scrubX._x <= widthOfScrub && scrubber.activeNow != 1 && isPlaying == 1) {
scrubX._x = scrubX._x + stepValue;
} else {
isPlaying = 0;
playBTN.onRelease = function() {
scrubber.activeNow = 0;
isPlaying = 1;
home.play();
pauseBTN.onRelease = function() {
scrubber.activeNow = 0;
isPlaying = 0;
home.stop();

Similar Messages

  • How to get the frame number of a label in a different scene.

    I am completely stumped on this.
    I have my project setup as the gameplay in one scene, and another scene for the outcome.
    The outcome scene, say called, GameDone, has 2 frames. The first frame for win, labeled it WON, the second frame for lost, labeled LOST.
    I could do the very simple thing and just gotoAndStop("GameDone", 1); but thats a bad practice, I believe.
    Ive gone through google and found the closest thing needing a MovieClip. I could not figure out what to give it? A random MovieClip? a new one? one from the next scene? one from the current scene?
    import flash.display.Scene; 
    for (var i:uint = 0; i < mc1.scenes.length; i++) {
         var scene:Scene = mc1.scenes[i];
         trace("scene " + scene.name + ": " + scene.numFrames + " frames");
    That was an adobe sample.
    So how could I, in the gameplay scene, the frame number for either WON or LOST in the "GameDone" scene?
    Thanks.

    Try doing the simple thing that you think is a bad practice.  I don't know why you think it is.  The only problem with it is that you appear to have it backwards for AS3... in AS3 it is gotoAndStop(frame,scene);
    Why don't you use the frame labels instead of frame numbers?  gotoAndStop("Won", "GameDone");

  • How do remove the page number using java script.

    Thank you.

    Hello,
    Where you want remove the page number? If you delete the page number in the first page of the document, that is no way to do. Becasue, first you have to try manually remove the page number 1st page of pages panel, its shown the error "Invalid entry".
    Can you please post your query briefly.
    thx
    csm_phil

  • How to set the frame size?

    Hi,
    Can some one show me how to set the frame size in this program? History: I have created a window and added a button but its to small. So I want to increase the size of the frame to at least 600X400 pixel.
    private static void showGUI() {
            //Create and set up the window.
            JFrame frame = new JFrame("ButtonDemo");
            frame.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
            //Create and set up the content pane.
            Main newContentPane = new Main();
            newContentPane.setOpaque(true); //content panes must be opaque
            frame.setContentPane(newContentPane);
            //Display the window.
            frame.pack();
            frame.setVisible(true);
        }It would be nice if you could show me how to do it.
    Thank you very much for reading this.

    Challenger wrote:
    Simply adding
    frame.setSize(new Dimension(600,400));to the end of your code should work perfectly.Or, if you want to do it correctly, .setPreferredSize() on your frame before you .pack() it. The default layout manager for JFrame is BorderLayout, which uses the preferredSize of each component to calculate sizes during the .pack() call.

  • How to change the port number for deployment in JAVA Studio Enterprise 8?

    Hi!
    Yesterday i downloaded this new sun java studio enterprise and found it mind blowing.
    Now i find that all my previous applications which were running on port 8080 can't be run on sun java studio enterprise(sjse) 8.
    Can anyone tell me how to change the port number on this software so i won't have to edit all my applications?

    http://docs.sun.com/source/819-0080/install.html
    In the Admin Configuration page (or at the command line), enter the following:
    Admin User Name�Name of the user who administers the server
    Password�Admin user�s password to access the Admin Server (8-character minimum)
    Admin Port�Administration port number for initial server instance
    HTTP Port�Port number to access the default server instance
    HTTPS Port�Secure port number to access the default server instance

  • How can I include the Frame Number  when using "Export Frame"?

    Im using the button at the bottom right of the Playback Control Panel called "Export Frame".  This does exactly what I need but I have a lot of frames that need single frame exporting. How can I get the file name to automaticly include the frame number at the end of the file name? 
    For example, instead of it displaying "Sequence 01.Still001"  by default.  I would like for it to display "Sequence 01_0001"   Letting me know that is frame 0001.
    This is possible, correct?

    Well what about in the export option using CTRL + M?  I saw a coworker using this method in an older version of Premiere, but we can't enable it on CS5.5.  Being able to export a single frame as a bmp that has the frame number at the end of the file name.
    Example:
    Output Name: Sequence 01_0001.bmp
    Under Video Basic Setting is:
    Export As Sequence UNCHECKED
    Field Type: Progressive
    Frame number still doesn't show at end of file name.  What are we missing?

  • How to adjust the number of blog entries on the archive page?

    Does anyone know how to adjust the number of blog entries on the archive page?
    As it stands now the blog archive page lists the archives past the 4000px page length in what appears to be a long endless list.
    Thanks in advance for any help!

    Thanks Wyodor but that just adjusts the entries on the blog page....not the blog archive page.
    On the blog archive page it's just a long endless list of entries. It appears that you simply cannot adjust this on the archive page. Additionally if the blog entries exceed 50 I have to start deleting older entries.
    Overall iWeb has served my needs well but this issue *****. They could probably fix it with a software update if they wanted to.

  • How to adjust the volume of the tone you hear when dial a number

    Any idea how to adjust the volume of the tone you hear when you dial phone numbers?
    Post relates to: Centro (Sprint)

    There are no sounds except on the handset earpiece for the dialer buttons when you dial a number; is this what you are speaking of? All sound settings are found under Prefs, Sounds & Alerts, then choose Ring Tones, Phone Alerts, Calendar, Messaging, System, then choose the settings you desire.

  • How to adjust the green (starting) and the red (end) rectangles pixel by pixel (top, bottom, left and right) by changing the number of pixels in ken burns.

    How to adjust the green (starting) and the red (end) rectangles pixel by pixel (top, bottom, left and right) by changing the number of pixels in ken burns. Help please.

    If you look closely at the top of the canvas pane, as you move either of the boxes (green or red) there is an indication of pixel positions... "top, bottom, left, right," and "scale."
    Admittedly, it doesn't seem as if you can "enter" the dimensions with your keyboard, however, as you move the boxes, you have a real time indication of the boxs' locations.
    (I couldn't take a screen shot, as you have to actively move the box with a mouse or other input device... thus, I could not also take a screen shot with same device.)
    I hope this helps.

  • How to do the reverse po in this report

    Hi,   
          i have a one problem in this report . i don,t know how to display the
    reverse po in this report. reverse po should have a po history cat. 'N' (field is bewtp)
    i connect type 'Q' and the type 'E' but not been able to connect the 'N'. when i connect it will give me the wrong amount and some field should not been displayed. i will provide u the following code.
           please help me.
    Thanks
      dinesh
    *& Report  Z_MM_PURCHASE_REGISTER
    REPORT  Z_MM_PURCHASE_REGISTER.
      Short Description: Purchase Register
    TABLES                                                              *
    TABLES : ekko, taxcom, ekpo, ekbe,ekkn,konv,komv,t007s, j_1imovend, bseg .
    TYPE-POOLS: slis.
    TYPES: Begin with TY_                                               *
    TYPES : BEGIN OF  ty_ekko,
              BSART LIKE EKKO-BSART,
              KNTTP LIKE EKPO-KNTTP,
              ebeln LIKE ekko-ebeln,
              knumv LIKE ekko-knumv,
              lifnr LIKE ekko-lifnr,
              waers LIKE ekko-waers,
              kalsm LIKE ekko-kalsm,
              lands LIKE ekko-lands,
              ekorg LIKE ekko-ekorg,
              wkurs LIKE ekko-wkurs,
              bedat LIKE ekko-bedat,
              ebelp LIKE ekpo-ebelp,   "po line item
              mwskz LIKE ekpo-mwskz,   "tax code
              bukrs LIKE ekpo-bukrs,
              matkl LIKE ekpo-matkl,
              mtart LIKE ekpo-mtart,
             netpr LIKE ekpo-netpr,   "Net price in purchasing document
             meins LIKE ekpo-meins,   "unit
              menge LIKE ekpo-menge,   "quantity
              txz01 LIKE ekpo-txz01,   "material description
              txjcd LIKE ekpo-txjcd,   "tax jurisdiction code
              matnr LIKE ekpo-matnr,
              llief LIKE ekko-llief,
              meins LIKE ekpo-meins,
              bprme LIKE ekpo-bprme,
              netpr LIKE ekpo-netpr,
              peinh LIKE ekpo-peinh,
             lifnr like lfa1-lifnr,
              name1 like lfa1-lifnr,
              pstlz like lfa1-pstlz,
              stras like lfa1-stras,
              text1 like t007s-text1,
    END OF ty_ekko.
    TYPES : BEGIN OF ty_ekbe,
              ebeln LIKE ekbe-ebeln,    "po number
              ebelp LIKE ekbe-ebelp,    "po line item
              buzei LIKE ekbe-buzei,
              belnr LIKE ekbe-belnr,    "Number of material document
              budat LIKE ekbe-budat,    "Posting date in the document
              xblnr LIKE ekbe-xblnr,    "Reference document number
              werks LIKE ekbe-werks,    "plant
              matnr LIKE ekbe-matnr,    "material
              menge LIKE ekbe-menge,    "quantity
              peinh LIKE ekpo-peinh,
              dmbtr LIKE ekbe-dmbtr,    "Amount in local currency
              kalsm LIKE ekko-kalsm,    "Procedure (pricing)
              waers LIKE ekbe-waers,    "currency
              wrbtr LIKE ekbe-wrbtr,    "Amount in document currency
              bwtar LIKE ekbe-bwtar,    "Valuation type
              shkzg LIKE ekbe-shkzg,
              maktx LIKE makt-maktx,
              mwskz LIKE ekbe-mwskz,
              bldat LIKE ekbe-bldat,
              srvpos LIKE ekbe-srvpos,
              packno LIKE ekbe-packno,
              introw LIKE ekbe-introw,
              lfbnr  LIKE ekbe-lfbnr,
              bwart TYPE ekbe-bwart,
              budat1 TYPE ekbe-budat,
              belnr1 TYPE ekbe-belnr,
           END OF ty_ekbe.
    TYPES : BEGIN OF ty_display,
              BSART LIKE EKKO-BSART,
              KNTTP LIKE EKPO-KNTTP,
              lifnr(10) TYPE C,              " LIKE ekko-lifnr,
              ebeln LIKE ekko-ebeln,
              bedat LIKE ekko-bedat,
              budat LIKE ekbe-budat,
              matnr LIKE ekbe-matnr,
              maktx LIKE makt-maktx,
              belnr LIKE ekbe-belnr,
              bldat LIKE ekbe-bldat,
              menge LIKE ekpo-menge,
              peinh LIKE ekpo-peinh,
              dmbtr LIKE ekbe-dmbtr,
              shkzg LIKE ekbe-shkzg,
              custduty LIKE konv-kwert,
              bed LIKE konv-kwert,
              cvd LIKE konv-kwert,
              sertax LIKE konv-kwert,
              sereducess LIKE konv-kwert,
              surcharge LIKE konv-kwert,
              educess LIKE konv-kwert,
              insure LIKE konv-kwert,
              freight LIKE konv-kwert,
              octroi LIKE konv-kwert,
              kursf LIKE rbkp-kursf,
              grossamt LIKE konv-kwert,
              vat4 LIKE konv-kwert,
              vat8 LIKE konv-kwert,
              vat125 LIKE konv-kwert,
              INC LIKE KONV-KWERT,     "
              PF LIKE KONV-KWERT,
              CF LIKE KONV-KWERT,
              INS LIKE KONV-KWERT,
              cst LIKE konv-kwert,
              subdeb LIKE ekbe-dmbtr,
              netamt LIKE ekbe-dmbtr,
              cenvatcreditbed LIKE konv-kwert,
              cenvatcreditecc LIKE konv-kwert,
              vatcredit LIKE konv-kwert,
              bgcharges LIKE konv-kwert,
              srvpos LIKE ekbe-srvpos,
              ktext1 LIKE esll-ktext1,
              sertaxcredit LIKE konv-kwert,
              sereducesscredit LIKE konv-kwert,
              totaltaxbenefit LIKE konv-kwert,
              inventoryvalue LIKE konv-kwert,
              bwart TYPE ekbe-bwart,
              belnr1 TYPE ekbe-belnr,
              budat1 TYPE ekbe-budat,
              lfbnr TYPE ekbe-lfbnr,
              bprme LIKE ekpo-bprme,
              meins LIKE ekpo-meins,
              name1 like lfa1-name1,
              pstlz like lfa1-pstlz,
              stras like lfa1-stras,
              mwskz like ekpo-mwskz,
              text1 like t007s-text1,
              kalsm like t007s-kalsm,
              j_1icstno like j_1imovend-j_1icstno,
              hkont(10) TYPE C,       " like bseg-hkont,
              saknr like ska1-saknr,
              sakan like ska1-sakan,
              ktoks like ska1-ktoks,
              mcod1 like ska1-mcod1,
              WAERS LIKE EKKO-WAERS,
              bukrs like ekpo-bukrs,
              total LIKE ekbe-dmbtr,
            END OF ty_display.
    TYPES : BEGIN OF ty_services,
               ebeln LIKE ekpo-ebeln,
               ebelp LIKE ekpo-ebelp,
               lfbnr LIKE ekbe-lfbnr,
               packno LIKE esll-packno,
               sub_packno LIKE esll-sub_packno,
               srvpos LIKE esll-srvpos,
               ktext1 LIKE esll-ktext1,
               netwr LIKE esll-netwr,
               act_wert  LIKE esll-act_wert,
               menge LIKE esll-menge,
               bldat LIKE ekbe-bldat,
            END OF ty_services.
    TYPES :  BEGIN OF ty_konv,
               ebeln LIKE ekpo-ebeln,
               ebelp LIKE ekpo-ebelp,
               knumv LIKE konv-knumv,
               kposn LIKE konv-kposn,
               kschl LIKE konv-kschl,
               kwert LIKE konv-kwert,
               kbetr LIKE konv-kbetr,
             END OF ty_konv.
    TYPES : BEGIN OF ty_lfbnr,
              belnr TYPE ekbe-belnr,
              lfbnr TYPE ekbe-lfbnr,
            END OF ty_lfbnr.
    TYPES : BEGIN OF ty_miro,
             belnr1 TYPE ekbe-belnr,
             belnr TYPE ekbe-belnr,
             budat TYPE ekbe-budat,
    END OF ty_miro.
    types: begin of ty_lfa1,
           lifnr like lfa1-lifnr,
           name1 like lfa1-lifnr,
           pstlz like lfa1-pstlz,
           stras like lfa1-stras,
           end of ty_lfa1.
    types: begin of ty_t007s,
           mwskz like t007s-mwskz,
           text1 like t007s-text1,
           spras like t007s-spras,
           kalsm like t007s-kalsm,
           end of ty_t007s.
    types: begin of ty_j_1imovend,
           lifnr like j_1imovend-lifnr,
           j_1icstno like j_1imovend-j_1icstno,
           end of ty_j_1imovend.
    types: begin of ty_bseg,
           lifnr like bseg-lifnr,
           dmbtr like bseg-dmbtr,
           shkzg like bseg-shkzg,
           hkont like bseg-hkont,
           BELNR LIKE BSEG-BELNR,
           end of ty_bseg.
    types: begin of ty_ska1,
           saknr like ska1-saknr,
           sakan like ska1-sakan,
           ktoks like ska1-ktoks,
           mcod1 like ska1-mcod1,
           end of ty_ska1.
    DATA : it_lfbnr TYPE STANDARD TABLE OF ty_lfbnr,
           wa_lfbnr TYPE ty_lfbnr,
           it_lfa1 type standard table of ty_lfa1,
           wa_lfa1 TYPE ty_lfa1,
           it_t007s type standard table of ty_t007s,
           wa_t007s TYPE ty_t007s,
           it_j_1imovend type standard table of ty_j_1imovend,
           wa_j_1imovend TYPE ty_j_1imovend,
           it_bseg type standard table of ty_bseg,
           wa_bseg TYPE ty_bseg,
          it_ska1 type standard table of ty_ska1,
           wa_ska1 TYPE ty_ska1,
           it_miro TYPE STANDARD TABLE OF ty_miro,
           wa_miro TYPE ty_miro,
           w_belnr TYPE ekbe-belnr,
           w_lfbnr TYPE ekbe-lfbnr,
           w_belnr1 TYPE ekbe-belnr,
           w_budat TYPE ekbe-budat.
    CONSTANTS: Begin with C_                                            *
    DATA: Begin with W_                                                 *
    DATA :  w_flag TYPE c.
    INTERNAL TABLES: Begin with IT_                                     *
    DATA : it_ekko TYPE STANDARD TABLE OF ty_ekko WITH NON-UNIQUE KEY ebeln
                                                                ebelp,
          it_ekpo type standard table of ty_ekpo,
           it_ekbe TYPE STANDARD TABLE OF ty_ekbe,
           it_ekbe1 TYPE STANDARD TABLE OF ty_ekbe WITH NON-UNIQUE KEY ebeln
                                                                ebelp,
           it_display TYPE STANDARD TABLE OF ty_display,
           it_subdebit TYPE STANDARD TABLE OF ty_ekbe,
           it_services TYPE STANDARD TABLE OF ty_services,
           it_packno TYPE STANDARD TABLE OF ty_services,
           it_konv TYPE STANDARD TABLE OF ty_konv.
    DATA :  it_fieldcat TYPE slis_t_fieldcat_alv,
            it_layout TYPE slis_layout_alv,
            it_komv TYPE STANDARD TABLE OF komv WITH NON-UNIQUE KEY knumv
            kschl.
    WORKAREAS: Begin with WA_                                           *
    DATA : wa_ekbe TYPE ty_ekbe,
           wa_ekbe1 TYPE ty_ekbe,
           wa_ekko TYPE ty_ekko,
           wa_komv TYPE komv,
           wa_display TYPE ty_display,
          WA_LFA1 TYPE TY_LFA1,
          W_GROSS_AMT type KOMV-KWERT,
           wa_subdebit TYPE ty_ekbe,
           wa_packno TYPE ty_services,
           wa_services TYPE ty_services,
           wa_konv TYPE ty_konv,
           wa_taxcom TYPE taxcom,
           wa_ls_fieldcat TYPE slis_fieldcat_alv.
    FIELD-SYMBOLS: Begin with FS_                                       *
    FIELD-GROUPS: Begin with FG_                                        *
    CONTROLS:                                                           *
    SELECT-OPTIONS: Begin with SO_                                      *
    SELECT-OPTIONS : so_lifnr FOR ekko-lifnr ,
                    so_mtart FOR ekpo-mtart,
                     so_ebeln FOR ekbe-ebeln,
                     so_matnr FOR ekbe-matnr,
                    so_date FOR sy-datum no-display,
                     do_date for ekko-bedat,
                     tax_code for ekpo-mwskz,
                     mr_date for ekbe-budat,
                     mat_gr for ekpo-matkl,
                     mat_tp for ekpo-mtart,
                     pr_plant for ekbe-werks,
                     pr_ekorg for ekko-ekorg.
    PARAMETERS: Begin with PR_                                          *
    *PARAMETER : pr_plant LIKE ekpo-werks . "OBLIGATORY.
               pr_ekorg LIKE ekko-ekorg . "OBLIGATORY.
    SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-001 .
    PARAMETER : pr_preg TYPE c  radiobutton group g1  default 'X',
                pr_ror TYPE c  RADIOBUTTON GROUP g1 .
    SELECTION-SCREEN : END OF BLOCK b1.
    START-OF-SELECTION                                                  *
    START-OF-SELECTION .
    *--- Get the data reguired--
      PERFORM f001-get_data.
    *-------Calculate the tax required -
      PERFORM f002-cal_taxes.
      PERFORM miro_get_data.
    END-OF-SELECTION                                                    *
    END-OF-SELECTION.
    *---Display the report--
      PERFORM f003-display_register.
    *&      Form  F001-GET_DATA
          text
    -->  p1        text
    <--  p2        text
    FORM f001-get_data .
    Clear and Refresh all internal table and work area.
      REFRESH : it_ekko,
                it_ekbe,
                it_services,
                it_packno,
                it_konv,
                it_lfa1,
                it_komv.
      CLEAR   : wa_ekko,
                wa_ekbe,
                wa_services,
                wa_packno,
                wa_konv,
                wa_lfa1,
                wa_komv.
    Get the history records for all the selected PO. from table EKBE of
    type GR.
        IF pr_preg = 'X'.
    *Get Purchasing Document Number, Number of the document condition,
    *Vendor's accountNumber, Currency Key, Procedure , Country for Tax
    *ReturnPurchasing OrganizationExchange rate In an internal table it_ekko
    *break-point.
      SELECT pBSART qknttp pebeln pknumv plifnr pwaers pkalsm plands pekorg pwkurs
         wkurs pbedat  qebelp qbukrs qmatkl qmtart pllief qmeins qbprme
         qtxjcd qmwskz pwkurs qnetpr qmenge QPEINH
        INTO CORRESPONDING FIELDS OF TABLE it_ekko
        FROM   ekko AS p INNER JOIN ekpo AS q
               ON pebeln = qebeln
        WHERE   p~ekorg in pr_ekorg
                AND p~lifnr IN so_lifnr
            AND q~mtart IN so_mtart
                AND p~ebeln IN so_ebeln
                and p~bedat in do_date
                and q~mwskz in tax_code
                and q~matkl in mat_gr
                and q~mtart in mat_tp
                and kalsm = 'SIL000'
                AND EKORG = 'SDOP'.
           GET ALL THE PO FOR WHICH MIRO HAS BEEN DONE
      SELECT ebeln ebelp budat bldat werks
        INTO CORRESPONDING FIELDS OF TABLE it_ekbe1
        FROM ekbe
        FOR ALL ENTRIES IN it_ekko
        WHERE ebeln = it_ekko-ebeln
           AND ebelp = it_ekko-ebelp
           AND bewtp = 'Q'
           AND  werks in pr_plant
          AND budat IN so_date
          AND ( bwart = '101' OR bwart = '102'  ) "OR bwart = '105' OR bwart = '106' OR bwart ='')
           AND ebeln IN so_ebeln
           and budat in mr_date
           AND matnr IN so_matnr.
          AND ( BUDAT >= SO_DATE-low and BUDAT <= SO_DATE-high ).
    Check whether any records is present
      IF sy-subrc = 0.
          IF NOT it_ekbe1 IS INITIAL.
            SELECT ebeln ebelp buzei belnr budat xblnr werks matnr menge
                   dmbtr waers wrbtr bwtar shkzg dmbtr bldat srvpos
                   packno introw lfbnr bwart
                INTO CORRESPONDING FIELDS OF TABLE it_ekbe
                FROM  ekbe
                FOR ALL ENTRIES IN it_ekbe1
                WHERE      ebeln = it_ekbe1-ebeln
                        AND  ebelp = it_ekbe1-ebelp
                        and budat in mr_date
                       AND budat IN so_date
                 and  ( BUDAT >= SO_DATE-low and BUDAT <= SO_DATE-high )
                      AND  bewtp = 'Q'.
                    AND ( bwart = '101' OR bwart = '102' OR bwart = '103' OR bwart = '105' ). "OR bwart = '105' OR bwart = '106' OR bwart ='').
                     AND  bwart = '103'.
                 and  WERKS = PR_PLANT.
            IF sy-subrc = 0.
            ENDIF.
          ELSE.
            SELECT ebeln ebelp buzei belnr budat xblnr werks matnr menge
                  dmbtr waers wrbtr bwtar shkzg dmbtr bldat srvpos
                  packno introw lfbnr bwart
               INTO CORRESPONDING FIELDS OF TABLE it_ekbe
               FROM  ekbe
               FOR ALL ENTRIES IN it_ekbe1
               WHERE      ebeln = it_ekbe1-ebeln
                       AND  ebelp = it_ekbe1-ebelp
                       and budat in mr_date
                     AND budat IN so_date
                 and ( BUDAT >= SO_DATE-low and BUDAT <= SO_DATE-high )
                     AND  bewtp = 'Q'.
                    AND ( bwart = '101' OR bwart = '102' OR bwart = '103' OR bwart = '105' ) . "OR bwart = '105' OR bwart = '106' OR bwart ='').
                    AND  bwart = '102'.
                 and  WERKS = PR_PLANT.
            IF sy-subrc = 0.
            ENDIF.
            ENDIF.
        ENDIF.
    new code added
    *get the venor address
         select alifnr bname1 bpstlz bstras b~lifnr
         into corresponding fields of table it_LFA1
         from ekko as a inner join lfa1 as b
         on alifnr = blifnr
         for all entries in it_EKKO
         where  B~lifnr = it_EKKO-lifnr.
    ***tax code description added*******************
    select mwskz text1 spras kalsm
    from t007s
    into corresponding fields of table it_t007s for all entries in it_ekko
    where mwskz = it_ekko-mwskz and spras = 'E' and kalsm = 'TAXSIL'.
    *******vendor vat no. added*************
    select lifnr j_1icstno
    from j_1imovend
    into corresponding fields of table it_j_1imovend for all entries in it_ekko
    where lifnr = it_ekko-lifnr.
    **********gl code added******************************************
    *select lifnr shkzg dmbtr hkont
    *from bseg
    *into corresponding fields of table it_bseg for all entries in it_lfa1  " it_ekko
    *where  LIFNR = it_lfa1-LIFNR and shkzg = 'S'.
    *************gl code description added*******************************************
    *select saknr ktoks mcod1 sakan
    *from ska1
    *into corresponding fields of table it_ska1 for all entries in it_bseg
    *where sakan = it_bseg-hkont and ktoks = 'MAT'.
    Get the package number , service number , service text , net price ,
    accual amount , qty. etc
        IF NOT it_packno[] IS INITIAL.
          SELECT ppackno psrvpos pktext1 pnetwr pact_wert pmenge
              INTO CORRESPONDING FIELDS OF TABLE it_services
              FROM esll  AS p "inner join ESLL as Q
               on      PPLN_PACKNO = QPACKNO
                  and  PINTROW = QINTROW
              FOR ALL ENTRIES IN it_packno
              WHERE p~packno = it_packno-sub_packno.
          IF sy-subrc = 0.
          ENDIF.
        ENDIF.
    Get Number of the document condition ,line item number, Condition
    value for all selected PO.
        IF NOT it_ekko[] IS INITIAL.
          SELECT  knumv kposn kschl kwert
              INTO CORRESPONDING FIELDS OF TABLE it_konv
              FROM konv
              FOR ALL ENTRIES IN it_ekko
              WHERE  knumv = it_ekko-knumv.
          IF sy-subrc = 0.
          ENDIF.
        ENDIF.
      ENDIF.
    ENDFORM.                    " F001-GET_DATA
    *&      Form  F002-CAL_TAXES
          text
    -->  p1        text
    <--  p2        text
    FORM f002-cal_taxes .
    Calculate taxes for all the PO.
      LOOP AT it_ekbe INTO wa_ekbe.
        CLEAR :  wa_display,
                 wa_ekko.
        READ TABLE it_ekko WITH TABLE KEY ebeln = wa_ekbe-ebeln
                                          ebelp = wa_ekbe-ebelp
                                          INTO wa_ekko.
        IF sy-subrc = 0.
        ENDIF.
        CLEAR wa_taxcom.
    Get the text for the Material.
        SELECT SINGLE maktx
          INTO wa_display-maktx
          FROM  makt
          WHERE     matnr = wa_ekbe-matnr
                AND spras = sy-langu.
        wa_taxcom-bukrs = wa_ekko-bukrs.
        wa_taxcom-budat = wa_ekbe-bldat.
        wa_taxcom-budat = wa_ekko-bedat." change by dinesh
        wa_taxcom-waers = wa_ekbe-waers.
        wa_taxcom-kposn = wa_ekbe-ebelp.
        wa_taxcom-mwskz = wa_ekko-mwskz.
        wa_taxcom-txjcd = wa_ekko-txjcd.
       taxcom-shkzg = 'H'.
        wa_taxcom-xmwst = 'X'.
       IF ekko-bstyp EQ bstyp-best.
        wa_taxcom-wrbtr = wa_ekko-netpr * wa_ekbe-menge * wa_ekko-wkurs.
         WA_TAXCOM-WRBTR = wa_ekbe-dmbtr.
       ELSE.
         taxcom-wrbtr = ekpo-zwert.
       ENDIF.
        wa_taxcom-lifnr = wa_ekko-lifnr.
        wa_taxcom-land1 = wa_ekko-lands.                              "WIA
        wa_taxcom-ekorg = wa_ekko-ekorg.
        wa_taxcom-hwaer = 'INR'.    "t001-waers.
        wa_taxcom-llief = wa_ekko-llief.
        wa_taxcom-bldat = wa_ekbe-bldat.
        wa_taxcom-matnr = wa_ekbe-matnr.         "HTN-Abwicklung
        wa_taxcom-werks = wa_ekbe-werks.          "pr_plant.
          taxcom-bwtar = ekpo-bwtar.
        wa_taxcom-matkl = wa_ekko-matkl.
        wa_taxcom-meins = wa_ekko-meins.
        wa_taxcom-ebeln = wa_ekbe-ebeln.
        wa_taxcom-ebelp = wa_ekbe-ebelp.
        wa_taxcom-mglme = wa_ekbe-menge.
        wa_taxcom-mtart = wa_ekko-mtart.
    *Call function module CALCULATE_TAX_ITEM--
        CALL FUNCTION 'CALCULATE_TAX_ITEM'
          EXPORTING
            i_taxcom     = wa_taxcom
            display_only = 'X'
           dialog       = diakz
          IMPORTING
            e_taxcom     = wa_taxcom
           nav_anteil   = hwert
          TABLES
            t_xkomv = it_komv
          EXCEPTIONS
            OTHERS       = 01.
        IF sy-subrc = 0.
        ENDIF.
        wa_display-bsart = wa_ekko-bsart.
        wa_display-knttp = wa_ekko-knttp.
        wa_display-bprme = wa_ekko-bprme.
        wa_display-meins = wa_ekko-meins.
        wa_display-lifnr = wa_ekko-lifnr.
        wa_display-ebeln = wa_ekbe-ebeln.
        wa_display-bedat = wa_ekko-bedat.
        wa_display-bwart = wa_ekbe-bwart.
        wa_display-budat = wa_ekbe-budat.
        wa_display-matnr = wa_ekbe-matnr.
        wa_display-belnr = wa_ekbe-belnr.
        wa_display-menge = wa_ekbe-menge.
        wa_display-PEINH = wa_ekko-PEINH.
        wa_display-dmbtr = ( wa_ekko-netpr * wa_ekbe-menge * wa_ekko-wkurs ) / wa_ekko-PEINH.
      WA_DISPLAY-DMBTR = WA_EKBE-DMBTR.
        wa_display-srvpos = wa_ekbe-srvpos.
        wa_display-mwskz = wa_EKKO-mwskz.
        wa_display-WAERS = wa_EKKO-WAERS.
    read table it_lfa1 into wa_lfa1 with key lifnr = wa_ekko-lifnr.
    wa_display-name1 = wa_lfa1-name1.
    wa_display-pstlz = wa_lfa1-pstlz.
    wa_display-stras = wa_lfa1-stras.
    read table it_t007s into wa_t007s with key mwskz = wa_ekko-mwskz.
    wa_display-text1 = wa_t007s-text1.
    read table it_j_1imovend into wa_j_1imovend with key lifnr = wa_ekko-lifnr.
    wa_display-j_1icstno = wa_j_1imovend-j_1icstno.
    read table it_bseg into wa_bseg with key LIFNR = wa_lfa1-lifnr.  " wa_ekKO-LIFNR .
    wa_display-HKONT = wa_bseg-HKONT.
    *read table it_ska1 into wa_ska1 with key sakan = wa_bseg-hkont.
    *wa_display-mcod1 = wa_ska1-mcod1.
        READ TABLE it_komv WITH KEY kschl = 'JCDB'
                                    kposn = wa_ekko-ebelp
                                    INTO wa_komv.
        IF sy-subrc = 0.
          wa_display-custduty = wa_komv-kwert .
        ELSE.
          READ TABLE it_konv INTO wa_konv WITH KEY knumv = wa_ekko-knumv
                                                   kposn = wa_ekko-ebelp
                                                   kschl = 'JCDB'.
          IF  wa_ekko-menge <> 0.
            wa_display-custduty = ( wa_ekbe-menge / wa_ekko-menge
                                            ) * wa_konv-kwert * wa_ekko-wkurs.
          ENDIF.
        ENDIF.
    Get the BED OR EXCISE DUTY
         CLEAR :  wa_komv , wa_konv.
        READ TABLE it_komv WITH KEY kschl = 'JMOP'
                                    kposn = wa_ekko-ebelp
                                    INTO wa_komv.
        IF sy-subrc = 0 .
          wa_display-BED = wa_komv-kwert .
        ELSE.
          READ TABLE it_komv WITH KEY kschl = 'JMOQ'
                                      kposn = wa_ekko-ebelp
                                      INTO wa_komv.
          IF sy-subrc = 0.
            wa_display-BED = wa_komv-kwert .
          ELSE.
            READ TABLE it_konv INTO wa_konv WITH KEY knumv = wa_ekko-knumv
                                                  kposn = wa_ekko-ebelp
                                                  kschl = 'JMOP'.
            IF sy-subrc = 0.
              IF  wa_ekko-menge <> 0.
                wa_display-BED  = ( wa_ekbe-menge / wa_ekko-menge
                                            ) * wa_konv-kwert * wa_ekko-wkurs.
              ENDIF.
            ELSE.
              READ TABLE it_konv INTO wa_konv WITH KEY
                                                 knumv =  wa_ekko-knumv
                                                 kposn = wa_ekko-ebelp
                                                 kschl = 'JMOQ'.
              IF  wa_ekko-menge <> 0.
                wa_display-BED  = ( wa_ekbe-menge / wa_ekko-menge
                                            ) * wa_konv-kwert * wa_ekko-wkurs.
              ENDIF.
            ENDIF.
          ENDIF.
        ENDIF.
    ******END OF EXCISE DUTY AND THE BED******************************************************
    Get the  EDUCATION CESS
        CLEAR :  wa_komv , wa_konv.
        READ TABLE it_komv WITH KEY kschl = 'JEC1'
                                    kposn = wa_ekko-ebelp
                                    INTO wa_komv.
        IF sy-subrc = 0 .
          wa_display-educess = wa_komv-kwert .
        ELSE.
          READ TABLE it_komv WITH KEY kschl = 'JESQ'
                                      kposn = wa_ekko-ebelp
                                      INTO wa_komv.
          IF sy-subrc = 0.
            wa_display-educess = wa_komv-kwert .
          ELSE.
            READ TABLE it_konv INTO wa_konv WITH KEY knumv = wa_ekko-knumv
                                                  kposn = wa_ekko-ebelp
                                                  kschl = 'JEC1'.
            IF sy-subrc = 0.
              IF  wa_ekko-menge <> 0.
                wa_display-educess  = ( wa_ekbe-menge / wa_ekko-menge
                                            ) * wa_konv-kwert * wa_ekko-wkurs.
              ENDIF.
            ELSE.
              READ TABLE it_konv INTO wa_konv WITH KEY
                                                 knumv =  wa_ekko-knumv
                                                 kposn = wa_ekko-ebelp
                                                 kschl = 'JESQ'.
              IF  wa_ekko-menge <> 0.
                wa_display-educess  = ( wa_ekbe-menge / wa_ekko-menge
                                            ) * wa_konv-kwert * wa_ekko-wkurs.
              ENDIF.
            ENDIF.
          ENDIF.
        ENDIF.
    *END OF EDUCATION CESS
    Get the SERVICE TAX
        clear : WA_KOMV , WA_KONV.
        read table IT_KOMV with key KSCHL = 'JSRT'
                                    KPOSN = WA_EKKO-EBELP
                                    into WA_KOMV.
        if SY-SUBRC = 0.
          WA_DISPLAY-SERTAX  = WA_KOMV-KWERT .
        else.
          read table IT_KONV into WA_KONV with key KNUMV = WA_EKKO-KNUMV
                                                   KPOSN = WA_EKKO-EBELP
                                                   KSCHL = 'JSRT'.
          WA_DISPLAY-SERTAX  = WA_KONV-KWERT * wa_ekko-WKURS.
        endif.
    END OF SERVICE TAX****************************************
    Get the  EDUCATION CESS ON SERVICE TAX************************
        clear : WA_KOMV , WA_KONV.
        read table IT_KOMV with key KSCHL = 'JEC5'
                                    KPOSN = WA_EKKO-EBELP
                                    into WA_KOMV.
        if SY-SUBRC = 0.
          WA_DISPLAY-SEREDUCESS  = WA_KOMV-KWERT .
        else.
          read table IT_KONV into WA_KONV with key KNUMV = WA_EKKO-KNUMV
                                                   KPOSN = WA_EKKO-EBELP
                                                   KSCHL = 'JEC5'.
          WA_DISPLAY-SEREDUCESS  = WA_KONV-KWERT * wa_ekko-WKURS.
        endif.
    ******END OF SERVICE TAX ON EDUCATION CESS************************************************
    Get the CVD
        CLEAR : wa_komv , wa_konv.
        READ TABLE it_komv WITH KEY kschl = 'JCV1'
                                    kposn = wa_ekko-ebelp
                                    INTO wa_komv.
        IF sy-subrc = 0.
          wa_display-cvd  = wa_komv-kwert .
        ELSE.
          READ TABLE it_konv INTO wa_konv WITH KEY knumv = wa_ekko-knumv
                                                   kposn = wa_ekko-ebelp
                                                   kschl = 'JCV1'.
          IF  wa_ekko-menge <> 0.
            wa_display-cvd  = ( wa_ekbe-menge / wa_ekko-menge
                                            ) * wa_konv-kwert * wa_ekko-wkurs.
          ENDIF.
        ENDIF.
    Get the total INSURANCE
        CLEAR : wa_komv , wa_konv.
        READ TABLE it_komv WITH KEY kschl = 'ZIN1'
                                    kposn = wa_ekko-ebelp
                                    INTO wa_komv.
        IF sy-subrc = 0 .
          wa_display-insure = wa_komv-kwert .
        ELSE.
          READ TABLE it_komv WITH KEY kschl = 'ZIN2'
                                      kposn = wa_ekko-ebelp
                                      INTO wa_komv.
          IF sy-subrc = 0.
            wa_display-insure = wa_komv-kwert .
          ELSE.
            READ TABLE it_konv INTO wa_konv WITH KEY knumv = wa_ekko-knumv
                                                  kposn = wa_ekko-ebelp
                                                  kschl = 'ZIN1'.
            IF sy-subrc = 0.
              IF  wa_ekko-menge <> 0.
                wa_display-insure  = ( wa_ekbe-menge / wa_ekko-menge
                                            ) * wa_konv-kwert * wa_ekko-wkurs.
              ENDIF.
            ELSE.
              READ TABLE it_konv INTO wa_konv WITH KEY
                                     

    Hi Ingo,
    Thanks for the reply. But let me rephrase my question.  In the Bex we get a extra row called overall result in the result set which gives the correct  count/total/average based on exception aggregation.  The question is how we show the overall result row in the crystal or rather how can we map it into crystal.  So i thought as of now we should create a formula to compute the overall result and display it.
    Hope I am clear this time in asking the right question.
    Many many thanks in advance for your reply.
    Kind regards,
    Shiva.

  • How to get the total number of pages printed in a report?

    Hi All,
    I have a requirement where I need to print a frame of fields only in the last page. Unfortunately I cannot use the 'Print Object On' property as it doesnt work in my case. So, I am planning to write a format trigger on the frame to return TRUE if the page is the last physical page. Now, I need to know how to get the total number of physical pages that will get printed in the report so that I can use this to manipulate the frame. I was planning to use the 'Total Physical Pages' built-in, but it seems like I can just use it to print in a field and I can't use this field's value anywhere in the plsql code (formula column function/format trigger) in the report. Is there anyway to get the total number of pages printed in the report which can be used in the report plsql code?
    Thanks,
    Srini.

    i found the solution, thanks

  • How to get the page number in the break section?

    Hi expert,
    The user wants the page number came right after the Break group name if the break section contains more than 1 page. E.g.
    ABC Compnay
    XXXXXXXXXXX XXXXXXXX
    XXXXXXXXXX XXXXXXXXXXXX
    BCD Company, p 1
    XXXXXXXXXXX XXXXXXXX
    XXXXXXXXXX XXXXXXXXXXXX
    BCD Company, p 2
    XXXXXXXXXXX XXXXXXXX
    XXXXXXXXXX XXXXXXXXXXXX
    CDE Company
    XXXXXXXXXXX XXXXXXXX
    XXXXXXXXXX XXXXXXXXXXXX
    How to get the page number in section break level?

    Hi Wes
    * Create a Field on the margin.
    * Set its "Source" to "Page Number"/"Physical Page Number".
    * Click "Page Numbering" button.
    * In "Reset At" list box, choose the Repeating frame that surrounds your detail group in the layout.
    This should cause Reports to increment the page number until the "Company" repeating frame resets.
    Regards
    Sripathy

  • How to adjust the path of a tween using actionscript

    I'm a novice at Actionscript3 and would greatly appreciate an answer to what seems like a simple question:
    Here's my project:
    http://home.comcast.net/~samiri/director/mortals/amadoFlashPortrait/index.htm
    Click on the gray scale frame images. A larger version of that image tweens out along the z axis. However it comes from 'somewhere else' not from 'within the frame.' How do I get the each larger gray scale frame image to look like it comes directly from the place where the user clicks (not to one side or the other)?
    So I guess what I'm asking is how to adjust the path of the tween along the x and y axis using the actionscript code (below).
    My method:
    I'm using this line of code in my script:
    var myTween:Tween = new Tween(mdImg, "z", Strong.easeOut, 300, 0, 1, true);
    "mdImg" is the variable that holds the name of the hotspot clicked upon by the user.
    I have the larger (faded edge) image positioned directly on top of the frame image and just kept invisible until the User clicks on the hotspot over the frame image.
    Thanks much.

    Thanks moccamaximum,
    By "do your tweens manually" you mean to use the timeline to do frame-based tweening? That is an option but I'm wondering (as a newbie): Isn't it better to use actionscript to do animation since you have more control and it's time based rather than frame-rate based (and works better on low performance machines)? Just curious if I should be spending the time to learn actionscript or do it in the traditional way.
    Thanks

  • How to  adjust the text in input field

    Hi Expert,
    New in VC development. Can someone guide how to adjust the text in input field? Because of  long text length it  is not displaying fully in visual composer iView so user are not able to see the entire text in input fields

    HI Kundan,
    I assume that you have already tried different options perent in Label Postion for the field.
    If none of these options meet your requirement then you can try the following workaround:
    In the display properties, select label position as no label.
    In the form view add a new UI Control for Plain Text or HTML text and change its Label to "Material Number".
    Now place this new UI Control in before your actual Input field such that it appears as the field label.
    Hope this helps.
    Regards,
    Rk

  • How to adjust the height of the tracks in timeline mode

    I am trying to find my way around PE 10, have had the program for years but not used it. (I am using Win 7 on a 15" laptop, screen resolution is 1920x1080, 16 GB Ram, 4GB video RAM.) I took some video on vacation, in some clips there is a lot of wind noise. I know how to adjust the volume using key frames, but the tracks are only about ¼" wide making adjustment just about impossible. Full volume to zero is just a small fraction of an inch. I can zoom in on the track, but this doesn't make the track wider. Is there any way to do this?
    Thanks,
    David

    Actually, I wanted to do this in a static table.
    Just now, I learnt that this feature is not available in 12.0 as well as in other previous versions.
    However, this will be implemented in Release 12.1.
    Thanks,
    Navin.

Maybe you are looking for

  • Tamanho de pastas locais

    Olá a todos. Uso recentemente o Mozilla Thunderbird e estou com dúvida de como posso alterar o tamanho da caixa de pastas locais. Tenho muitos emails antigos, mas ao enviá-los para pastas locais criadas, em um certo momento me retorna uma mensagem de

  • Can I tether with an iPhone 4s and a Windows 7 laptop?

    Is there more to this than just turning on the hotspot and connecting the two together via cable?

  • SQL Server 2005 SP4 not installing correct on Server 2003

    Everytime I attempt to install SP4 on my Server 2003 system it states it goes through successfully but when I reboot it hasn't done anything. Summary Log states all is successful for version 9.00.5000.00 (0 Errors, SQL Support: Passed, Summary: Succe

  • Decimal place in duration

    hi all i want to enter duration in 2 decimal placess in internal activity. but system will not accepting 2 decimal place. Plz guide me where i can make setting for 2 decimal place. Regards KP..

  • IPhone 3GS won't start at all...please help

    My iPhone 3GS won't start at all, it only shows the apple logo untill the battery runs out and it keeps on doing that. It happened after I erased all contents & settings. I tried pressing home button & power button for 15 seconds too, it didn't work.