Want a .vi program for verification of superposition theorem.......

Hi...everyone
Please anyone can post me the .vi program for verification of superposition theorem for a resistive circuit. I am using labview 8.5.1 on windows xp platform.
I have a circuit on the NI-ELVIS prototyping board  and that i have to interface to the Labview. At least tell me how i can proceed for making this front panel...
plzzzz its urgent
Thank you....... 

This appears to be a homework problem. If the above link does not answer your question(s) then please post back with specific questions. We will not do your homework for you, but we can provide hints.

Similar Messages

  • Standard driver Program for Request for Quotation

    Hi All,
              If we want to know the standard driver program we can see in Nace.but i want standard driver program for RFQ i am unable to find it in NACE.Any help is greately appreciated.
    Thanks,
    Kiranmayi.

    Hi,
      Follow the Below Steps
    1.Goto NACE Transaction.
    2.Displays all the Application Types,Select EA - Purchasing RFQ.
    3.Select "Output Types" button.
    4.Displays all the "Output Types", select the required one and click on the "Processing Routines" appearing on the Left hand side.
    then you can see all the information such as Program, Routine, Smartform, etc....
    Thanks & Regards,
    Vamsi.

  • Programming for symbian

    I want to write programs for my x7 but I don't know the language of programming for symbian and the program is needing to write apps for symbian.
    please help me
    thanks for your reading this problem.

    bts_x7,
    This video at http://youtu.be/Sd_079HoRPE may also give you an insight on developing Symbian apps using the Nokia Qt SDK.
    Good luck

  • Making programs for nokia phones which have symbian operating system

    hi
    I want to make program for nokia phones.I wrote a program for pc general application and i want to change it for mobile phones. Please inform me about how to make program for mobile phones step by step?
    thanks for your replies.

    frknml
    If your PC application is in java and suitable for the limitations of CLDC / MIDP, I really don't see any barrier -- of course, you may have to sacrifice much of the layout and possibly some of the functionality. Hard to say without knowing exactly what you have in mind.
    Simple core java classes require no conversion and can be adopted into your mobile app. MIDlet is the basic application class, roughly (only roughly) corresponding to Applet for larger platforms.
    So... I'm assuming that you're already reasonably famililar with the java language and syntax, and have a worked with a code editor and / or IDE. If that is the case, I would suggest you download and install NetBeans (if you don't already have it) and work through some of the mobility tutorials.
    www.netbeans.org/downloads/
    The javadocs for jsr-118 (included with NB) will also help. More complete docs and code samples are available in plenty, google java j2me CLDC MIDP sample codes.
    For Nokia-specific features, you may want to download the Nokia SDK and integrate it into NetBeans. Series 60 SDK 2.0 for Symbian OS is available at
    http://software.techrepublic.com.com/download.aspx?docid=78818
    (and many other places)
    But I strongly recommend that you focus on device-independent applications, and use device-specific features only where absolutely necessary.
    Hey - I'd never used java before (I do have experience in various other programming languages) and I had a centimetre-inch convertor up and running on my Motorola handset just 2 days after installing NetBeans.
    You know java, you may do better :-)
    All the best, Darryl
    Note: Download WTK 2.5 separately and integrate into NetBeans, the WTK 2.2 which comes bundled with NB has a few bugs :-(

  • For some reason osx mountain lion has disappeared from my purchases and now when i want to install mountain lion on another mac with the same apple id it wants to charge me for the program even though i have already purchased it. what do i do?

    for some reason osx mountain lion has disappeared from my purchases and now when i want to install mountain lion on another mac with the same apple id it wants to charge me for the program even though i have already purchased it. what do i do?

    Open the Mac App Store on the other Mac and in the Quick Links sign into your account. See if the Mountain Lion purchase is among hidden apps in the iCloud area of your account info.

  • I do not have a Mac but I want to give a software program for a Mac as a gift. I am not able to access the Mac store. Do I just get an iTunes card?

    I do not have a Mac but I want to give a software program for a Mac as a gift. I am not able to access the Mac store. Do I just get an iTunes card?

    "Gift Card" is sometimes called a tacky gift, but if it allows the other person to get whatever they want it works.
    Besides, anything purchased through App Store is usually "All Sales Final", so I think iTunes card is a good idea.

  • Is Motion the program for me if I want to create motion infographics and kinetic typography?

    Hello,
    I am trying to master infographics and basic animations like these:
    http://www.youtube.com/watch?v=BlH1BDWGYrw
    http://www.youtube.com/watch?v=iReY3W9ZkLU&feature=fvwrel
    I know motion pretty well but run into issues when trying to make motion graphics. For example I don't find motion very good at making smooth natural movements with text and images I am trying to animate.
    I am wondering if Aftereffects is a better program for what I am going for. Or is there another program out there for this kind of animation. I am about to start learning after effects but don't want to dive in if it will give me the same abilities as motion.
    Thank you
    Johnny

    Johnnymangosteen wrote:
    ....  It turns out that all of the parameter adjustments do almost nothing to the effect....
    uhm, well ... the default setting is a very fast effect, 14f only.
    changing parameters, eg a 14x loop can not be shown
    so, step#1 to see how variations take effect is making that behavior longer.
    step#2 - to pingpong the end condition you have to shift the last two keyframes longer to notice an effect,
    hard to tell from remote ...
    problem with 'canned' effects is:
    - If you know what each template stands for, you're super fast,
    - If you have some very specific, own 'behavior' in mind, the traditional, manual key-framing and transform/position method is probably faster. or 'more to the point'.
    most KT I've seen so far are very basic movements - rushing in, rushing out, various rotations. done.
    making it special by a) applying motion blurr, b) applying 'physics', as bouncing, 'gravity' acceleration, repelling objects etc.
    ... for instance, I wouldn't use that pre-canned peek-in in a KT ... I like the usage of typography and imaginative layout/combo of stylized graphics and few words much more than excessive 'movement'.
    example
    but, probably, that is a matter of age ....
    the very British of Mr Fry alone fascinates me ... no need for bouncing letters
    anotherr example, not exactly KT, but to illustrate my pov:

  • Want to create program (XYZ) for scheduling anther program(ABC)

    Requirement :
    I have one report ABC and I want to create program XYZ for scheduling the report ABC (without executing the program ABC ).
    Output : Program XYZ
    1) schedule the report ABC
    2) Provide the output of ABC

    Seee if the below code help:
    REPORT Z_MQSCHD NO STANDARD PAGE HEADING LINE-SIZE 170 LINE-COUNT 58 .
    DATA: ZCOUNT            LIKE SY-TABIX,
          JOBNAME           LIKE TBTCJOB-JOBNAME,
          PARAMS            LIKE  PRI_PARAMS,
          JOBCOUNT          LIKE TBTCJOB-JOBCOUNT,
          AUTHCKNAM         LIKE  TBTCJOB-AUTHCKNAM,
          SDLSTRTTM         LIKE  TBTCJOB-SDLSTRTTM,
          SDLSTRTDT         LIKE  TBTCJOB-SDLSTRTDT,
          VARIANT           LIKE  RALDB-VARIANT,
          REPORT            LIKE  SY-REPID,
          ZTIME             LIKE SY-UZEIT,
          PREDJOB_CHECKSTAT LIKE TBTCSTRT-CHECKSTAT,
          PRED_JOBCOUNT     LIKE TBTCJOB-JOBCOUNT,
          PRED_JOBNAME      LIKE TBTCJOB-JOBNAME,
          RELEASED          LIKE  BTCH0000-CHAR1.
    *email variables
    DATA:  emailaddr(80)     TYPE c.
    data: objtxt           like solisti1   occurs 10 with header line.
    data: tab_lines        like sy-tabix.
    DATA: OBJECT_HD_CHANGE LIKE SOOD1.
    DATA: OBJECT_TYPE LIKE SOOD-OBJTP.
    DATA: OBJCONT LIKE SOLI OCCURS 0 WITH HEADER LINE.
    DATA: RECEIVERS LIKE SOOS1 OCCURS 0 WITH HEADER LINE.
    SELECTION-SCREEN: BEGIN OF BLOCK A1 WITH FRAME TITLE TEXT-001.
    PARAMETERS:
            NAME LIKE RS38M-PROGRAMM OBLIGATORY,
            VAR  LIKE RS38M-SELSET  OBLIGATORY,
            JOB  LIKE TBTCJOB-JOBNAME,
            FRQ1 LIKE SY-INDEX,
            FRQ2(2) TYPE C.
    SELECTION-SCREEN END OF BLOCK A1.
    SELECTION-SCREEN: BEGIN OF BLOCK A2 WITH FRAME TITLE TEXT-002.
    PARAMETERS: ZDATE LIKE SY-DATUM DEFAULT SY-DATUM OBLIGATORY.
    SELECT-OPTIONS:
            TIME1 FOR SY-UZEIT OBLIGATORY.
    SELECTION-SCREEN END OF BLOCK A2.
    SELECTION-SCREEN: BEGIN OF BLOCK A3 WITH FRAME TITLE TEXT-003.
    PARAMETERS:  p_mail       AS CHECKBOX DEFAULT 'X'. "X = Mail report
    SELECT-OPTIONS: so_mlist FOR emailaddr.
    SELECTION-SCREEN END OF BLOCK A3.
    AT SELECTION-SCREEN ON FRQ2.
      IF FRQ2 NE 'H' AND FRQ2 NE 'M' AND FRQ2 NE 'S'.
        MESSAGE E001(Z1) WITH 'Time Unit must be H or M or S'.
      ENDIF.
    AT SELECTION-SCREEN ON ZDATE.
      IF ZDATE < SY-DATUM.
        MESSAGE E001(Z1) WITH 'Date must be greater than current date'.
      ENDIF.
    AT SELECTION-SCREEN ON TIME1.
      IF ZDATE = SY-DATUM AND TIME1-LOW < SY-UZEIT.
        MESSAGE E001(Z1) WITH 'Time must be greater than current time'.
      ENDIF.
    AT SELECTION-SCREEN OUTPUT.
      IF JOB IS INITIAL.
        JOB = NAME.
      ENDIF.
    $$* Start of selection
    START-OF-SELECTION.
      IF JOB IS INITIAL.
        JOB = NAME.
      ENDIF.
      clear params.
      call function 'GET_PRINT_PARAMETERS'
           EXPORTING
                mode           = 'CURRENT'
                no_dialog      = 'X'
           IMPORTING
                out_parameters = params.
      params-paart = 'X_PAPER'.
      ZTIME       = TIME1-LOW.
      JOBNAME      = JOB.
      VARIANT      = VAR.
      REPORT       = NAME.
      AUTHCKNAM    = SY-UNAME.
      PARAMS-PRIMM = SPACE.
      SDLSTRTDT    = ZDATE.
      CLEAR: ZCOUNT.
      WHILE ZTIME LE TIME1-HIGH.
        SDLSTRTTM = ZTIME.
        CALL FUNCTION 'JOB_OPEN'
             EXPORTING
                  JOBNAME  = JOB
             IMPORTING
                  JOBCOUNT = JOBCOUNT
             EXCEPTIONS
                  OTHERS   = 4.
        CALL FUNCTION 'JOB_SUBMIT'
             EXPORTING
                  AUTHCKNAM = AUTHCKNAM
                  JOBCOUNT  = JOBCOUNT
                  JOBNAME   = JOB
                  PRIPARAMS = PARAMS
                  REPORT    = REPORT
                  VARIANT   = VARIANT.
        CALL FUNCTION 'JOB_CLOSE'
             EXPORTING
                  SDLSTRTDT        = SDLSTRTDT
                  SDLSTRTTM        = SDLSTRTTM
                  JOBCOUNT         = JOBCOUNT
                  JOBNAME          = JOB
             IMPORTING
                  JOB_WAS_RELEASED = RELEASED.
        IF RELEASED = 'X'.
          WRITE: / 'Job', JOBNAME, '(' ,JOBCOUNT, ')' ,'will run at', ZTIME,
              'on', ZDATE, 'with program',NAME, 'and variant', VAR.
          IF NOT P_MAIL IS INITIAL.
            CLEAR OBJCONT.
            CONCATENATE
            'Job' JOBNAME '(' JOBCOUNT ')' 'will run at' ZTIME 'on' ZDATE
           'with program' NAME  'and variant'  VAR
            INTO OBJCONT SEPARATED BY SPACE.
            APPEND OBJCONT.
          ENDIF.
        ELSE.
          WRITE: /
         'Unable to release job', JOBNAME, '(' ,JOBCOUNT, ')' ,'at', ZTIME,
            'on', ZDATE, 'with program',NAME, 'and variant', VAR.
          IF NOT P_MAIL IS INITIAL.
            CLEAR OBJCONT.
            CONCATENATE
           'Unable to release job' JOBNAME  '('  JOBCOUNT ')'  'at'  ZTIME
           'on' ZDATE 'with program' NAME  'and variant'  VAR
            INTO OBJCONT SEPARATED BY SPACE.
            APPEND OBJCONT.
          ENDIF.
        ENDIF.
        CASE FRQ2.
          WHEN 'H'.
            ZTIME = ZTIME + ( 60 * 60 * FRQ1 ).
          WHEN 'M'.
            ZTIME = ZTIME + ( 60 * FRQ1 ).
          WHEN 'S'.
            ZTIME = ZTIME + FRQ1.
          WHEN OTHERS.
        ENDCASE.
      ENDWHILE.
      IF NOT P_MAIL IS INITIAL.
        CHECK NOT SO_MLIST IS INITIAL.
        PERFORM SENDEMAIL.
      ENDIF.
    *&      Form  SENDEMAIL
          text
    -->  p1        text
    <--  p2        text
    FORM SENDEMAIL.
      clear objcont.
      append objcont.
      append objcont.
      concatenate
      'This e-mail was sent from an automated system...' sy-sysid sy-mandt
         into objcont.
      append objcont.
      clear objcont.
      objcont = 'Do not reply to this message.'(013).
      append objcont.
      MOVE: SY-LANGU TO OBJECT_HD_CHANGE-OBJLA,
            'NOTIFICATION' TO OBJECT_HD_CHANGE-OBJNAM,
            'Report from job scheduler' TO OBJECT_HD_CHANGE-OBJDES.
      MOVE 'RAW' TO OBJECT_TYPE.
      describe table objtxt lines tab_lines.
      read table objtxt index tab_lines.
    *Now we will create the packing list entry for our text body.
      describe table objtxt lines tab_lines.
      read table objtxt index tab_lines.
      OBJECT_HD_CHANGE-OBJLEN  = tab_lines * 255.
    *in this next section we create our recipient list.
      LOOP AT so_mlist.
        clear RECEIVERS.
        move so_mlist-low to RECEIVERS-RECEXTNAM.
        MOVE 'U' TO RECEIVERS-RECESC.
        APPEND RECEIVERS.
        if not so_mlist-high is initial.
          move so_mlist-high TO RECEIVERS-RECEXTNAM.
          MOVE 'U' TO RECEIVERS-RECESC.
          APPEND RECEIVERS.
        endif.
      ENDLOOP.
      CALL FUNCTION 'SO_OBJECT_SEND'
           EXPORTING
                OBJECT_HD_CHANGE           = OBJECT_HD_CHANGE
                OBJECT_TYPE                = OBJECT_TYPE
           TABLES
                OBJCONT                    = OBJCONT
                RECEIVERS                  = RECEIVERS
           EXCEPTIONS
                ACTIVE_USER_NOT_EXIST      = 1
                COMMUNICATION_FAILURE      = 2
                COMPONENT_NOT_AVAILABLE    = 3
                FOLDER_NOT_EXIST           = 4
                FOLDER_NO_AUTHORIZATION    = 5
                FORWARDER_NOT_EXIST        = 6
                NOTE_NOT_EXIST             = 7
                OBJECT_NOT_EXIST           = 8
                OBJECT_NOT_SENT            = 9
                OBJECT_NO_AUTHORIZATION    = 10
                OBJECT_TYPE_NOT_EXIST      = 11
                OPERATION_NO_AUTHORIZATION = 12
                OWNER_NOT_EXIST            = 13
                PARAMETER_ERROR            = 14
                SUBSTITUTE_NOT_ACTIVE      = 15
                SUBSTITUTE_NOT_DEFINED     = 16
                SYSTEM_FAILURE             = 17
                TOO_MUCH_RECEIVERS         = 18
                USER_NOT_EXIST             = 19
                ORIGINATOR_NOT_EXIST       = 20
                X_ERROR                    = 21
                OTHERS                     = 22.
      IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
    ENDFORM.                    " SENDEMAIL

  • I want to compile java for *.exe program?

    I want to compile java for *.exe program?
    Thanks

    I want to compile java for *.exe program?
    ThanksYou're welcome, but the correct answer was allready
    given in previous response.oops, late again, must edit.
    You're welcome, but the correct answer was allready given in the first response.

  • Hi, i'm paying every mont for photoshop and lightroom, I had to bring my Mac to apple to change the hard drive, and now i want reinstall my programs, anyone can help me?

    Hi, i'm paying every mont for photoshop and lightroom, I had to bring my Mac to apple to change the hard drive, and now i want reinstall my programs, anyone can help me?

    Download and install the trial version(s) from https://www.adobe.com/creativecloud/catalog/desktop.html and activate them with your Adobe ID.

  • How to do register-level programming for NI6025E when I want to acquire single scan incuding multiple input channels?

    How to do register-level programming for NI6025E when I want to acquire single scan incuding multiple input channels?

    Thanks, Alan, I think I indeed need to combine aiex1.cpp and aiex2.cpp. I made a change to Configure_Board of aiex1.cpp  as follows:
    //Call this function to configure board options.
    void Configure_Board(tSTC *theSTC,tESeries *board)
     //Clear configuration memory
     theSTC->Write_Strobe_0.writeRegister(0x0001);
     //Clear ADC FIFO
     theSTC->Write_Strobe_1.writeRegister(0x0001);
     //Writing to Config_Memory_High_Register for channel 1 settings
     board->ConfigFifoHigh.setChannel(0);
     board->ConfigFifoHigh.setBank(0);
     board->ConfigFifoHigh.setChannelType(board->ConfigFifoHigh.kChannelTypeRSE);
     board->ConfigFifoHigh.flush();
     //Writing to Config_Memory_Low_Register for following channel 1 settings
     board->ConfigFifoLow.setLastChannel(0);
     board->ConfigFifoLow.setGeneralTrigger(0);
     board->ConfigFifoLow.setGain(board->ConfigFifoLow.kGain001_0);
     board->ConfigFifoLow.setPolarity(board->ConfigFifoLow.kPolarityBipolar);
     board->ConfigFifoLow.setDither(0);
     board->ConfigFifoLow.flush();
     //Writing to Config_Memory_High_Register for following channel 0 settings
     board->ConfigFifoHigh.setChannel(1);
     board->ConfigFifoHigh.setBank(0);
     board->ConfigFifoHigh.setChannelType(board->ConfigFifoHigh.kChannelTypeRSE);//RSE mode
     board->ConfigFifoHigh.flush();
     //Writing to Config_Memory_Low_Register for following channel 0 settings
     board->ConfigFifoLow.setLastChannel(1);
     board->ConfigFifoLow.setGeneralTrigger(0);
     board->ConfigFifoLow.setGain(board->ConfigFifoLow.kGain001_0);
     board->ConfigFifoLow.setPolarity(board->ConfigFifoLow.kPolarityBipolar);//BIPOLAR
     board->ConfigFifoLow.setDither(0);
     board->ConfigFifoLow.flush(); 
     return;
     and a change to test(iBus *bus):
    do
      uStatus = theSTC->AI_Status_1.readRegister();
      if (!((uStatus & 0x1000) == 0x1000))
        uValue[i] = board->AIFifoData.readRegister();
       i++;
     } while(i<1);
     printf("Value %d is %6.2f\n",0,FindADDouble(uValue[0]));
     printf("Value %d is %6.2f\n",1,FindADDouble(uValue[1]));
    but it doesn't work, why?
    How shoud I do?

  • Hey ! At the moment I am creating a eBook, which should contain links to iTunes. Does anyone know, if it is necesary to join the affiliate program for this ?? Cause I don`t want to ;-)

    Hey ! At the moment I am creating a eBook, which should contain links to iTunes.
    Does anyone know, if it is necessary to join the affiliate program for this ?? Cause I don`t want to ;-)

    Hi Bruce,
    I'm getting closer. I actually tried a variety of  expressions, such as "== null" and yours, but the problem persists.
    I am settling on the following, but there is a hangup related to the field that is being looked at for the condition that I will explain in a minute. Here's the script:
    if 
    (ViolationsTable.ViolCorrSection.ViolationsText.DebitVal.isNull || ViolationsTable.ViolCorrSection.ViolationsText.DebitVal.rawValue.length == 0)
    ViolationsTable.ViolCorrSection.instanceManager.removeInstance(parent.parent.index);
    else
    app.alert ("Warning Statement);
    ViolationsTable.ViolCorrSection.instanceManager.removeInstance(parent.parent.index);
    What happens is that, no matter which row in my table I'm in when I click the remove instance button, the script is always looking to the DebitVal field in the first row of the table. So, if the first row is empty, the message box won't appear for the removal of any row in my table. If the first row has a value in DebitVal, then the deletion of any row in the table will trigger the message box.
    I need a way to specify the script to look at the DebitVal field in the row that I am clicking in, without messing up the remove instance command.
    Ideas?
    Dave

  • I want to make address labels and print them out. Does anybody know of a word processing program for Mac that would do this?

    I want to make address labels and print them out. Does anybody know of a word processing program for Mac to accomplish this?

    Have you looked at the previous discussions listed on the right side of this page under the heading "More Like This"?

  • I want program for bom explosion

    hi
    i want program for bom explosion

    Hi,
       Using the function module below.
    FM. CS_BOM_EXPL_MAT_V2
    The required fields for this function module are :
    Material
    Plant
    Date
    Application(CAPID)
    Values for CAPID can be found in table TC04
    For production BOM it is PP01 .
    The return parameter STB of type STPOX  will contain all the BOM sub components. Using field IDNRK field of the STB table retrieve the subcomponents you need.
    Else there is alternate approach too.
    Chek the code below.
    report  zppprm_1087_bom.
    include zbom_data_declarartion.
    include zbom_selection_screen.
    include zform_used.
    *initialization
    initialization.
      prm1  =  'SELECTION'.
      prm2  =  'Materials'.
         START-OF-SELECTION
    start-of-selection.
    Get the data from data base tablees
      perform get_data.
    *Format the final data
      perform final_data.
    *Display the final data
      perform display_final.
    *&  Include           ZBOM_DATA_DECLARARTION
    T Y P E - P O O L S
    tables: mara, "Material Master
            mast, "Material to BOM Linkage
            stpo. "BOM item
    type-pools: slis .
    types: begin of ty_mara,
            matnr type matnr,
            mtart type mtart,
           end of ty_mara.
    types: begin of ty_mast,
            matnr  type matnr,
            werks  type werks_d,
            stlan  type stlan,
            stlnr  type stnum,
            stlal  type stalt,
           end of ty_mast.
    types: begin of ty_header,
           matnr type matnr,
           werks type werks_d,
           end of ty_header.
    types: begin of ty_stpo,
            stlty type stlty,
            stlnr type stnum,
            stlkn type stlkn,
            stpoz type cim_count,
            idnrk type idnrk,
            meins type kmpme,
            menge type kmpmg,
            preis type cprei,
            peinh type peinh,
           end of ty_stpo.
    types: begin of ty_bom,
              matnr type matnr,
              werks type werks_d,
              idnrk type idnrk,
              meins type kmpme,
              menge type kmpmg,
            end of ty_bom.
    Internal tables used in the code
    data: it_stpo  type standard table of ty_stpo,
          it_mara1  type standard table of ty_mara,
          it_mara2  type standard table of ty_mara,
          it_mast  type standard table of ty_mast,
          it_bom   type standard table of ty_bom,
          it_header type standard table of ty_header.
    Work Areas used in the code
    data: wa_mast  type ty_mast,
          wa_stpo  type ty_stpo,
          wa_mara  type ty_mara,
          wa_bom   type ty_bom,
          wa_header type ty_header.
    data: v_matnr  type mara-matnr.
    data: col_pos  type i.
    data: sortcat  type slis_t_sortinfo_alv,
          sortcat_ln type slis_sortinfo_alv,
          fcat type slis_t_fieldcat_alv,
          s_fcat type slis_fieldcat_alv.
    data: obj_hieralv type ref to cl_salv_hierseq_table.
    data: it_binding type salv_t_hierseq_binding,
          wa_binding type salv_s_hierseq_binding.
    *&  Include           ZBOM_SELECTION_SCREEN
    *-Declaration of selection screen forthe program-*
    selection-screen begin of block blk1 with frame title prm1.
    selection-screen begin of line.
    selection-screen comment (10) prm2 for field so_matnr.
    Selection Option.
    select-options : so_matnr for v_matnr.
    selection-screen end of line.
    selection-screen end of block blk1.
    *&  Include           ZFORM_USED
    *&      Form  GET_DATA
          text
    form get_data .
    *LOADING FINISHED MATERIALS INTO AN INTERNAL TABLE
      select matnr
             mtart
        into table it_mara1
        from mara
        where matnr in so_matnr
          and mtart = 'FERT'.
      if sy-subrc = 0.
        sort  it_mara1 by matnr.
      endif.
    *LOADING CORRESPONDING FROM Material to BOM LINK TABLE
      if it_mara1 is not initial.
        select matnr
               werks
               stlan
               stlnr
               stlal
          into table it_mast
          from mast
          for all entries in it_mara1
          where matnr = it_mara1-matnr .
        if sy-subrc = 0.
          sort it_mast by stlnr.
         loop at it_mast into wa_mast.
           move-corresponding wa_mast to wa_header.
           append wa_header to it_header.
         endloop.
        endif.
      endif.
    *LOADING CORRESPONDING BOM COMPONENTS FRON BOM ITEM TABLE
      if it_mast is not initial.
        select   stlty
                 stlnr
                 stlkn
                 stpoz
                 idnrk
                 meins
                 menge
                 preis
                 peinh
            from stpo
           into table it_stpo
           for all entries in it_mast
           where stlnr = it_mast-stlnr.
        if sy-subrc eq 0.
          sort it_stpo by stlnr.
        endif.
      endif.
    *LOAD SEMIFINISHED MATERIAL
      select matnr
             mtart
             from mara
             into table it_mara2
             where mtart = 'HALB'.
      if sy-subrc eq 0.
        sort it_mara2 by matnr.
      endif.
    endform.                    " GET_SELECT
    *&      Form  FINAL_data
          text
    form final_data .
      loop at it_stpo into wa_stpo.
        clear wa_mara.
        read table it_mara2 into wa_mara
                           with key matnr = wa_stpo-idnrk
                           binary search.
        if sy-subrc ne 0.
          continue.
        else.
          read table it_mast into wa_mast
                             with key stlnr = wa_stpo-stlnr
                             binary search.
          if sy-subrc eq 0.
            clear wa_bom.
            wa_bom-matnr = wa_mast-matnr.
            wa_bom-werks = wa_mast-werks.
            wa_bom-idnrk = wa_stpo-idnrk.
            wa_bom-meins = wa_stpo-meins.
            wa_bom-menge = wa_stpo-menge.
            collect wa_bom into it_bom.
            move-corresponding wa_mast to wa_header.
            append wa_header to it_header.
          endif.
        endif.
      endloop.
              sort it_header by matnr werks.
              sort it_bom by matnr werks idnrk.
              delete adjacent duplicates from it_header comparing matnr werks.
    endform.                    " FINAL_data
    *&      Form  display_summary
          text
    form display_final.
      wa_binding-master = 'MATNR'.
      wa_binding-slave = 'MATNR'.
      append wa_binding to it_binding.
    *Process of binding the header and BOM info in hirarchial form
      try.
          call method cl_salv_hierseq_table=>factory
            exporting
              t_binding_level1_level2 = it_binding
            importing
              r_hierseq               = obj_hieralv
            changing
              t_table_level1          = it_header
              t_table_level2          = it_bom.
        catch cx_salv_data_error .
        catch cx_salv_not_found .
      endtry.
    *to dispay the info
      call method obj_hieralv->display.
      endform.
    Hope this will help you,
    With best wishes,
    Rama.

  • I want to thank Adobe for this new Cloud all apps program.

    Being an artist who is honestly having a heck of a time in this economy and the last year being not so good. I was unable to afford the CS6 production upgrade, not even close to having that much money, times are tough. And I want to thank them for making the cloud (all apps) for $30 a month to us, I could just cry.

    Hi BigZak,
    Thanks sharing glad to hear its working out well for you!
    -Dave

Maybe you are looking for