Need a code tip

Would some one kindly tell me what the code is to make the
rollover work when the button is embedded in a movie clip.
isnt there a ".root?" something that goes in front of the
directive?
In other words, the rollover has to reach out into scene one
to have its effect.

Thank you. Let me try to clarify. Then you can tell me again
if what you said is correct cuz it did not work. The buttons/nav
bar are now a movie clip. Before they were a clip, "go to and stop
(frame label) would work, very simple. After making this a movie
clip, I now have to tell the rollover to go out of the movie clip
into the main timeline and find the frame label. So How to do that?
It sounds backwords to name the movie clip and go into that
to find the frame label. It's when I am in the movie clip I want to
go out and find the frame label in the main timeline.
Thank you

Similar Messages

I need the code to delete record in the database not in the form???

I need the code to delete record in the database not in the form...
because when i execute a form always insert the datas in the data base but i want insert value on a text file and delete in the data base the record whith this value of text file.
i'm spanish an my english is bad sorry.
thank, javier

Well, I fail to understand why you want to complicate easy things, but anyway you can do that by using TEXT_IO within Forms to create text file (see Forms builder help), and UTL_FILE package to read it within Pl/Sql : you could create a stored procedure, and call it from Forms passing the file name as parameter. See UTL_FILE documentation

Need sample code with RV_INVOICE_CREATE used

Hi everybody!
I need sample code with RV_INVOICE_CREATE or similar FMs used.
The thing is that I do not know how to populate parametres of this and other invoicing FMs....
For example, there are some tables to be passed to RV_INVOICE_CREATE
     TABLES
          XKOMFK     = XKOMFK
          XKOMV       = XKOMV
          XTHEAD      = XTHEAD
          XVBFS        = XVBFS
          XVBPA        = XVBPA
          XVBRK        = XVBRK
          XVBRP        = XVBRP
          XVBSS        = XVBSS
How to populate them? I mean how to fill them with needed values?
Useful answers will be awarded.
Kind regards, M.

RV_INVOICE_CREATE is the function module to create invoice based on delivery .
when you pass delivery number ,it will create invoice ,see the invoice number in vf02,vf03 transaction. and also see the data vbrk,vbrp tables
I have done this development and i have cancelled invoice,reverse goods issue,updated the delivery and again i am createing invoice..see the below progrm to get better understanding.
REPORT ZWM_OVERWEIGHT_FIX no standard page heading
                           message-id zwm.
======================================================================
Program Name : ZWM_OVERWEIGHT_FIX                                    *
Description : Tool to fix Overweight in delivery line item,         *
               Used All Function module to cancel invoice ,          *
               Reverse the goods issue ,Update Delivery qty,Create *
               invoice                                               *
Author       : Seshu                                                 *
Date         : 05/08/2007                                            *
MODIFICATION HISTORY                                                 *
DATE    | AUTHOR   | CHANGE #   | DESCRIPTION OF MODIFICATION        *
--|||--
05/08/07| Seshu    | DEVK921979 | Initial                            *
D A T A - D E C L A R A T I O N     *******************
Tables
Tables : vbak,
         vbap,
         vbfa,
         likp,
         lips,
         vbrk,
         vbrp.
Internal Tables
data : i_lips like lips occurs 0 with header line,
       i_vbap like vbap occurs 0 with header line.
Variables
data : v_deliv like vbfa-vbelv,
       v_invoic like vbfa-vbelv.
Data Declaration Part for Post Goods Issue
DATA: l_vbeln LIKE likp-vbeln,
      l_vbkok LIKE vbkok,
      i_prot LIKE prott OCCURS 0 WITH HEADER LINE,
      ef_error_any_0 TYPE c,
      ef_error_in_item_deletion_0 TYPE c,
      ef_error_in_pod_update_0 TYPE c,
      ef_error_in_interface_0 TYPE c,
      ef_error_in_goods_issue_0 TYPE c,
      ef_error_in_final_check_0 TYPE c,
      d_return   LIKE bapireturn1.
Internal tables for BAPI Function Module
data : i_cret like BAPIRETURN1 occurs 0 with header line,
       i_csucess like BAPIVBRKSUCcESS occurs 0 with header line,
       i_ret2 like bapiret2 ,
       flag type c,
       i_mesg like mesg occurs 0 with header line.
Data Declaration for Invoice Creation
DATA: VBSK_I     LIKE VBSK.
data: d_success type c.
DATA: XKOMFK LIKE      KOMFK   OCCURS 0 WITH HEADER LINE,
      XKOMV LIKE      KOMV    OCCURS 0 WITH HEADER LINE,
      XTHEAD LIKE      THEADVB OCCURS 0 WITH HEADER LINE,
      XVBFS LIKE      VBFS    OCCURS 0 WITH HEADER LINE,
      XVBPA LIKE      VBPAVB OCCURS 0 WITH HEADER LINE,
      XVBRK LIKE      VBRKVB OCCURS 0 WITH HEADER LINE,
      XVBRP LIKE      VBRPVB OCCURS 0 WITH HEADER LINE,
      XVBSS LIKE      VBSS    OCCURS 0 WITH HEADER LINE,
      XKOMFKGN LIKE    KOMFKGN OCCURS 0 WITH HEADER LINE.
S E L E C T I O N - S C R E E N   ******************
Selection-screen
Selection-screen : begin of block blk with frame title text-001.
parameters : p_vbeln like vbak-vbeln obligatory.
selection-screen : end of block blk.
A T - S E L E C T I O N - S C R E E N ***************
Validation on Sales order
at selection-screen on p_vbeln.
Check the data on VBAK Table
select single vbeln from vbak into vbak-vbeln
                            where vbeln = p_vbeln.
if sy-subrc ne 0.
    message e006 with p_vbeln.
endif.
S T A R T - O F - S E L E C T I O N *******************
Start-of-selection.
break sreddy.
Get the Invoice Number corresponding Sales Order Number
perform get_invoice.
Step 1.
Cancel the Invoice - Transaction VF11
perform cancel_invoice.
Reverse the goods issue
perform reverse_goodsissue.
Get the Order and Delivery Items
perform get_sales_deliv.
Delivery Change
perform Delivery_change.
Create Invoice document
perform invoice_create.
E N D - O F - S E L E C T I O N *******************
end-of-selection.
if flag = 'X'.
message i012 with p_vbeln.
endif.
*&      Form get_invoice
      Get Invoice Number
FORM get_invoice.
Clear Variables
clear : v_deliv,
          v_invoic,
          flag.
Get the Delivery Number First
select single vbeln from vbfa into v_deliv
                           where vbelv = p_vbeln
                           and   vbtyp_n = 'J'.
if sy-subrc ne 0.
    message i004 with p_vbeln.
    stop.
endif.
Get the Invoice Number
select single vbeln from vbfa into v_invoic
                           where vbelv = p_vbeln
                           and   vbtyp_n = 'M'.
if sy-subrc ne 0.
    message i003 with p_vbeln.
    stop.
endif.
ENDFORM.                    " get_invoice
*&      Form cancel_invoice
      Cancel the Invoice
FORM cancel_invoice.
clear : i_ret2,
          i_cret,
          i_csucess.
refresh : i_cret,
            i_csucess.
CALL FUNCTION 'BAPI_BILLINGDOC_CANCEL1'
    EXPORTING
      BILLINGDOCUMENT       = v_invoic
TESTRUN               =
NO_COMMIT             =
BILLINGDATE           =
    TABLES
      RETURN                = i_cret
      SUCCESS               = i_csucess
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
       EXPORTING
            WAIT   = space
       IMPORTING
            RETURN = i_ret2.
read table i_cret with key type = 'E'.
if sy-subrc ne 0.
    message i005 with v_invoic.
    stop.
endif.
ENDFORM.                    " cancel_invoice
*&      Form reverse_goodsissue
      Reverse the goods Issue
FORM reverse_goodsissue.
Local Variable
data : lv_vbtyp like likp-vbtyp.
clear : i_mesg,
          lv_vbtyp.
refresh : i_mesg.
select single vbtyp from likp into lv_vbtyp
                           where vbeln = v_deliv.
CALL FUNCTION 'WS_REVERSE_GOODS_ISSUE'
    EXPORTING
      I_VBELN                         = v_deliv
      I_BUDAT                         = sy-datum
    I_COUNT                         =
    I_MBLNR                         =
    I_TCODE                         =
      I_VBTYP                         = lv_vbtyp
    TABLES
      T_MESG                          = i_mesg
   EXCEPTIONS
     ERROR_REVERSE_GOODS_ISSUE       = 1
     OTHERS                          = 2
if sy-subrc ne 0.
    message i007 with v_deliv.
endif.
ENDFORM.                    " reverse_goodsissue
*&      Form get_sales_deliv
      Get the Sales order and Deliv Items
FORM get_sales_deliv.
Local Variables
data : lv_kwmeng like vbap-kwmeng.
clear : i_lips,
          i_vbap.
refresh : i_lips,
            i_vbap.
Select the data from LIPS
select * from lips into table i_lips
                     where vbeln = v_deliv.
if sy-subrc ne 0.
    message i008 with v_deliv.
    stop.
endif.
sort i_lips by vbeln posnr.
Get the Sales order Item Data.
select * from vbap into table i_vbap
                          where vbeln = p_vbeln.
if sy-subrc ne 0.
    message i006 with p_vbeln.
    stop.
endif.
sort i_vbap by vbeln posnr.
Compare delivery Item and Order Items
loop at i_lips.
    clear lv_kwmeng.
    read table i_vbap with key posnr = i_lips-posnr.
    if sy-subrc eq 0.
      lv_kwmeng = i_vbap-kwmeng * 2.
      if lv_kwmeng >= i_lips-lfimg.
        i_lips-lfimg = i_vbap-kwmeng.
        modify i_lips.
      endif.
    endif.
endloop.
ENDFORM.                    " get_sales_deliv
*&      Form Delivery_change
      Delivery Update
FORM Delivery_change.
Clear : i_prot.
refresh : i_prot.
Delivery Update
CALL FUNCTION 'LE_MOB_DELIVERY_UPDATE'
       EXPORTING
            do_commit                = 'X'
       TABLES
            t_delivery_items         = i_lips
            prot                     = i_prot
       EXCEPTIONS
            conversion_overflow      = 1
            essential_data_missing   = 2
            error                    = 3
            nothing_to_update        = 4
            lock_after_update_failed = 5
            error_in_delivery_update = 6
            OTHERS                   = 7.
COMMIT WORK.
IF sy-subrc <> 0.
    MESSAGE i009 with v_deliv.
endif.
Post Goods Issue
CLEAR:    d_return,
            i_prot,
            l_vbeln,
            l_vbkok.
REFRESH i_prot.
CLEAR: ef_error_in_item_deletion_0    ,
          ef_error_in_pod_update_0       ,
          ef_error_in_interface_0        ,
          ef_error_in_goods_issue_0      ,
          ef_error_in_final_check_0      .
carry out goods issue
l_vbeln          = v_deliv.
l_vbkok-vbeln_vl = l_vbeln.
l_vbkok-wabuc    = 'X'.
carry out goods issue
l_vbeln          = v_deliv.
l_vbkok-vbeln_vl = l_vbeln.
l_vbkok-wabuc    = 'X'.
SET UPDATE TASK LOCAL.
CALL FUNCTION 'WS_DELIVERY_UPDATE'
       EXPORTING
            vbkok_wa                    = l_vbkok
            synchron                    = 'X'
            no_messages_update          = ' '
            update_picking              = 'X'
            commit                      = 'X'
            delivery                    = l_vbeln
            nicht_sperren               = 'X'
            if_error_messages_send_0    = space
       IMPORTING
            ef_error_any_0              = ef_error_any_0
            ef_error_in_item_deletion_0 = ef_error_in_item_deletion_0
            ef_error_in_pod_update_0    = ef_error_in_pod_update_0
            ef_error_in_interface_0     = ef_error_in_interface_0
            ef_error_in_goods_issue_0   = ef_error_in_goods_issue_0
            ef_error_in_final_check_0   = ef_error_in_final_check_0
       TABLES
            prot                        = i_prot
       EXCEPTIONS
            error_message               = 1
            OTHERS                      = 2.
if sy-subrc ne 0.
    message i010 with v_deliv.
else.
    COMMIT WORK .
endif.
ENDFORM.                    " Delivery_change
*&      Form invoice_create
      Invoice Creation
FORM invoice_create.
refresh: XKOMFK, XKOMV,
           XTHEAD, XVBFS,
           XVBPA, XVBRK,
           XVBRP, XVBSS.
clear : XKOMFK, XKOMV,
           XTHEAD, XVBFS,
           XVBPA, XVBRK,
           XVBRP, XVBSS,
           VBSK_I.
VBSK_I-SMART = 'F'.
XKOMFK-VBELN = v_deliv.
XKOMFK-VBTYP = 'J'.
APPEND XKOMFK.
CALL FUNCTION 'RV_INVOICE_CREATE'
       EXPORTING
            VBSK_I       = VBSK_I
            WITH_POSTING = 'C'
       TABLES
            XKOMFK       = XKOMFK
            XKOMV        = XKOMV
            XTHEAD       = XTHEAD
            XVBFS        = XVBFS
            XVBPA        = XVBPA
            XVBRK        = XVBRK
            XVBRP        = XVBRP
            XVBSS        = XVBSS.
if sy-subrc eq 0.
    COMMIT WORK.
   flag = 'X'.
else.
message i011 with p_vbeln.
endif.
ENDFORM.                    " invoice_create
Reward Points if it is helpful
Thanks
Seshu

I have a Macbook Pro 15" that is three and a half years old. Although it has slowed a bit, it still runs well and runs every program I need. Any tips for how to keep this old computer running well and in good health?

I have a Macbook Pro 15" that is three and a half years old. Although it has slowed a bit, it still runs well and runs every program I need. Any tips for how to keep this old computer running well and in good health?
I have a 250 gig drive and try to keep at least 100 gigs unused at all times, 4 GB 667 MHz DDR2 SDRAM memory, back up with Time Machine and CrashPlan, and have OS X 10.7.3.
This was my first Mac since an old Apple II GS. After that I used PC's and got really good at reformatting, replacing drives, reinstalling, defragging, resolving software conflicts, etc. Since switching back to Macs (five in my extended family now), I haven't had to do any of those things. So, although, the cost is three times as much, the aggrevation has been ten times less.
I'm retired and living on a fixed income and would therefore like to keep this computer running as opposed to constatntly upgrading.
That said, any tips?
Thanks
It does have a crack on the left of the screen case about 3/4'' up from the bottom. I've posted that as another question.

Kappy's Personal Suggestions for OS X Maintenance
For disk repairs use Disk Utility. For situations DU cannot handle the best third-party utilities are: Disk Warrior; DW only fixes problems with the disk directory, but most disk problems are caused by directory corruption; Disk Warrior 4.x is now Intel Mac compatible. Drive Genius provides additional tools not found in Disk Warrior. Versions 1.5.1 and later are Intel Mac compatible.
OS X performs certain maintenance functions that are scheduled to occur on a daily, weekly, or monthly period. The maintenance scripts run in the early AM only if the computer is turned on 24/7 (no sleep.) If this isn't the case, then an excellent solution is to download and install a shareware utility such as Macaroni, JAW PseudoAnacron, or Anacron that will automate the maintenance activity regardless of whether the computer is turned off or asleep. Dependence upon third-party utilities to run the periodic maintenance scripts was significantly reduced since Tiger. These utilities have limited or no functionality with Snow Leopard or Lion and should not be installed.
OS X automatically defragments files less than 20 MBs in size, so unless you have a disk full of very large files there's little need for defragmenting the hard drive. As for virus protection there are few if any such animals affecting OS X. You can protect the computer easily using the freeware Open Source virus protection software ClamXAV. Personally I would avoid most commercial anti-virus software because of their potential for causing problems. For more about malware see Macintosh Virus Guide.
I would also recommend downloading a utility such as TinkerTool System, OnyX 2.4.3, or Cocktail 5.1.1 that you can use for periodic maintenance such as removing old log files and archives, clearing caches, etc.
For emergency repairs install the freeware utility Applejack. If you cannot start up in OS X, you may be able to start in single-user mode from which you can run Applejack to do a whole set of repair and maintenance routines from the command line. Note that AppleJack 1.5 is required for Leopard. AppleJack 1.6 is compatible with Snow Leopard. There is no confirmation that this version also works with Lion.
When you install any new system software or updates be sure to repair the hard drive and permissions beforehand. I also recommend booting into safe mode before doing system software updates.
Get an external Firewire drive at least equal in size to the internal hard drive and make (and maintain) a bootable clone/backup. You can make a bootable clone using the Restore option of Disk Utility. You can also make and maintain clones with good backup software. My personal recommendations are (order is not significant):
Carbon Copy Cloner
Data Backup
Deja Vu
SuperDuper!
SyncTwoFolders
Synk Pro
Synk Standard
Tri-Backup
Visit The XLab FAQs and read the FAQs on maintenance, optimization, virus protection, and backup and restore.
Additional suggestions will be found in Mac Maintenance Quick Assist.
Referenced software can be found at CNet Downloads or MacUpdate.
Be sure you have an adequate amount of RAM installed for the number of applications you run concurrently. Be sure you leave a minimum of 10% of the hard drive's capacity as free space.
Adding more RAM, if feasible, and a new, faster hard drive may also help pep it up a little.

Vendor Database - Need Transaction code

Hi All,
Last week i have posted a query with regard to pulling the Vendor Database (Need : Vendor Code / Description/ Address 1/ Postal Code / Payment Type )
Few experts have suggested me to use S_ALR_87012086 T-Code, however the problem is we dont have access to use this Transaction. Can someone help me to pull the information from through any other way.
Regards,
Srikanth

Hi
As suggested by earlier thread it is standard ! It is very easy to follow the SAP standards. For time being you can use like
SE16 Table > LFA1 table > Give vendor code & execute. You can get all required data. If not take ADRNR number and pass the smae in to ADRC table ,where you can get exactly what you want. Link is vendor and ADRNR number.
Rgds
SUMA

I Need Java code for following Algorithm

* I Need Java code for following algorithm. Kindly any one help.
1. Read the contents (ideas and its corresponding scores) from two files named as 'a' and 'b'.
2. Stored the file 'a' contents in array a[].
3. Stored the file 'b' contents in array b[].
4. compare both files like
if(a.equals(b[j])
Writing the common idea and add the score from file 'a' and 'b'.
else
write the uncommon idea and its score..
For example :
Form Agents.txt
action,65
architecture,85
eco-,15
essay,30
form,85
form,85
link,40
tangent,25
Form Agents1.txt
Black holes,69
essay,78
Herewith i have above mentioned two files named as Form Agents and Form Agents1.
Form Agents has eight fields
Form Agents1 has two fields
--> 'essay' is common in two files, so store the idea 'essay' and add the score from Form Agents score is '30' and Form Agents1 has 78 (essay 108).
Finally it stores idea in another file with uncommon fields also.
Please help us.

We have tried with following code.
But we cant add the scores.
For Example:
Form Agents.txt --> has "essay,30"
Form Agents1.txt --> has "essay,78"
Result is: essay,108
Finally it stores idea in another file with uncommon fields also.
So Any one pls correct the following code.
try
DataOutputStream o1=new DataOutputStream(new
FileOutputStream("C:\\Interfaces\\interfaces\\temp\\BlackBoard\\My Design
World\\Project\\Material\\art\\System Agents\\Form Agents\\CandidateResponses\\Form
Agents.txt"));
//Reading the contents of the files
BufferedReader br= new BufferedReader(new InputStreamReader(new
FileInputStream("C:\\Interfaces\\interfaces\\temp\\BlackBoard\\My Design
World\\Project\\Material\\art\\System Agents\\Form Agents\\Ideological\\Form
Agents.txt")));
BufferedReader br1= new BufferedReader(new InputStreamReader(new
FileInputStream("C:\\Interfaces\\interfaces\\temp\\BlackBoard\\My Design
World\\Project\\Material\\art\\System Agents\\Form Agents\\Related\\Form
Agents.txt")));
while((s=br.readLine())!=null)
s1+=s+"\n";
while((s2=br1.readLine())!=null)
s3+=s2+"\n";
int numTokens = 0;
StringTokenizer st = new StringTokenizer(s1);
String[] a = new String[10000];
String[] br_n=new String[10000];
int i=0;
while (st.hasMoreTokens())
s2 = st.nextToken();
a=s2.substring(0,s2.length()-3);
s6=s2.substring(s2.length()-2);
br_n[i]=s6;
i++;
numTokens++;
int numTokens1 = 0;
StringTokenizer st1 = new StringTokenizer (s3);
String[] b = new String[10000];
String[] br1_n=new String[1000];
int j=0;
while (st1.hasMoreTokens())
s4 = st1.nextToken();
b[j]=s4.substring(0,s4.length()-3);
s7=s4.substring(s4.length()-2);
br1_n[j]=s7;
j++;
numTokens1++;
int x=0;
for(int m=0;m<a.length;m++)
for(int n=0;n<b.length;n++)
if(a[m].equalsIgnoreCase(b[n])){
int sc=Integer.parseInt(br_n[m]);
int sc1=Integer.parseInt(br1_n[n]);
int score=sc+sc1;
o.writeBytes(a[m]+","+score+"\n");
break;
else
o.writeBytes(a[m]+","+br_n[m]+"\n");
break;
}catch(Exception e){}

I need php code for copy paste our all histroy of browser in a text page.

I need php code for copy paste our all histroy of browser in a text page can any one send me the code please.

You can use an application like GarageSale for doing this....
http://www.macupdate.com/info.php/id/16035/garagesale

Need a code for Customer exit for extractor 0WBS_ELEMT_ATTR

Hi Guys,
I need a code for following requirement.
I have appended some fields to standard extractor 0WBS_ELEMT_ATTR which normally takes data from PRPS table. But the new fields will be getting data from PRTE and PROJ table. with common keys. Following is my code which is not working. Please help me out, I am not good in abap. Please note some lines are commented.
Thanks,
H
CODE:::::
form 0wbs_elemt_attr tables i_t_data structure biw_prps.
data: it_wbs_prps like biw_prps occurs 0.
data wa_prps like it_wbs_prps.
data: begin of it_wbs_prps occurs 0,
         PSPNR like prps-pspnr,
         POSID like prps-posid,
         PBUKR like prps-PBUKR,
         IZWEK like prps-IZWEK,
         USR10 like prps-USR10,
         USR00 like prps-USR00,
         USR02 like prps-USR02,
         OBJNR like prps-OBJNR,
       end of it_wbs_prps.
data wa_prps like it_wbs_prps.
data: begin of it_wbs_prps1 occurs 0,
          PSPNR like prps-pspnr,
          POSID like prps-posid,
        end of it_wbs_prps1.
data wa_prps1 like it_wbs_prps1.
data: begin of it_wbs_prte occurs 0,
          posnr like prte-posnr,
          PSTRT like prte-PSTRT,
          PENDE like prte-PENDE,
          ESTRT like prte-ESTRT,
          EENDE like prte-EENDE,
          ISTRT like prte-ISTRT,
          IENDE like prte-IENDE,
        end of it_wbs_prte.
data wa_prte like it_wbs_prte.
data: begin of it_wbs_proj occurs 0,
          PSPNR like proj-pspnr,
          PLFAZ like proj-plfaz,
          PLSEZ like proj-plsez,
        end of it_wbs_proj.
data wa_proj like it_wbs_proj.
refresh: it_wbs_prte, it_wbs_proj.
*it_wbs_jest.
if i_t_data[] is not initial.
Get data from PRPS WBS Master Data
     select pspnr posid PBUKR IZWEK USR10 USR00 USR02 objnr
       into corresponding fields of table it_wbs_prps
       from prps
        for all entries in i_t_data
      where POSID = i_t_data-POSID.
     sort it_wbs_prps by posid.
Get data from PRPS1 WBS Master Data
      select pspnr posid
       into corresponding fields of table it_wbs_prps1
        from prps
        for all entries in i_t_data
     where POSID = i_t_data-POSID.
    sort it_wbs_prps1 by posid.
Get data from PRTE Scheduling Data for Project Item
     if it_wbs_prps1[] is not initial.
     select posnr PSTRT PENDE ESTRT EENDE ISTRT IENDE
       into corresponding fields of table it_wbs_prte
       from prte
        for all entries in it_wbs_prps1
      where posnr = it_wbs_prps1-pspnr.
     sort it_wbs_prte by posnr.
     endif.
Get data from PROJ Project Master Data
     if it_wbs_prps1[] is not initial.
     select pspnr PLFAZ PLSEZ
       into corresponding fields of table it_wbs_proj
       from proj
       for all entries in it_wbs_prps
      where pspnr = it_wbs_proj-pspnr.
     sort it_wbs_proj by pspnr.
     endif.
loop at i_t_data.
   clear: wa_prps1, wa_prte, wa_proj.
   read table it_wbs_prps into wa_prps with key
              posid = i_t_data-posid binary search.
   read table it_wbs_prte into wa_prte with key
              posnr = wa_prps1-pspnr.
   read table it_wbs_proj into wa_proj with key
              pspnr = it_wbs_proj-pspnr.
         i_t_data-zzPBUKR = wa_prps-pbukr.
         i_t_data-zzIZWEK = wa_prps-IZWEK.
         i_t_data-zzUSR10 = wa_prps-USR10.
         i_t_data-zzUSR00 = wa_prps-USR00.
         i_t_data-zzUSR02 = wa_prps-USR02.
          i_t_data-zzPSTRT = wa_prte-PSTRT.
          i_t_data-zzPENDE = wa_prte-PENDE.
          i_t_data-zzESTRT = wa_prte-ESTRT.
          i_t_data-zzEENDE = wa_prte-EENDE.
          i_t_data-zzISTRT = wa_prte-ISTRT.
          i_t_data-zzIENDE = wa_prte-IENDE.
          i_t_data-zzPLFAZ = wa_proj-PLFAZ.
          i_t_data-zzPLSEZ = wa_proj-PLSEZ.
    modify i_t_data.
endloop.
endif.
endform.                    " 0wbs_elemt_attr

Hi,
it_wbs_prps1 .
If you are going to use this internal table to check for a null condition, shouldn't you first assign the data package to it?
For example,   it_wbs_prps1 = i_t_data[].
Because you are now using it_wbs_prps1 to select data from a table and it doesn't have any data.
Please check.
-RMP
Edit : Please ignore this. I didn't see that you are actually filling the internal table. Sorry!
Edited by: RMP on Oct 18, 2010 12:16 PM

Need a code for finding prime no.s from 0 to 100.

Hi,
i need a code for finding prime no.s from 0 to 100.
Please help me out.
Regards,
Santosh Kotra.

hai santosh,
here is an example program to find the prime number...........
EXAMPLE:
DATA: BEGIN OF primes OCCURS 0,
        number TYPE i,
        exp    TYPE i,
      END OF primes.
DATA: w_mult TYPE i,
      w_limi TYPE i,
      w_prem TYPE i.
DATA: w_outp TYPE text132.
DATA: w_rtime TYPE i,
      w_stime TYPE p DECIMALS 3.
DEFINE add_part.
sy-fdpos = strlen( &1 ) + 1.
&1+sy-fdpos(*) = &2.
condense &1.
END-OF-DEFINITION.
PARAMETERS: p_numb TYPE i,                "number to check
            p_fact TYPE c AS CHECKBOX,    "display components
            p_nbpr TYPE c AS CHECKBOX.    "nb of primes
START-OF-SELECTION.
GET RUN TIME FIELD w_rtime.
IF p_nbpr IS INITIAL OR p_numb LE 12000.
    PERFORM eratostene USING p_numb.
    add_part w_outp p_numb.
    READ TABLE primes WITH KEY number = p_numb.
    IF sy-subrc = 0.
      add_part w_outp 'is prime'.
    ELSE.
      IF p_fact IS INITIAL.
        add_part w_outp 'is not prime'.
      ELSE.
        add_part w_outp '='.
        w_limi = p_numb.
        LOOP AT primes WHERE exp GT 0.
          CHECK primes-number LE w_limi.
          IF w_prem GT 0.
            add_part w_outp '*'.
          ENDIF.
          IF primes-exp GT 1.
            add_part w_outp '('.
            add_part w_outp primes-number.
            add_part w_outp '^'.
            add_part w_outp primes-exp.
            add_part w_outp ')'.
          ELSE.
            add_part w_outp primes-number.
          ENDIF.
          w_limi = w_limi / ( primes-number ** primes-exp ).
          IF w_limi = 1.
            EXIT.
          ENDIF.
          w_prem = 1.
        ENDLOOP.
      ENDIF.
    ENDIF.
    WRITE: / w_outp.
    IF NOT p_nbpr IS INITIAL.
      DESCRIBE TABLE primes LINES sy-tmaxl.
      CLEAR: w_outp.
      add_part w_outp 'Number of primes:'.
      add_part w_outp sy-tmaxl.
      WRITE: / w_outp.
      SKIP.
      LOOP AT primes.
        WRITE: / primes-number.
      ENDLOOP.
    ENDIF.
ELSE.
    PERFORM factors.
ENDIF.
GET RUN TIME FIELD w_rtime.
w_stime = w_rtime / 1000000.
SKIP.
CLEAR: w_outp.
add_part w_outp 'Calculation time:'.
add_part w_outp w_stime.
WRITE: / w_outp.
      FORM eratostene                                               *
FORM eratostene USING in_number TYPE i.
DATA: BEGIN OF no_primes OCCURS 0,
          number TYPE i,
        END OF no_primes.
DATA: cnum TYPE i,
        dnum TYPE i,
        limi TYPE i,
        mult TYPE i,
        puis TYPE i,
        cmod TYPE i.
IF NOT ( p_fact IS INITIAL AND p_nbpr IS INITIAL ).
    limi = in_number.
ELSE.
    limi = sqrt( in_number ).
ENDIF.
cnum = 2.
WHILE cnum LE limi.
    READ TABLE no_primes WITH KEY number = cnum.
    IF sy-subrc NE 0.
      primes-number = cnum.
      mult = 2.
      puis = 1.
      dnum = mult * cnum.
      WHILE dnum LE in_number.
        READ TABLE no_primes WITH KEY number = dnum.
        IF sy-subrc NE 0.
          no_primes-number = dnum.
          APPEND no_primes.
        ENDIF.
        IF NOT p_fact IS INITIAL.
          cmod = dnum MOD ( cnum ** puis ).
          IF cmod = 0.
            cmod = in_number MOD ( cnum ** puis ).
            IF cmod = 0.
              primes-exp = puis.
              puis = puis + 1.
            ENDIF.
          ENDIF.
        ENDIF.
        mult = mult + 1.
        dnum = mult * cnum.
      ENDWHILE.
      APPEND primes.
      CLEAR: primes.
    ENDIF.
    cnum = cnum + 1.
ENDWHILE.
ENDFORM.
      FORM factors                                                  *
FORM factors.
DATA: ex_factors TYPE string,
        mod        TYPE i,
        still      TYPE f,
        factor     TYPE i,
        exponent   TYPE i,
        square     TYPE f,
        fac_string TYPE text40,
        exp_string TYPE text40.
IF p_numb LE 3.
    ex_factors = p_numb.
ELSE.
    factor = 2.
    still = p_numb.
    DO.
      CLEAR: exponent.
      mod = still MOD factor.
      WHILE mod = 0.
        exponent = exponent + 1.
        still    = still div factor.
        mod      = still MOD factor.
      ENDWHILE.
      IF exponent EQ 1.
        fac_string = factor.
        CONCATENATE ex_factors '*' fac_string
                               INTO ex_factors
                       SEPARATED BY space.
        CONDENSE ex_factors.
      ELSEIF exponent GT 1.
        fac_string = factor.
        exp_string = exponent.
        CONCATENATE ex_factors '* (' fac_string
                               '^'   exp_string ')'
                               INTO ex_factors
                       SEPARATED BY space.
        CONDENSE ex_factors.
      ENDIF.
      factor = factor + 1.
      square = factor ** 2.
      IF square GT still.
        EXIT.
      ENDIF.
    ENDDO.
    IF still GT 1.
      CATCH SYSTEM-EXCEPTIONS convt_overflow = 1.
        fac_string = factor = still.
      ENDCATCH.
      IF sy-subrc NE 0.
        fac_string = still.
      ENDIF.
      CONCATENATE ex_factors '*' fac_string
                            INTO ex_factors
                    SEPARATED BY space.
      CONDENSE ex_factors.
    ENDIF.
    SHIFT ex_factors UP TO '*'.
    SHIFT ex_factors BY 2 PLACES.
ENDIF.
WRITE: / p_numb RIGHT-JUSTIFIED.
IF ex_factors CA '*^'.
    WRITE: '=', ex_factors.
ELSE.
    WRITE: 'is prime'.
ENDIF.
ENDFORM.
HOPE THIS WILL BE HELPFULL.
regards
praba.

I need ready code for a simple paint program today

hi all I need ready code for a simple paint program today for me ics projct
plz give me a halp on this give me what you have with you and it is so good if it look like this :
Design a GUI based drawing Java application that works like a simple paint program
1-There should be a number of buttons for choosing different shapes to draw. For example, there should be a button for rectangle. If user presses the rectangle button, then he can draw a rectangle using mouse. Similarly, there should be a button for each shape(rectangle, circle, ellipse, and line etc.
2-The shapes can be filled with different colors.
3-There should be option of moving .
4- There should also be three menus including File, Shape, and Color menu.
i. File menu can have menu items New and Exit. If user selects New, the drawing area will be cleared and all shapes will be erased.
ii. Shape menu will serve the same purpose as of feature 2 described above. It will have menu items for drawing all the different shapes. For example, there will be menu item for rectangle; so user can draw a rectangle by selecting the menu item for rectangle.
iii. Color menu will serve the same purpose as of feature 3 described above. It will have menu items for all the colors which are shown in color buttons. The user can select a color from this menu and then click inside a shape to fill it with the selected color.

Read the Swing tutorial. There are sections on how to use menus and painting and all other kinds of stuff you need to do this homework assignment. Nobody here is going to write the code for you:
http://java.sun.com/docs/books/tutorial/uiswing/TOC.html

Ipad 2 says i need a code for ios 8

I have two ipads: one ipad air and one ipad 2, both of which run on the same Apple id account. I download ios8 with no problem on my iPad air. Yet, later when I try to download it on the 2 it says I need a code. No, not a password. I have a password for everything and I tried them all it didn't work. Anyone know how I can fix th? Ty.

You would have initially entered this "Passcode" at some time in the past, when either setting it up or when you activated the Passcode on your iOS device. You'll have to remember what you entered when you did this. This is not something Apple "made up" but something you did and you would have entered it yourself.
Here's what Apple says if you forget your Passcode ...
iOS: Forgot passcode or device disabled

Why I need a code for rent a film and where ist the code? (I dont have a card)

Why I need a code for rent a film and where ist the code? (I dont have a card)

it's unclear what you mean
you say you dont have a card which I guess is you don't have a creditcard
in which case the other option is to pay by a giftcard which include a code which you put in
because to rent you have to pay otherwise it's not really renting

I need a code for verifiing my emailadress. How do get a new one ?

Photoshop Elements 12
Share
Try to send email directly from Photoshop elements
The program ask for a code to verifiing my emailadress
I need a code for verifiing my emailadress. How do get a new one ?

Check your email. The screen capture says that they sent one to the email address listed.

Need T.Code for "Classify G/L Accounts for Document Splitting"

Hi All,
I need the T.Code Document Splitting "Classify G/L Accounts for Document Splitting"
Menu Path is:
IMG-Fin. A/c- General Ledger A/c- Business transaction - Document Splitting - Classify G/L Accounts for Document Splitting
Thanks & Regards,
Mohan.

Need T.Code for "Define Document Splitting characteristics for G/L Accounting and
Define Document Splitting method

I have macbook pro A1278 serial number ************** need ping code to unlock

i have macbook pro A1278 serial number *******************
need ping code to unlock Please Find Attached file About This

sounds like a stolen computer that's been locked by the owner.

Need a code tip

Similar Messages

Maybe you are looking for