I need Pages for 10.7.5

I am running 10.7.5 and I work like to use Pages to allow me to open AppleWorks files. I can't seem to find it. Any help would be appreciated.

Buy it from a source such as Amazon or eBay.
(114223)

Similar Messages

Need a pager for Openbox

I need a simple, nice looking pager for Openbox. Something like fluxter, but that plays nice with Openbox/PyPanel.
I've tried wampager and fluxter, but neither are what I want.
Looking for:
- Transparency (pseudo)
- Size configuration
- no window borders
- icons in windows
- doesn't change the workspace area
Thanks!

miqorz wrote:
I use fbpanel..
http://left-foot.org/Images/clearlooks-fun.png
See it in action there?
omg! are you using vim, haha (turncoat!)

I have a new iMac. I have set up a user page for myself, for my wife and an administrator page. My question is my wife needs files from my user page transferred to her page. What's the easiest way?

I have a new iMac. I have set up a user page for myself, for my wife and an administrator page. My question is my wife needs files from my user page transferred to her page. What's the easiest way?

I've done this by dragging files from my user page to her drop box. In Finder, drag the required files and hover over the hard disc icon in the navigation bar on the left. As you hover, it will open another finder window showing the contents. Work your way down these windows into <Her username | Public | Dropbox>. Drop the files into the dropbox. She can then retrieve them from her user page.
Good luck,
Stephen

Need newest version of pages for my iMac. When trying to download latest version the message said I needed OSX 10.9? Where do I get this? I really feel stupid when I can't download a program!

I just worked on a Pages document on my iPad. I wanted to finish it on my iMac (OSX 10.7.5). I emailed the iPad Pages document to get it on my iMac. I then tryed to open the Pages document on my iMac. The message said I needed a newer version of Pages for the iMac. I then went to the Apple store to upgrade Pages for the iMac. When I tried to download the new version, I received a message that Pages couldn't be installed unless I upgraded to OSX 10.9? What the He.. is going on?

be very careful about getting the iWork "updates." This forum is FULL of complaints about it.
Mavericks seems good, though.
If you try Pages 5 and dislike it, Pages 4.3 will still be located in an iWork Folder within your Applications Folder.

Is there a Pages for MAC OS 10.7.x? If not, what is the alternative? Concrete issue is that I have received a .pages document and need to edit. Many thanks

Is there a Pages for MAC OS 10.7.x?
If not, what is the alternative?
Concrete issue is that I have received a ".pages" document and need to edit. I am running Mac Pro with OS X 10.7.
Many thanks

It is important that you determine if the .pages document originated from Pages ’08, Pages ’09, Pages v1.7.2 (IOS 6), or was exported as Pages ’09 from Pages v5+ on OS X Mavericks. If it meets one of these criteria, then you can edit the .pages document on your Lion machine with Pages ’09 from the iWork ’09 DVD. Pages documents can not be opened with TextEdit, but can be viewed with Preview.
On the otherhand, if the .pages document was created with Pages for iCloud beta, Pages v2.2.1 (IOS 7), or Pages v5+ on Mavericks, then your only recourse is to edit the document with Pages for iCloud beta. Since Fall 2013, Apple changed the .pages document format into something even more malevolently proprietary. Apple word processing products since this timeframe, are subsets of the Pages ’09 features/functionality, and will filter out content they do not support.
A Pages ’09 document is usually a compressed (zip) folder archive that looks like a regular file to the Finder. The newer Pages family of products only write out a package that to the Finder, also appears to be a regular file, but in reality it is a folder. The newer Pages documents must be zipped before placed on non-Apple filesystems.

I cannot get pages from iWork's to share. Do I need a new version of pages for Mountain Lion?

I cannot get pages from iworks to share on Mountain Lion. Do I need a new version of pages for Mountain Lion instead of iworks?

You need Pages 09 (Version 4) to take advantage of Mountain Lion's iCloud features. You don't say what version you have.
Jerry

Need Help for Page Design Technique: Level 0 Record and Level 1 Record

Folks,
Hello. I am developing HR system for a client. I design a page for "Position Information" as follows:
Level 0 record fields:
Position Number: 01
Status: Open
Because many people are in this position, level 1 record is a scroll area containing many rows belong to this Position Number as follows:
Level 1 record fields:
Profile ID: 001 effective date: xx/xx/xxxx
Profile ID: 002 effective date: xx/xx/xxxx
After save the page into Database, the data in Level 1 record table doesn't match the data in Level 0 record table.
No way to identify the rows of data in Level 1 record table belong to a specific row of data in Level 0 record table.
I need help to design the Database, that is 2 tables: many rows in second table belong to one row in first table.
Can any folks give some idea to design such a Database so that save the Page correctly ?

Table 2 should have all the key fields from Table 1, followed by atleast one more key of its own.
Subhash

Need help in adding a disclaimer page for guest users

We are trying to add a disclaimer page for public users to accept and continue for our public WLAN. Need to know how to add this page, and if there is a character liimit?

Go to Security -> Web Auth -> Web Login Page
Don't forget to enable Web Auth:
WLAN -> Guest LAN -> Security -> Layer 3 -> Web Policy
Is this what you are looking for?

Do I need to buy Pages for my iMac?

I am trying to learn if I need to buy the ios Pages for $9.99 only and use it on iPad/iPhone/iMac, or must I also purchase the iWork Pages $19.99?

The iOS version of Pages will only work on your iDevices.
The OS X version of Pages will only work on your Macs.
So if you want to work with Pages both on your Macs and your iDevices then you need to purchase both of them.
Allan

I purchased Numbers and Pages for I-Pad, do I need to buy them again for my I-Mac?

I purchased Numbers and Pages for my I-Pad 2; if want them on my I-Mac do I need to buy them again?

You will have to purchase iWork (or the individual apps) for your Mac. The apps you purchased for the iPad are only for iOS.

I bought Pages for my iPad. Do I need to purchase the app again to install on MacBookPro?

I bought Pages for my ipad. Do I need to purchase the app again to install on MacBookPro?

Welcome to Apple Communities
Yes. They are different

I need to back to the versión 1.0 of pages for ipad

How can i back to versión 1.0 of pages, because de 2.0 is not well for me cause my mac is a oldest model and onlu use the 4.3 pages for mac...

Install iTunes on your Acer and you can back up the iPhone. Or back it up to iCloud. If you do not back it up you can get it unlocked, but you will lose all of your content.
You can get iTunes from http://www.apple.com/itunes.
Even after unlocking I'm not sure it will work on Straight Talk, because last time I checked ST used Verizon as its carrier, and an AT&T iPhone 4 is not compatible with Verizon's network. You can probably use it on Net 10 or T-Mobile once it is unlocked.

To view reports in new page for each cutomer using Report Designer

HI all
I have a requirement to view the data (key figures) for each customer in a new page.
I have created the same using the Report Designer tool.
Now there is setting for this Group Header 'Customer' i have selected the option 'repeat group header on each page'
still the query when generated, gives fine results for certain cases but not for all.
like it will show the each customers in a fresh page for some pages , then in midst there would some 2-3 customers in the same page.
There is no relation between these customers , they are same as the other customers, no difference at all.then i am not able to figure out the reason why it is behaving so odd.
Thanks
Ramesh

Ramesh,
right now there really is no way to solve what you are looking for. There partial solutions, but you will not be able to force a page break in a dynamic report.
Here is what I have faced, and what I have come up with so far:
I have a series of reports that have the same column heading, but spread over 5 pages in a fixed structure. I need to be able to re-use the header and the general report design with 6 reports. Here is my solution:
1. Create an outline of the report. I did all the formatting by creating a report section for each page. You can force page breaks between the pages. Upgrade to patch 1502 (came out last week) and you will see some new functionality (such as fit to page, page numbers, etc).
2. Insert all you page breaks and do all the formatting.
3. Insert an infoprovider. Once in, you can just drag and drop the key figure cells into your formatted report.
4. Create additional modification for formatting as needed.
This fixes my problem (for now), but I had to do a lot of work to come up with this. Also, the latest patch (1501 and 1502) has created an issue for me - there is a null exception when I try to use a variable or a filter value in the report body - I can't save the report. I have an OSS message out, but our BASIS guys are going to be taking the lead on troubleshooting this.
The reason that you are seeing some customers on the new pages is probably because of "how the cookie falls" - they just fit that way.
I am trying to be positive and overcome the limitations that are in place right now. If my technical issue is solved, I would recommend upgrading to the new patch (1403 is the latest stable one in my opinion)
good luck
Pavel

I need page no's and top of page header to every page

Hi Experts,
i need page no's and top of page header to every page
to this report.
i took print outs it came only page number 1 to all the pages, after took prints it seems header to all the pages
but not displaying in output screen.
TYPE-POOLS: SLIS.
TABLES: MKPF,LFA1,MSEG,EKET,T001L,MAKT,S031,S032,MARA,LIPS,LIKP,T001W.
DATA FLAG TYPE I.
DATA : MENGE_RE LIKE MSEG-MENGE,
       MENGE_IS LIKE MSEG-MENGE,
       MENGE_O LIKE MSEG-MENGE,
       MENGE_BAL LIKE MSEG-MENGE.
DATA MAGBB LIKE S031-MAGBB.
DATA MZUBB LIKE S031-MZUBB.
DATA V_MONTH LIKE S031-SPMON.
DATA XBLNR LIKE MKPF-XBLNR.
DATA : BEGIN OF ITAB1 OCCURS 100,
       MATNR LIKE MAKT-MATNR,
       END OF ITAB1.
DATA : BEGIN OF ITAB2 OCCURS 100,
MATNR LIKE MAKT-MATNR,
WERKS LIKE MARD-WERKS,
LGORT LIKE MARD-LGORT,
BUSTW LIKE MSEG-BUSTW,
BWART LIKE MSEG-BWART,
SHKZG LIKE MSEG-SHKZG,
MENGE LIKE MSEG-MENGE,
END OF ITAB2.
DATA: PAGNO(5) TYPE C.
DATA : PAGENO LIKE SY-PAGNO.
DATA: STR1 TYPE DATS,
      STR2(14) TYPE C,
      STR3(10) TYPE C.
DATA : V_MONUM LIKE T015M-MONUM,
       V_MONAM LIKE T015M-MONAM.
TYPES: FARBE TYPE SLIS_T_SPECIALCOL_ALV.
DATA V_STOCK LIKE MSEG-MENGE.
DATA V_STOCK1 LIKE MSEG-MENGE.
DATA: V_MONTH1 LIKE S031-SPMON.
DATA: OSTOCK LIKE MSEG-MENGE.
CONSTANTS:
GC_FORMNAME_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE'.
DATA: GT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
      GT_LAYOUT   TYPE SLIS_LAYOUT_ALV,
      GS_KEYINFO TYPE SLIS_KEYINFO_ALV,
      GT_SORT     TYPE SLIS_T_SORTINFO_ALV,
      GT_SP_GROUP TYPE SLIS_T_SP_GROUP_ALV,
      GT_EVENTS   TYPE SLIS_T_EVENT,
     G_PRINT     TYPE SLIS_PRINT_ALV.
DATA: LS_FIELDCAT TYPE SLIS_FIELDCAT_ALV OCCURS 0 WITH HEADER LINE.
DATA: FC_HIER      TYPE SLIS_FIELDCAT_ALV OCCURS 0 WITH HEADER LINE.
DATA: GT_LIST_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER.
DATA: GT_REPID       LIKE SY-REPID.
DATA: GT_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE'.
DATA: GT_TOP_OF_LIST TYPE SLIS_FORMNAME VALUE 'TOP_OF_LIST'.
DATA: FLD(15).
DATA: TXT(50).
I N I T I A L I Z A T I O N
GT_REPID = SY-REPID.
PAGNO = SY-PAGNO.
PERFORM EVENTTAB_BUILD USING GT_EVENTS[].
A T S E L E C T I O N S C R E E N
*AT SELECTION-SCREEN ON BUDAT.
PERFORM VALIDATION.
S T A R T O F S E L E C T I O N
START-OF-SELECTION.
PERFORM FIELDCAT_INIT USING GT_FIELDCAT[].
PERFORM FETCH_DATA.
E N D O F S E L E C T I O N
END-OF-SELECTION.
IF NOT ITAB2[] IS INITIAL.
    PERFORM COMMENT_BUILD USING GT_LIST_TOP_OF_PAGE[].
   CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
     EXPORTING
       I_CALLBACK_PROGRAM = GT_REPID
       IT_FIELDCAT        = GT_FIELDCAT[]
       IT_EVENTS          = GT_EVENTS[]
       IT_SORT            = GT_SORT[]
       IS_LAYOUT          = GT_LAYOUT
     TABLES
       T_OUTTAB           = ITAB2.
ELSE.
    MESSAGE S006(Z1).
ENDIF.
CLEAR : GT_LAYOUT.
Report Selections
DATA: BEGIN OF IT_HEADER OCCURS 10,
WERKS LIKE MSEG-WERKS,
NAME1 LIKE T001W-NAME1,
MAKTX LIKE MAKT-MAKTX,
MATNR LIKE MSEG-MATNR,
MENGE_O LIKE MSEG-MENGE,
END OF IT_HEADER.
DATA: BEGIN OF ITAB OCCURS 50,
        WERKS LIKE MSEG-WERKS,
        MATNR LIKE MSEG-MATNR,
        BWART LIKE MSEG-BWART,
        LGORT LIKE MSEG-LGORT,
        EBELN LIKE MSEG-EBELN,
        XBLNR LIKE MKPF-XBLNR,
        BUDAT LIKE MKPF-BUDAT,
        MBLNR LIKE MSEG-MBLNR,
        MENGE LIKE MSEG-MENGE,
        MAKTX LIKE MAKT-MAKTX,
        XAUTO LIKE MSEG-XAUTO,
        NAME1 LIKE T001W-NAME1,
        MENGE_O LIKE MSEG-MENGE,
        SHKZG LIKE MSEG-SHKZG,
        MENGE_IS LIKE MSEG-MENGE,
        MENGE_RE LIKE MSEG-MENGE,
END OF ITAB.
DATA: BEGIN OF INT_DATA OCCURS 50,
        WERKS LIKE MSEG-WERKS,
        MATNR LIKE MSEG-MATNR,
        BWART LIKE MSEG-BWART,
        XBLNR LIKE MKPF-XBLNR,
        MBLNR LIKE MSEG-MBLNR,
        BUDAT LIKE MKPF-BUDAT,
        MAKTX LIKE MAKT-MAKTX,
        MENGE_O LIKE MSEG-MENGE,
        MENGE_R LIKE MSEG-MENGE,
        MENGE_TO LIKE MSEG-MENGE,
        MENGE_TI LIKE MSEG-MENGE,
        MENGE_S LIKE MSEG-MENGE,
        MENGE_ST LIKE MSEG-MENGE,
        MENGE_AD LIKE MSEG-MENGE,
        MENGE_RT LIKE MSEG-MENGE,
        MENGE_C LIKE MSEG-MENGE,
        MENGE_CL LIKE MSEG-MENGE,
        MENGE_BAL LIKE MSEG-MENGE,
        MENGE_CR LIKE MSEG-MENGE,
        NAME1 LIKE T001W-NAME1,
        MENGE_RE LIKE MSEG-MENGE,
        MENGE_IS LIKE MSEG-MENGE,
        MENGE_BAL1 LIKE MSEG-MENGE,
        SHKZG LIKE MSEG-SHKZG,
         MENGE LIKE MSEG-MENGE,
        END OF INT_DATA.
DATA: BEGIN OF INT_DATA1 OCCURS 50,
         WERKS LIKE MSEG-WERKS,
         MATNR LIKE MSEG-MATNR,
         BWART LIKE MSEG-BWART,
         MENGE_ST LIKE MSEG-MENGE,
         MENGE_O LIKE MSEG-MENGE,
         WAMNG LIKE EKET-WAMNG,
         WEMNG LIKE EKET-WEMNG,
         MENGE LIKE MSEG-MENGE,
         RETPO LIKE EKPO-RETPO,
         UMREN LIKE EKPO-UMREN,
         UMREZ LIKE EKPO-UMREZ,
         BSTMG LIKE EKPO-MENGE,
         XBLNR LIKE MKPF-XBLNR,
   END OF INT_DATA1.
DATA: BEGIN OF INT_DATA2 OCCURS 50,
         WERKS LIKE MSEG-WERKS,
         LGORT LIKE S031-LGORT,
         MATNR LIKE MSEG-MATNR,
         BWART LIKE MSEG-BWART,
         MENGE_IS LIKE MSEG-MENGE,
         MBWBEST LIKE S032-MBWBEST,
         MAKTX LIKE MAKT-MAKTX,
   END OF INT_DATA2.
DATA:V_GJAHR LIKE MKPF-BUDAT.
DATA : FLAG6 TYPE C,
    PAGENO1 LIKE SY-PAGNO,
    PAGENO2 LIKE SY-PAGNO.
SELECTION-SCREEN BEGIN OF BLOCK 0 WITH FRAME TITLE TEXT-064.
SELECT-OPTIONS:
MATNR FOR MSEG-MATNR,
MATKL FOR MARA-MATKL OBLIGATORY,
WERKS FOR MSEG-WERKS OBLIGATORY,
LGORT FOR MSEG-LGORT,
*CHARG FOR MSEG-CHARG,
BWART FOR MSEG-BWART,
*LIFNR FOR LFA1-LIFNR,
*WADAT FOR LIKP-WADAT_IST,
BUDAT FOR MKPF-BUDAT.
SELECTION-SCREEN END OF BLOCK 0.
*SELECTION-SCREEN SKIP 1.
Parameters
*SELECTION-SCREEN SKIP 1.
Variante
*SELECTION-SCREEN BEGIN OF BLOCK 0 WITH FRAME TITLE TEXT-064.
DATA: P_VARI LIKE DISVARIANT-VARIANT.
*SELECTION-SCREEN END OF BLOCK 0.
Layout
SELECTION-SCREEN BEGIN OF BLOCK A WITH FRAME TITLE TEXT-060.
DATA:   P_ZEBRA VALUE 'X'.
SELECTION-SCREEN END OF BLOCK A.
SELECTION-SCREEN BEGIN OF BLOCK D WITH FRAME TITLE TEXT-063.
PARAMETERS:
              P_EXPAND AS CHECKBOX DEFAULT ' '.
DATA: P_DETPOP VALUE 'X' .
SELECTION-SCREEN END OF BLOCK D.
DATA:       G_BOXNAM TYPE SLIS_FIELDNAME VALUE 'BOX',
              G_EXPANDNAME TYPE SLIS_FIELDNAME VALUE 'EXPAND',
              P_F2CODE LIKE SY-UCOMM       VALUE '&ETA',
              P_LIGNAM TYPE SLIS_FIELDNAME VALUE 'LIGHTS',
              G_SAVE(1) TYPE C,
              G_TABNAME_HEADER TYPE SLIS_TABNAME,
              G_TABNAME_ITEM   TYPE SLIS_TABNAME,
              G_EXIT(1) TYPE C,
              GX_VARIANT LIKE DISVARIANT,
              G_VARIANT LIKE DISVARIANT.
INITIALIZATION.
GT_REPID = SY-REPID.
G_TABNAME_HEADER = 'IT_HEADER'.
G_TABNAME_ITEM   = 'INT_DATA'.
define keyinfo
CLEAR GS_KEYINFO.
GS_KEYINFO-HEADER01 = 'MATNR'.
GS_KEYINFO-ITEM01   = 'MATNR'.
*GS_KEYINFO-HEADER01.
PERFORM E01_FIELDCAT_INIT USING GT_FIELDCAT[].
PERFORM E03_EVENTTAB_BUILD USING GT_EVENTS[].
PERFORM E04_COMMENT_BUILD USING GT_LIST_TOP_OF_PAGE[].
PERFORM E06_T_SORT_BUILD   USING GT_SORT[].
PERFORM E07_SP_GROUP_BUILD USING GT_SP_GROUP[].
Schalter Varianten benutzerspezifisch/allgemein speicherbar setzen
Set Options: save variants userspecific or general
G_SAVE = 'A'.
PERFORM VARIANT_INIT.
Get default variant
GX_VARIANT = G_VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET'
    EXPORTING
      I_SAVE     = G_SAVE
    CHANGING
      CS_VARIANT = GX_VARIANT
    EXCEPTIONS
      NOT_FOUND = 2.
IF SY-SUBRC = 0.
    P_VARI = GX_VARIANT-VARIANT.
ENDIF.
Process on value request
*AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_VARI.
PERFORM F4_FOR_VARIANT.
AT SELECTION-SCREEN.
PERFORM PAI_OF_SELECTION_SCREEN.
START-OF-SELECTION.
END-OF-SELECTION.
PERFORM LAYOUT_BUILD USING GT_LAYOUT.     "wg. Parameters
Call ABAP/4 List Viewer
CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY'
    EXPORTING
      I_CALLBACK_PROGRAM = GT_REPID
      IS_LAYOUT          = GT_LAYOUT
      IT_FIELDCAT        = GT_FIELDCAT[]
      IT_SPECIAL_GROUPS = GT_SP_GROUP[]
      IT_SORT            = GT_SORT[]
      I_SAVE             = G_SAVE
      IS_VARIANT         = G_VARIANT
      IT_EVENTS          = GT_EVENTS[]
      I_TABNAME_HEADER   = G_TABNAME_HEADER
      I_TABNAME_ITEM     = G_TABNAME_ITEM
      IS_KEYINFO         = GS_KEYINFO
      IS_PRINT           = G_PRINT
    TABLES
      T_OUTTAB_HEADER    = IT_HEADER
      T_OUTTAB_ITEM      = INT_DATA.
      FORM E01_FIELDCAT_INIT                                        *
--> E01_LT_FIELDCAT                                               *
FORM FIELDCAT_INIT
                  USING RT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
DATA: LS_FIELDCAT TYPE SLIS_FIELDCAT_ALV.
DATA: POS TYPE I VALUE 1.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'WERKS'.
LS_FIELDCAT-TABNAME      = G_TABNAME_HEADER .
LS_FIELDCAT-SELTEXT_L        = 'Plant'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'NAME1'.
LS_FIELDCAT-TABNAME      = G_TABNAME_HEADER .
LS_FIELDCAT-SELTEXT_L        = 'Description'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MATNR'.
LS_FIELDCAT-TABNAME      = G_TABNAME_HEADER .
LS_FIELDCAT-SELTEXT_M        = 'Material'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MAKTX'.
LS_FIELDCAT-TABNAME      = G_TABNAME_HEADER .
LS_FIELDCAT-SELTEXT_M        = 'Material Description'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'XBLNR'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M        = ' Doc No.'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'BUDAT'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M        = ' Doc Date.'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'BWART'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M        = ' Mvt.'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MBLNR'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M        = ' Mat.Doc No'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MENGE_R'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M    = ' STO-In '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MENGE_RT'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M    = ' Sales Returns '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MENGE_CL'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M    = ' Canc of Invoice'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MENGE_AD'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M    = ' Adjustments '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MENGE_S'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M     = ' Sales. '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MENGE_TO'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M    = ' STO-Out '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MENGE_CR'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M    = ' Canc of Sal Returns'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MENGE_AD'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M    = 'Adjustments '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MENGE_O'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M    = ' Opening Balance '.
LS_FIELDCAT-NO_ZERO = 'X'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MENGE_BAL'.
LS_FIELDCAT-TABNAME      = G_TABNAME_ITEM .
LS_FIELDCAT-SELTEXT_M    = ' Balance   '.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
ENDFORM.                    "E01_FIELDCAT_INIT
      FORM E02_DATA_ADD                                             *
--> E02_LT_SFLIGHT                                                *
      FORM E03_EVENTTAB_BUILD                                       *
--> E03_LT_EVENTS                                                 *
*FORM E03_EVENTTAB_BUILD USING E03_LT_EVENTS TYPE SLIS_T_EVENT.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
   EXPORTING
     I_LIST_TYPE = 1
   IMPORTING
     ET_EVENTS   = E03_LT_EVENTS.
READ TABLE E03_LT_EVENTS WITH KEY NAME = SLIS_EV_TOP_OF_PAGE
                          INTO LS_EVENT.
IF SY-SUBRC = 0.
   MOVE GC_FORMNAME_TOP_OF_PAGE TO LS_EVENT-FORM.
   APPEND LS_EVENT TO E03_LT_EVENTS.
ENDIF.
*ENDFORM.                    "E03_EVENTTAB_BUILD
      FORM E04_COMMENT_BUILD                                        *
--> E04_LT_TOP_OF_PAGE                                            *
FORM E04_COMMENT_BUILD USING E04_LT_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER.
DATA: LS_LINE TYPE SLIS_LISTHEADER.
Listenüberschrift: Typ H
CLEAR LS_LINE.
LS_LINE-TYP = 'H'.
LS_LINE-INFO = TEXT-001.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
CLEAR LS_LINE.
LS_LINE-TYP = 'S'.
LS_LINE-KEY = TEXT-050.
LS_LINE-INFO = TEXT-010.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
LS_LINE-KEY = TEXT-051.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
Aktionsinfo: Typ A
CLEAR LS_LINE.
LS_LINE-TYP = 'A'.
LS_LINE-INFO = TEXT-002.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
ENDFORM.                    "E04_COMMENT_BUILD
      FORM E05_LAYOUT_BUILD                                         *
<-> E05_LS_LAYOUT                                                 *
FORM LAYOUT_BUILD USING LS_LAYOUT TYPE SLIS_LAYOUT_ALV.
LS_LAYOUT-F2CODE            = P_F2CODE.
LS_LAYOUT-ZEBRA          = P_ZEBRA.
LS_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.
IF P_EXPAND = 'X'.
    LS_LAYOUT-EXPAND_FIELDNAME     = G_EXPANDNAME.
ELSE.
    CLEAR LS_LAYOUT-EXPAND_FIELDNAME.
ENDIF.
LS_LAYOUT-DETAIL_POPUP      = P_DETPOP.
ENDFORM.                    "E05_LAYOUT_BUILD
      FORM E06_T_SORT_BUILD                                         *
--> E06_LT_SORT                                                   *
*FORM E06_T_SORT_BUILD USING E06_LT_SORT TYPE SLIS_T_SORTINFO_ALV.
DATA: LS_SORT TYPE SLIS_SORTINFO_ALV.
CLEAR LS_SORT.
LS_SORT-FIELDNAME = 'WERKS'.
LS_SORT-TABNAME   = G_TABNAME_HEADER.
LS_SORT-SPOS      = 1.
LS_SORT-UP        = 'X'.
APPEND LS_SORT TO E06_LT_SORT.
CLEAR LS_SORT.
LS_SORT-FIELDNAME = 'MATNR'.
LS_SORT-TABNAME   = G_TABNAME_ITEM.
LS_SORT-SPOS      = 2.
LS_SORT-UP      = 'X'.
APPEND LS_SORT TO E06_LT_SORT.
*ENDFORM.                    "E06_T_SORT_BUILD
      FORM E07_SP_GROUP_BUILD                                       *
--> E07_LT_SP_GROUP                                               *
FORM E07_SP_GROUP_BUILD USING E07_LT_SP_GROUP TYPE SLIS_T_SP_GROUP_ALV.
DATA: LS_SP_GROUP TYPE SLIS_SP_GROUP_ALV.
CLEAR LS_SP_GROUP.
LS_SP_GROUP-SP_GROUP = 'A'.
LS_SP_GROUP-TEXT     = TEXT-005.
APPEND LS_SP_GROUP TO E07_LT_SP_GROUP.
ENDFORM.                    "E07_SP_GROUP_BUILD
      FORM SELECTION                                                *
FORM FETCH_DATA .
STR3 = BUDAT-LOW+0(4).
SELECT * FROM MARA INTO CORRESPONDING FIELDS OF TABLE ITAB1
                     WHERE MATNR IN MATNR AND
                     MATKL IN MATKL.
SELECT MATNR WERKS LGORT
                     INTO TABLE ITAB2
                     FROM MARD FOR ALL ENTRIES IN ITAB1
                     WHERE WERKS IN WERKS AND
                           LGORT IN LGORT AND
                           MATNR = ITAB1-MATNR.
SELECT SINGLE NAME1 FROM T001W INTO INT_DATA-NAME1
       WHERE WERKS = INT_DATA-WERKS.
LOOP AT ITAB2.
    SELECT M~MATNR M~WERKS M~LGORT M~MENGE M~MBLNR M~MJAHR M~XAUTO M~SHKZG
                   M~BWART M~EBELN N~BUDAT N~XBLNR S~NAME1
                   INTO CORRESPONDING FIELDS OF ITAB
                   FROM   MSEG AS M INNER JOIN MKPF AS N ON
                          M~MBLNR = N~MBLNR
                          AND M~MJAHR = N~MJAHR
                        INNER JOIN T001W AS S ON
                          M~WERKS = S~WERKS
                      WHERE N~BUDAT IN BUDAT AND
                         M~WERKS = ITAB2-WERKS AND
                         M~LGORT = ITAB2-LGORT AND
                         M~MATNR = ITAB2-MATNR AND
                M~BWART IN BWART.
      APPEND ITAB.
      CLEAR ITAB.
    ENDSELECT.
    IF SY-SUBRC NE 0.
      ITAB-MATNR = ITAB2-MATNR.
      ITAB-WERKS = ITAB2-WERKS.
      ITAB-LGORT = ITAB2-LGORT.
      ITAB-BWART = ITAB2-BWART.
      APPEND ITAB.
    ENDIF.
    CLEAR: ITAB2,ITAB.
ENDLOOP.
DELETE ADJACENT DUPLICATES FROM ITAB2 COMPARING MATNR WERKS .
V_MONTH = BUDAT-LOW+0(6).
SELECT * INTO CORRESPONDING FIELDS OF TABLE INT_DATA2
           FROM S032 FOR ALL ENTRIES IN ITAB2
           WHERE MATNR = ITAB2-MATNR
                 AND WERKS   = ITAB2-WERKS
                 AND LGORT   = SPACE
                 AND   MBWBEST <> SPACE.
LOOP AT INT_DATA2 .
    SELECT SINGLE * FROM S031
                     WHERE MATNR = INT_DATA2-MATNR AND
                           WERKS = INT_DATA2-WERKS AND
                           LGORT = SPACE AND
                           SPMON GT V_MONTH.
    MODIFY INT_DATA2.
    CLEAR: INT_DATA2, S031.
ENDLOOP.
DELETE INT_DATA WHERE MENGE_O IS INITIAL .
DELETE ADJACENT DUPLICATES FROM INT_DATA COMPARING XBLNR MATNR MAKTX.
V_MONTH1 = BUDAT-LOW+0(6).
SORT ITAB BY MATNR WERKS XBLNR .
LOOP AT ITAB.
    XBLNR = ITAB-XBLNR.
    INT_DATA-MENGE = ITAB-MENGE.
    INT_DATA-BWART = ITAB-BWART.
    INT_DATA-XBLNR = ITAB-XBLNR.
    INT_DATA-BUDAT = ITAB-BUDAT.
    INT_DATA-MATNR = ITAB-MATNR.
    INT_DATA-MBLNR = ITAB-MBLNR.
    INT_DATA-MENGE = ITAB-MENGE.
    INT_DATA-SHKZG = ITAB-SHKZG.
    INT_DATA-MENGE_IS = ITAB-MENGE_IS.
    INT_DATA-MENGE_RE = ITAB-MENGE_RE.
    INT_DATA-MENGE_O = ITAB-MENGE_O.
    INT_DATA-NAME1 = ITAB-NAME1.
    AT NEW MATNR.
      FLAG = 1.
      IT_HEADER-MATNR = INT_DATA-MATNR.
      SELECT SINGLE MAKTX FROM MAKT INTO IT_HEADER-MAKTX WHERE
      MATNR = INT_DATA-MATNR.
      APPEND IT_HEADER.
      CLEAR IT_HEADER.
    ENDAT.
    IF FLAG = 1.
      PERFORM GET_OPENING_STOCK.
    ENDIF.
    INT_DATA-MENGE_O = OSTOCK.
    CASE ITAB-BWART.
      WHEN '101'.
        IF INT_DATA-SHKZG = 'S'.
          INT_DATA-MENGE_R = INT_DATA-MENGE_R + ITAB-MENGE.
        ENDIF.
      WHEN '453'.
        IF INT_DATA-SHKZG = 'S'.
          IF ITAB-XAUTO = 'X'.
            INT_DATA-MENGE_RT = INT_DATA-MENGE_RT + ITAB-MENGE.
          ENDIF.
        ENDIF.
      WHEN '351' OR '641'.
       IF ITAB-LGORT = 0.
         INT_DATA-MENGE_R = INT_DATA-MENGE_R + ITAB-MENGE.
       ELSE.
         INT_DATA-MENGE_TO = INT_DATA-MENGE_TO + ITAB-MENGE.
       ENDIF.
      WHEN '602' OR '642'.
        IF INT_DATA-SHKZG = 'S'.
          IF ITAB-LGORT = 0.
            INT_DATA-MENGE_CL = INT_DATA-MENGE_CL + ITAB-MENGE.
          ENDIF.
        ENDIF.
      WHEN '552' OR '310'.
        IF INT_DATA-SHKZG = 'S'.
          INT_DATA-MENGE_AD = INT_DATA-MENGE_AD - ITAB-MENGE.
        ENDIF.
      WHEN '601'.
        IF INT_DATA-SHKZG = 'H'.
          INT_DATA-MENGE_S = INT_DATA-MENGE_S + ITAB-MENGE.
        ENDIF.
      WHEN '641' .
        IF INT_DATA-SHKZG = 'H'.
          IF ITAB-LGORT = 0.
            INT_DATA-MENGE_TO = INT_DATA-MENGE_TO + ITAB-MENGE.
          ENDIF.
        ENDIF.
      WHEN '454' OR '102'.
        IF INT_DATA-SHKZG = 'H'.
          IF ITAB-XAUTO = 'X'.
            INT_DATA-MENGE_CR = INT_DATA-MENGE_CR - ITAB-MENGE.
          ENDIF.
        ENDIF.
      WHEN '551' OR '309'.
        IF INT_DATA-SHKZG = 'H'.
          INT_DATA-MENGE_AD = INT_DATA-MENGE_AD + ITAB-MENGE.
        ENDIF.
        IF INT_DATA-SHKZG = 'S'.
          MENGE_O = INT_DATA-MENGE_O + ITAB-MENGE.
        ENDIF.
    ENDCASE.
    IF INT_DATA-SHKZG = 'S'.
      MENGE_RE = INT_DATA-MENGE_R + INT_DATA-MENGE_RT + INT_DATA-MENGE_CL
      + INT_DATA-MENGE_AD.
    ENDIF.
    IF INT_DATA-SHKZG = 'H'.
      MENGE_IS = INT_DATA-MENGE_S + INT_DATA-MENGE_TO +
                    INT_DATA-MENGE_CR + INT_DATA-MENGE_AD.
    ENDIF.
    PERFORM BALANCE.
    COLLECT INT_DATA.
    CLEAR: INT_DATA,ITAB ,XBLNR, FLAG, OSTOCK.
ENDLOOP.
SORT INT_DATA BY XBLNR BUDAT WERKS MATNR.
LOOP AT INT_DATA.
    READ TABLE INT_DATA2 WITH KEY MATNR = INT_DATA-MATNR
                                  WERKS = INT_DATA-WERKS.
    SELECT SINGLE * FROM MAKT WHERE MATNR = INT_DATA-MATNR.
    INT_DATA-MAKTX = MAKT-MAKTX.
    MODIFY INT_DATA.
    CLEAR: INT_DATA, INT_DATA2.
ENDLOOP.
LOOP AT INT_DATA WHERE MENGE_O = 0 AND MENGE_RT = 0 AND
                        MENGE_CL = 0 AND MENGE_AD = 0 AND
                        MENGE_S = 0 AND MENGE_TO = 0 AND
                        MENGE_CR = 0 AND MENGE_R = 0 AND MENGE_BAL = 0.
    DELETE IT_HEADER WHERE MATNR = INT_DATA-MATNR.
ENDLOOP.
DELETE INT_DATA WHERE MENGE_O = 0 AND MENGE_RT = 0 AND
                        MENGE_CL = 0 AND MENGE_AD = 0 AND
                        MENGE_S = 0 AND MENGE_TO = 0 AND
                        MENGE_CR = 0 AND MENGE_R = 0 AND MENGE_BAL = 0.
ENDFORM.                    "SELECTION
*&      Form EVENTTAB_BUILD
      text
     -->P_GT_EVENTS[] text
FORM EVENTTAB_BUILD USING RT_EVENTS TYPE SLIS_T_EVENT.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      I_LIST_TYPE = 1
    IMPORTING
      ET_EVENTS   = RT_EVENTS.
READ TABLE RT_EVENTS WITH KEY NAME = SLIS_EV_TOP_OF_PAGE
                           INTO LS_EVENT.
IF SY-SUBRC = 0.
    MOVE GT_TOP_OF_PAGE TO LS_EVENT-FORM.
    APPEND LS_EVENT TO RT_EVENTS.
ENDIF.
ENDFORM.                    " EVENTTAB_BUILD
      FORM TOP_OF_PAGE                                              *
FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
   EXPORTING
     I_LOGO             = 'ENJOYSAP_LOGO'
     IT_LIST_COMMENTARY = LT_TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      I_LOGO             = 'ENJOYSAP_LOGO'
      IT_LIST_COMMENTARY = GT_LIST_TOP_OF_PAGE.
ENDFORM.                    "TOP_OF_PAGE
      FORM F4_FOR_VARIANT                                           *
FORM F4_FOR_VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
    EXPORTING
      IS_VARIANT       = G_VARIANT
      I_SAVE           = G_SAVE
      I_TABNAME_HEADER = G_TABNAME_HEADER
      I_TABNAME_ITEM   = G_TABNAME_ITEM
    IMPORTING
      E_EXIT           = G_EXIT
      ES_VARIANT       = GX_VARIANT
    EXCEPTIONS
      NOT_FOUND        = 2.
IF SY-SUBRC = 2.
    MESSAGE ID SY-MSGID TYPE 'S'      NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ELSE.
    IF G_EXIT = SPACE.
      P_VARI = GX_VARIANT-VARIANT.
    ENDIF.
ENDIF.
ENDFORM.                    "F4_FOR_VARIANT
*&      Form PAI_OF_SELECTION_SCREEN
      text
FORM PAI_OF_SELECTION_SCREEN.
IF NOT P_VARI IS INITIAL.
    MOVE G_VARIANT TO GX_VARIANT.
    MOVE P_VARI TO GX_VARIANT-VARIANT.
    CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE'
      EXPORTING
        I_SAVE     = G_SAVE
      CHANGING
        CS_VARIANT = GX_VARIANT.
    G_VARIANT = GX_VARIANT.
ELSE.
    PERFORM VARIANT_INIT.
ENDIF.
ENDFORM.                               " PAI_OF_SELECTION_SCREEN
*&      Form VARIANT_INIT
      text
--> p1        text
<-- p2        text
FORM VARIANT_INIT.
CLEAR G_VARIANT.
G_VARIANT-REPORT = GT_REPID.
ENDFORM.                               " VARIANT_INIT
*&      Form GET_OPENING_STOCK
      text
FORM GET_OPENING_STOCK.
SELECT SUM( MZUBB ) SUM( MAGBB ) INTO (V_STOCK, V_STOCK1)
                FROM S031 WHERE MATNR = ITAB-MATNR AND
                                WERKS = ITAB-WERKS AND
                                SPMON LT V_MONTH1 AND LGORT = ITAB-LGORT.
OSTOCK = V_STOCK1 - V_STOCK.
IF OSTOCK < 0.
    OSTOCK = OSTOCK * -1.
ENDIF.
ENDFORM.                               " GET_OPENING_STOCK
*&      Form check
      text
FORM CHECK.
AUTHORITY-CHECK OBJECT 'M_IS_MATNR'
    ID 'ACTVT' DUMMY
    ID 'MATNR' FIELD MATNR-LOW.
IF SY-SUBRC <> 0.
    MESSAGE E016(Z1) WITH MATNR-LOW.
ENDIF.
ENDFORM.                    "CHECK_AUTHORIZATION
*&      Form EVENTTAB_BUILD
      text
     -->P_GT_EVENTS[] text
*FORM EVENTTAB_BUILD USING RT_EVENTS TYPE SLIS_T_EVENT.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
   EXPORTING
     I_LIST_TYPE = 1
   IMPORTING
     ET_EVENTS   = RT_EVENTS.
READ TABLE RT_EVENTS WITH KEY NAME = SLIS_EV_TOP_OF_PAGE
                          INTO LS_EVENT.
IF SY-SUBRC = 0.
   MOVE GT_TOP_OF_PAGE TO LS_EVENT-FORM.
   APPEND LS_EVENT TO RT_EVENTS.
ENDIF.
*ENDFORM.                    " EVENTTAB_BUILD
      FORM TOP_OF_PAGE
*FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
   EXPORTING
     I_LOGO             = 'ENJOYSAP_LOGO'
     IT_LIST_COMMENTARY = GT_LIST_TOP_OF_PAGE.
*ENDFORM.                    "TOP_OF_PAGE
*&      Form COMMENT_BUILD
      text
     -->P_GT_LIST_TOP_OF_PAGE[] text
FORM COMMENT_BUILD USING LT_TOP_OF_PAGE TYPE
                       SLIS_T_LISTHEADER.
DATA: LS_LINE TYPE SLIS_LISTHEADER.
DATA: LV_PAGE_STRING(11),
         LV_PAGE_NO(3).
PAGNO = SY-PAGNO.
DATA: PAGNO(5) TYPE C.
CLEAR
     LS_LINE.
REFRESH LT_TOP_OF_PAGE.
CLEAR
     LS_LINE.
LS_LINE-TYP = 'S'.
LS_LINE-KEY = 'Page Number'.
PAGNO = SY-PAGNO.
IF
    PAGNO = 0.
    PAGNO = 1.
ENDIF.
SHIFT PAGNO LEFT DELETING LEADING SPACE.
LS_LINE-INFO = PAGNO.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
CLEAR LS_LINE.
LS_LINE-TYP = 'H'.
LS_LINE-INFO = TEXT-001.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
CLEAR LS_LINE.
LS_LINE-TYP = 'A'.
SELECT SINGLE * FROM T001W WHERE
                  WERKS IN WERKS.
CONCATENATE 'Name Of The Plant ' '-' T001W-NAME1 INTO
                        TXT SEPARATED BY SPACE.
LS_LINE-INFO = TXT.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
CLEAR:TXT, LS_LINE.
LS_LINE-TYP = 'H'.
LS_LINE-INFO = TEXT-002.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
CLEAR LS_LINE.
IF WERKS-HIGH EQ SPACE.
    CONCATENATE 'Plant : ' WERKS-LOW INTO TXT.
ELSE.
    CONCATENATE 'FROM PLANT : ' WERKS-LOW 'TO PLANT : ' WERKS-HIGH INTO TXT SEPARATED BY SPACE.
ENDIF.
LS_LINE-TYP = 'H'.
LS_LINE-INFO = TXT.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
IF BUDAT-HIGH EQ SPACE.
    BUDAT-HIGH = BUDAT-LOW.
ENDIF.
CONCATENATE 'Date : From ' BUDAT-LOW6(2) '-' BUDAT-LOW4(2) '-'
                        BUDAT-LOW0(4) 'to' BUDAT-HIGH6(2) '-'
                        BUDAT-HIGH4(2) '-' BUDAT-HIGH0(4) INTO
                        TXT SEPARATED BY SPACE.
CLEAR LS_LINE.
LS_LINE-TYP = 'A'.
LS_LINE-INFO = TXT.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
ENDFORM.                    "COMMENT_BUILD
*&      Form LAYOUT_INIT
      text
     -->P_GT_LAYOUT text
FORM LAYOUT_INIT USING RS_LAYOUT TYPE SLIS_LAYOUT_ALV.
RS_LAYOUT-DETAIL_POPUP      = 'X'.
RS_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.
ENDFORM.                    " LAYOUT_INIT
*&      Form BALANCE
      text
--> p1        text
<-- p2        text
FORM BALANCE.
IF INT_DATA-SHKZG = 'S'.
    MENGE_RE = INT_DATA-MENGE_O + INT_DATA-MENGE.
    INT_DATA-MENGE_BAL = MENGE_RE.
    INT_DATA-MENGE_RE = INT_DATA-MENGE.
ELSEIF INT_DATA-SHKZG = 'H'.
    MENGE_RE = MENGE_RE - INT_DATA-MENGE.
    INT_DATA-MENGE_BAL = MENGE_RE.
    INT_DATA-MENGE_IS = INT_DATA-MENGE.
ENDIF.
ENDFORM.                    " BALANCE
Thanks & Regards,
Sreedhar.

Hi,
try like this.........
get v_linct from system varaible sy-linct
describe table t_output lines lv_lines - Where
t_output is ur final internal table which is displayed
v_pagct = ( lv_lines div v_linct ) + 3.
write: 'PAGE NO:' , sy-pagno ,'/', v_pagct.
Madhavi

How do you highlight text in Pages for iPad? The document I want to create and highlight is a pages document

I am trying to create a document in Pages for iPad and want to highlight various bits of text but can not find a function in the inspector for this. Can anyone help,please?

Hi stuartdj,
I'm not finding a way to highlight text as one can do with iBooks (hold and swipe for black text, background yellow for example).
One option is to actually color the text itself.
Select the text, then in Style tools, tap the Font name at the top which shows the Text Options sheet where there is a Color option. Would changing the font color to Red, Green or Purple accomplish your goals?
If you do want black text on a colored background (highlighted) it would need to be text in a text box where you can change the fill (background) color. Style, Style Options, Fill. But this is not inline text and doesn't flow like just coloring the font itself.
ivan

I need Pages for 10.7.5

Similar Messages

Maybe you are looking for