Confirmation - Total of percentages must equal 100

Dear All,
We are using SRM 7.0 EHP1 support package level 11. At the time of goods receipt , i have the error "Total of percentages must equal 100" , "Error in account assignment for item 1" .  But it is ok while creating SC, PO.
I've searched the forums and oss notes and found some notes related this issue. But they are valid up to support package level 10, therefore not suitable for me..
So anyone who has further advice ?  If not, i think it is better to open a message to SAP ?
Thanks in advance...
Best regards,

Hi Yateesh,
In our case, we used a custom Account assignment category in PO which was mapped to a "ERP Standard Account Assignment Category - V". (This mapping could be checked in SPRO, under Account Assignment in SRM susyem).
However the same ERP category 'V' is also mapped to additional SRM custom Account Assignment Categories.
When the system tries to create the confirmation for the PO, it tries to reverse map the ERP category 'V' and since there is no one-to-one mapping, the system does a dynamic
mapping based on the account field values and determines the account
assignment category 'CC' instead. Now, the 'CC' account category might not be authorized for the user (With which you are trying to post the confirmation) and therefore the system tries to add another accounting line which results in the invalid  error message 'Total of percentages...'.
To rectify this behaviour, you can either:
- implement the BADI BBP_ACCCAT_MAP_IMP and when you receive the
ERP account category 'V', a customer specific business logic can be implemented to correctly identify 'Z_CC1' SRM account category. Similar mapping logic has to implemented for other categories as well.
OR
- you could add the account category 'CC' to the organization attribute 'KNT' for user 'hotline1' using transaction ppoma_bbp. The user can later on modify the account category manually in the account assignment tab.
Let me know if you have any further questions.
Best regards,
Raghavendra.

Similar Messages

  • Total of percentages must equal 100

    Hello,
    SRM 7/Ext classic scenario
    When user changes one of the line items in a 10 item PO, he gets the error "Total of percentages must equal 100". System automatically creates a duplicate entry for cost distribution of 100% for one of the line items.
    Will applying note 1464163 resolve this issue? Please tell me if other notes in this note need to be implemented?
    Thanks

    Hi
    It should work.
    after implementing note in dev, are you getting this error .
    Can you replicate the issue in Development ?
    I dont know why it did not work for you.
    Let me see refer our SAP answers on my message .
    in the mean time , you raise oss message.
    Muthu

  • Error: Order Management Order-level sales credit total () must equal 100%

    Hi,
    When I click checkout and fill the details and place the order from minisite , I am getting following error:
    "Error messages from Order Management Order-level sales credit total () must equal 100%.
    Salesperson is required on a booked order.There is an error in order submission."
    I have set ASO : OM Defaulting profile option to Yes.
    Please help me..
    Thanks and regards,
    Muhammed Aslam

    Hi;
    What is EBS version?
    Please see:
    Service Charges Error: Order Level Sales Credit Total() Must Be Equal 100% [ID 394641.1]
    Error Message - "Order-level sales credit total () must equal 100%." [ID 726030.1]
    Order-level sales credit total () must equal 100%-Copy RMA: LINE FLOW - RETURN FOR CREDIT ONLY [ID 1061854.1]
    Regard
    Helios

  • Require responses to equal 100?

    In the online surveys, I have a question set up as a text field for numerous items.  I've put a statement in there that the total sum of all the fields must equal 100, but is there any way to regulate that or to show a tally of what percentage they've entered?  Thanks.

    Hi;
    No, there is not, there are not "calculations" or formulas in the FormsCentral forms that the user fills out.
    Formulas can be used in the Response table on the response data, but nothing within the form.
    Thanks,
    Josh

  • Warning Message only if 1 to 3 fields do not equal 100%

    I have 3 potential fields that will be completed.  If Field1 (Primary Beneficiary) is 100%, then the user will leave Fields 2 and 3 empty.  If Fields 1 and 2 equal 100%, then Field 3 will be empty.  Otherwise they will have values in Fields 1, 2, and 3.  Regardless, they should not be able to continue completing the rest of the form until the sum of these three fields equal 100%.  Therefore I did modify the form as follows, but two issues: it throws the error message up even when first entering a value in Field 1.  This script need NOT run until all 3 fields have been tabbed through, or they click on the next section of the form to continue completing.  The "Total 100" (name of this particular field) is in the Tab Order to appear after "Beneficiary 3 Benefit Percent" field.  And secondly, it still permits the user to continue rather than returning to Field1 even if the total does not equal 100%.  Your assistance is greatly appreciated!  PS:  How do I mark that the post was either helpful or correct?
    Rita
    event.value = ''; // clear field
    // get the values of Beneficiary Benefit fields 1, 2 and 3 as string
    var sField1 = this.getField("Beneficiary 1 Benefit Percent").value.toString();
    var sField2 = this.getField("Beneficiary 2 Benefit Percent").value.toString();
    var sField3 = this.getField("Beneficiary 3 Benefit Percent").value.toString();
    // adjust for a field being 100 and others null
    if (sField1 == 100 & sField2 == '' & sField3 == '') sField2 = "0" , sField3 = "0";
    if (sField2 == 100 & sField1 == '' & sField3 == '') sField3 = "0" , sField1 = "0";
    // do only if Beneficiary Benefit fields 1, 2 and 3 are not null
    if(sField1 != '' & sField2 != '' & sField3 != '') {
    event.value = Number(sField1) + Number(sField2)+ Number(sField3);
    if (event.value != 100) app.alert("The sum of Benefit percent must equal 100.", 1, 0);
    this.getField("field 1").setFocus();

    Two problems just from a first glance at this line:
    if (sField1 == 100 & sField2 == '' & sField3 == '') sField2 = "0" , sField3 = "0";
    1. You're comparing a string to a number
    2. You're separating commands with a comma and not placing {} around the block of commands.
    It needs to be something like this:
    if (sField1 == "100" & sField2 == "" & sField3 == "") {sField2 = "0"; sField3 = "0";}
    There are probably more errors, but start by fixing those.
    Also, you should probably post which error message you're getting.

  • A set of fields that equal 100%

    I have a situation where I need to take four text fields and make them equal 100%. The fields them selves can vary in percent but the total of all four must equal 100 percent.
    Could anyone reccomend the best way to script this or if an example exist lead me in that direction?
    I have an attachment below of what I'm looking for visually.
    Thank you! =)

    Nikki, the script for this is easy but as usual the devil is in the details.  When do you want the values checked and how do you want the warning displayed?  Do you want it checked when the user tries to submit the form and have a message pop up?  Or, do you want a message displayed in real time.  For example the message will be displayed on the form until the four values add up to 100%; as soon as the user makes an entry in one of the fields that causes the total to equal 100% the message will disappear.  If the user changes a field again the message will re-appear.  Sort of an instruction/warning.
    Also, must all four fields have a value not equal to zero, or can they enter 100, 0 ,0, 0?

  • HT1119 What if my battery does not drain fully but drains a few percentages after being 100% charged then completely shuts off?

    What if my battery does not drain fully but drains a few percentages after being 100% charged then completely shuts off?

    Want to know how Apple will get 20 hours out of their 60GB iPods batteries ?
    They'll fill it with music and fully charge it (of course), then get it to play continuously (probably on random/shuffle or something similar) until the battery dies. They'll have the screen off all that time and they simply won't touch it, in an attempt to get the longest time they can.
    ie. it won't simulate real-life use !
    Few other things worth mentioning :
    - Battery life whilst playing videos is only 3 hours total, so playing any videos at all is going to make quite a difference
    - The battery life indicator is only a rough guide - it's not accurate
    - Don't get too obsessed with 'calibrating' the battery. Accoring to Apple, this isn't necessary because ""lithium-ion batteries, such as those used in iPod, have none of the memory effects seen in nickel-based rechargeable batteries."
    Taken from :
    http://docs.info.apple.com/article.html?artnum=61127

  • PM Orders whose total actaul quantity is equal to withdrawl quantity

    hello all,
    our requirement is we are generating an ALV  report to show PM Orders whose total actual quantity is equal to total withdrawn quantity...
    i.e it should not display records like below,
    RSNUM     material         BDMNG        SHKZG   ENMNG
    800268591   *****             3                   H                3
    800268591    ****             3                   S                0
    800268591     ***             3                   H                0
    800268591   *****             3                  S                 3
    where as the report should show only records like below...
    RSNUM     material         BDMNG        SHKZG   ENMNG
    8000208770  MTE30001     50                 H           50
    8000208770  MTE30001     50                 S            50
    8000208770  MTO10020     20                 H            20
    8000208770  MTO10020     20                 S            20.
    i.e each material wise i should check this ,
    my code is like below
    loop at it_resb INTO wa_resb.
           if wa_resb-shkzg eq 'H'.
                lv_bdmng1 = lv_bdmng1 + wa_resb-bdmng.
                lv_enmng1 = lv_enmng1 + wa_resb-enmng.
            ELSEIF wa_resb-shkzg eq 'S'.
                lv_enmng2 = lv_enmng2 + wa_resb-enmng.
                lv_bdmng2 = lv_bdmng2 + wa_resb-bdmng.
           endif.
         endloop.
         if lv_bdmng1 eq lv_bdmng2 AND lv_enmng1 eq lv_enmng2.
             if lv_enmng1 ne 0 and lv_enmng2 ne 0.
               APPEND  LINES OF it_resb  to it_resb1.
             endif.
         endif.
       endif.
      endloop.

    clear lv_bdmng1 and lv_bdmng2 in first line inside loop stat.

  • After full charge i can use my macbook only for 2hrs and after 20 min my battery percentage decrease from 100% to 87% and it will happend every 20 min .. pls help me

    after full charge i can use my macbook only for 2hrs and after 20 min my battery percentage decrease from 100% to 87% and it will happend every 20 min .. pls help me

    Hi,
    How old is your MBP? how many cycle batter do have ?
    I will also recomend to use the software http://www.macupdate.com/app/mac/24141/battery-health-monitor
    to monitor battery life.
    You should be able to read everything from the software.
    Please post results.
    Regards,
    Mirek

  • Total delivery percentage available

    Hi,
    my requirement is to display all the deliveries for stock shipment report based on a plant and planned shippong date. For each of the deliveries displayed system has to calculate all the quantity of Total delivery percentage available. How I can write the functional spec for this requirement.
    thanks and regards
    venkat reddy

    Create a PO without tick GR-Bsd IV, suppose I have created PO with qty 20 and rate 1 INR and give freight 50 INR (Fixed Amount)..
    Then I have done partial GR for qty 5. My freight amount booked as 12.5 INR (for partial GR)
    Then I have gone for MIRO..
    Here select Goos/Service item + Planned delivery cost.
    Enter the PO, you can see two line items appear..
    One for goods and one for freight...
    Goods will come as qty 5 and amount 5 INR and Freight will come as qty 5 and amount 12.5 INR.
    Just change the freight qty and amount as 20 and 50 INR.
    Then post the MIRO, you can see your total freight will be booked to vendor..
    Now again do GR for qty 2, at that time your freight amount will booked as 5 INR.
    Then when you will go for MIRO, you can see only the GR item, Freight qty and amount will not come at the time MIRO..
    (Note : I have told the scenario as per my previous screen shot)

  • Javascript alert script needed when calculation does not equal 100

    I have created a fillable form and have a total box which I've set to calulate the sum of Field1, Field2, Field3 and Field4
    which works well.
    I would like to add a javascript alert if the total amount does not add to exactly 100 to stop the user submitting the form or moving to next question.
    Any help would be greatly appreciated
    Thank you

    Hi try67,
    I have implemented successfully the following:
    event.value = ''; // clear field
    // get the values of field 1 and 2 as string
    var sField1 = this.getField("field 1").value.toString();
    var sField2 = this.getField("field 2").value.toString();
    // adjust for a field being 100 and the other is null
    if (sField1 == 100 & sField2 == '') sField2 = "0";
    if (sField2 == 100 & sField1 == '') sField1 = "0";
    // do only if field 1 and 2 are not null
    if(sField1 != '' & sField2 != '') {
    event.value = Number(sField1) + Number(sField2);
    if (event.value != 100) app.alert("Fields 1 and 2 must sum to 100!", 1, 0);
    } // end not empty
    Just wondered if you can let me know what I need to add to stop the form being submitted(email submit button) if the amount is not 100?
    So the same alert appears ("Fields 1 and 2 must sum to 100!")
    Currently if the fields exceed or are below 100, then the alert message  ("Fields 1 and 2 must sum to 100!")
    appears once and you can still tab to next field, or click on next field or submit the pdf.
    I was hoping to add validation on submitto be similar to required fields where you are alerted if not filled in and cannot submit until you imputted the correct calculation sum up to 100?

  • ALV Total and Percentage

    Hi,
    In my ALV report,I have 4 fields
    matnr
    maktx
    menge1
    menge2
    In the end of report (column of menge1), i want only total
             end of menge2 i want the value in percentage as  = (Total of menge2 / total of menge1) * 100
    I am using Fm : Reuse_alv_grid_display.
    Can anybody suggest me how to do.
    Thanks
    Kumar

    Use the following code in a PBO module (after set for first display) or in an adequate event handler.
    data: total type ref to data,
          subtotal1 type ref to data.
    field-symbols: <total> like gt_sflight,
                   <subtotal1> like gt_sflight.
    call method grid1->get_subtotals
      importing
        ep_collect00 = total
        ep_collect01 = subtotal1.
    assign total->* to <total>.
    assign subtotal1->* to <subtotal1>.
    Then update the <total> internal tables.
    Look at [ALV Grid Control (BC-SRV-ALE)|http://help.sap.com/printdocu/core/Print46c/en/data/pdf/BCSRVALV/BCSRVALV.pdf]
    NB: If you add a last row to the report, don't forget to disable sort options in the ALV menu.
    Regards

  • Line total commssion percentage auto calculation

    Dear All,
    I want to have an option by which when I create a marketing document and in the item row if I create a udf as commission percentage and commision amount, based on the value of line total if I put commission percentage as 20 % of the line total i.e 1000 then in comission amount 200 should come automatically.
    How to do this...can any one tell me how this can be done through query or formated search.
    Thanks in advance.
    Regards,
    Kawish

    Kawish,
    What are the names of the 2 user fields and what are their types?
    Let us presume the Comm % field is called CommPer and Commission Total is called CommTotal
    SELECT $\[$38.21.Number]*($\[$38.U_CommPer.Number]/100)
    Link this to the Commission Total column
    Please change the UDF names as per your definition

  • Total records in database equals -1?

    I have some code, accessing an Access database. As part of development I need to see how many total records there are, so I have the code I took off of bindings in CS 5:
              <p align="center">/<%=(Recordset1_first)%>/<%=(Recordset1_last)%>/<%=(Recordset1_total)%></p >
    Why would _total always equal -1? The code is otherwise functional but the -1 does not change regardless if I add a record or delete a record?
    Curiouser and curiouser…
    Ross

    I try changing the cursor type and it had no effect whatsoever I also tried looking for a simple "attach" for this posting and could not find one. I therefore attached the full ASP so you could see what kind of stuff I'm talking about. Could you forward this as appropriate?
    Thanks.
    Ross
    =============================code=========================
    <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
    <!--#include virtual="/Connections/nextdns.asp" -->
    <%
      dim MM_nextdns_STRING
          MM_nextdns_STRING ="PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("Database\ids2.mdb")
    Dim MM_editAction
    MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME"))
    If (Request.QueryString <> "") Then
      MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString)
    End I
    ' boolean to abort record edit
    Dim MM_abortEdit
    MM_abortEdit = false
    %>
    <%
    ' *** Redirect if username exists
    MM_flag = "MM_insert"
    If (CStr(Request(MM_flag)) <> "") Then
      Dim MM_rsKey
      Dim MM_rsKey_cmd
      MM_dupKeyRedirect = "/already.asp"
      MM_dupKeyUsernameValue = CStr(Request.Form("11"))
      Set MM_rsKey_cmd = Server.CreateObject ("ADODB.Command")
      MM_rsKey_cmd.ActiveConnection = MM_nextdns_STRING
      MM_rsKey_cmd.CommandText = "SELECT id2 FROM login2 WHERE id2 = ?"
      MM_rsKey_cmd.Prepared = true
      MM_rsKey_cmd.Parameters.Append MM_rsKey_cmd.CreateParameter("param1", 200, 1, 255, MM_dupKeyUsernameValue) ' adVarChar
      Set MM_rsKey = MM_rsKey_cmd.Execute
      If Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then
        ' the username was found - can not add the requested username
        MM_qsChar = "?"
        If (InStr(1, MM_dupKeyRedirect, "?") >= 1) Then MM_qsChar = "&"
        MM_dupKeyRedirect = MM_dupKeyRedirect & MM_qsChar & "requsername=" & MM_dupKeyUsernameValue
        Response.Redirect(MM_dupKeyRedirect)
      End If
      MM_rsKey.Close
    End If
    %>
    <%
    ' IIf implementation
    Function MM_IIf(condition, ifTrue, ifFalse)
      If condition = "" Then
        MM_IIf = ifFalse
      Else
        MM_IIf = ifTrue
      End If
    End Function
    %>
    <%
    If (CStr(Request("MM_insert")) = "form3") Then
      If (Not MM_abortEdit) Then
        ' execute the insert
        Dim MM_editCmd
        Set MM_editCmd = Server.CreateObject ("ADODB.Command")
        MM_editCmd.ActiveConnection = MM_nextdns_STRING
        MM_editCmd.CommandText = "INSERT INTO login2 (id2, password2, AccessLev) VALUES (?, ?, ?)"
        MM_editCmd.Prepared = true
        MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 202, 1, 255, Request.Form("11")) ' adVarWChar
        MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 202, 1, 255, Request.Form("22")) ' adVarWChar
        MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param3", 5, 1, -1, MM_IIF(Request.Form("accesslev"), Request.Form("accesslev"), null)) ' adDouble
        MM_editCmd.Execute
        MM_editCmd.ActiveConnection.Close
      End If
    End If
    %>
    <%
    ' *** Delete Record: construct a sql delete statement and execute it
    If (CStr(Request("MM_delete")) = "form2" And CStr(Request("MM_recordId")) <> "") Then
      If (Not MM_abortEdit) Then
        ' execute the delete
    mm_nextdns_string = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("Database\ids2.mdb")
           Set MM_editCmd = Server.CreateObject ("ADODB.Command")
        MM_editCmd.ActiveConnection = MM_nextdns_STRING
        MM_editCmd.CommandText = "DELETE FROM login2 WHERE id2 = ?"
        MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 200, 1, 255, Request.Form("MM_recordId")) ' adVarChar
        MM_editCmd.Execute
        MM_editCmd.ActiveConnection.Close
      End If
    End If
    %>
    <%
    If (CStr(Request("MM_insert")) = "form3") Then
      If (Not MM_abortEdit) Then
        ' execute the insert
        Set MM_editCmd = Server.CreateObject ("ADODB.Command")
       MM_nextdns_string = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("Database\ids2.mdb")
         MM_editCmd.ActiveConnection = MM_nextdns_STRING
        MM_editCmd.CommandText = "INSERT INTO login2 (id2, password2) VALUES (?, ?)"
        MM_editCmd.Prepared = true
        MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 202, 1, 255, Request.Form("121212")) ' adVarWChar
        MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 202, 1, 255, Request.Form("343434")) ' adVarWChar
        MM_editCmd.Execute
        MM_editCmd.ActiveConnection.Close
        ' append the query string to the redirect URL
        Dim MM_editRedirectUrl0
        MM_editRedirectUrl = "inserted.asp"
        If (Request.QueryString <> "") Then
          If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0) Then
            MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
          Else
            MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
          End If
        End If
        Response.Redirect(MM_editRedirectUrl)
      End If
    End If
    %>
    <%
    '  *** Recordset Stats, Move To Record, and Go To Record: declare stats variables
    Dim delit_total
    Dim delit_first
    Dim delit_last
    ' set the record count
    ' set the number of rows displayed on this page
    If (delit_numRows < 0) Then
      delit_numRows = delit_total
    Elseif (delit_numRows = 0) Then
      delit_numRows = 1
    End If
    ' set the first and last displayed record
    delit_first = 1
    delit_last  = delit_first + delit_numRows - 1
    ' if we have the correct record count, check the other stats
    If (delit_total <> -1) Then
      If (delit_first > delit_total) Then
        delit_first = delit_total
      End If
      If (delit_last > delit_total) Then
        delit_last = delit_total
      End If
      If (delit_numRows > delit_total) Then
        delit_numRows = delit_total
      End If
    End If
    %>
    <%
    ' *** Recordset Stats: if we don't know the record count, manually count them
    response.write("precount")
    If (Recordset1_total = -1) Then
      ' count the total records by iterating through the recordset
      Recordset1_total=0
    response.write("incount")
       While (Not Recordset1.EOF)
        Recordset1_total = Recordset1_total + 1
        Recordset1.MoveNext
      Wend
      ' reset the cursor to the beginning
      If (Recordset1.CursorType > 0) Then
        Recordset1.MoveFirst
      Else
        Recordset1.Requery
      End If
      ' set the number of rows displayed on this page
      If (Recordset1_numRows < 0 Or Recordset1_numRows > Recordset1_total) Then
        Recordset1_numRows = Recordset1_total
      End If
      ' set the first and last displayed record
      Recordset1_first = 1
      Recordset1_last = Recordset1_first + Recordset1_numRows - 1
      If (Recordset1_first > Recordset1_total) Then
        Recordset1_first = Recordset1_total
      End If
      If (Recordset1_last > Recordset1_total) Then
        Recordset1_last = Recordset1_total
      End If
    End If
    %>
    <%
    ' *** Validate request to log in to this site.
    MM_LoginAction = Request.ServerVariables("URL")
    If Request.QueryString <> "" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)
    MM_valUsername = CStr(Request.Form("idid2"))
    If MM_valUsername <> "" Then
      Dim MM_fldUserAuthorization
      Dim MM_redirectLoginSuccess
      Dim MM_redirectLoginFailed
      Dim MM_loginSQL
      Dim MM_rsUser
      Dim MM_rsUser_cmd
      MM_fldUserAuthorization = ""
      MM_redirectLoginSuccess = "file:///C|/Users/Admin/AppData/Local/Temp/{C0C804DA-3712-4265-839B-02EB4947FC25}/g.asp"
      MM_redirectLoginFailed = "file:///C|/Users/Admin/AppData/Local/Temp/{C0C804DA-3712-4265-839B-02EB4947FC25}/b.asp"
      MM_loginSQL = "SELECT id2, password2"
      If MM_fldUserAuthorization <> "" Then MM_loginSQL = MM_loginSQL & "," & MM_fldUserAuthorization
      MM_loginSQL = MM_loginSQL & " FROM login2 WHERE id2 = ? AND password2 = ?"
      Set MM_rsUser_cmd = Server.CreateObject ("ADODB.Command")
      MM_rsUser_cmd.ActiveConnection = MM_nextdns_STRING
      MM_rsUser_cmd.CommandText = MM_loginSQL
      MM_rsUser_cmd.Parameters.Append MM_rsUser_cmd.CreateParameter("param1", 200, 1, 255, MM_valUsername) ' adVarChar
      MM_rsUser_cmd.Parameters.Append MM_rsUser_cmd.CreateParameter("param2", 200, 1, 255, Request.Form("pwd2")) ' adVarChar
      MM_rsUser_cmd.Prepared = true
      Set MM_rsUser = MM_rsUser_cmd.Execute
      If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then
        ' username and password match - this is a valid user
        Session("MM_Username") = MM_valUsername
        If (MM_fldUserAuthorization <> "") Then
          Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
        Else
          Session("MM_UserAuthorization") = ""
        End If
        if CStr(Request.QueryString("accessdenied")) <> "" And false Then
          MM_redirectLoginSuccess = Request.QueryString("accessdenied")
        End If
        MM_rsUser.Close
        Response.Redirect(MM_redirectLoginSuccess)
      End If
      MM_rsUser.Close
      Response.Redirect(MM_redirectLoginFailed)
    End If
    %>
    <%
    ' *** Validate request to log in to this site.
    MM_LoginAction = Request.ServerVariables("URL")
    If Request.QueryString <> "" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)
    MM_valUsername = CStr(Request.Form("asd1"))
    If MM_valUsername <> "" Then
      MM_fldUserAuthorization = ""
      MM_redirectLoginSuccess = "file:///C|/Users/Admin/AppData/Local/Temp/{C0C804DA-3712-4265-839B-02EB4947FC25}/g.asp"
      MM_redirectLoginFailed = "file:///C|/Users/Admin/AppData/Local/Temp/{C0C804DA-3712-4265-839B-02EB4947FC25}/b.asp"
      MM_loginSQL = "SELECT id2, password2"
      If MM_fldUserAuthorization <> "" Then MM_loginSQL = MM_loginSQL & "," & MM_fldUserAuthorization
      MM_loginSQL = MM_loginSQL & " FROM login2 WHERE id2 = ? AND password2 = ?"
      Set MM_rsUser_cmd = Server.CreateObject ("ADODB.Command")
      MM_rsUser_cmd.ActiveConnection = MM_nextdns_STRING
      MM_rsUser_cmd.CommandText = MM_loginSQL
      MM_rsUser_cmd.Parameters.Append MM_rsUser_cmd.CreateParameter("param1", 200, 1, 255, MM_valUsername) ' adVarChar
      MM_rsUser_cmd.Parameters.Append MM_rsUser_cmd.CreateParameter("param2", 200, 1, 255, Request.Form("asd2")) ' adVarChar
      MM_rsUser_cmd.Prepared = true
      Set MM_rsUser = MM_rsUser_cmd.Execute
      If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then
        ' username and password match - this is a valid user
        Session("MM_Username") = MM_valUsername
        If (MM_fldUserAuthorization <> "") Then
          Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
        Else
          Session("MM_UserAuthorization") = ""
        End If
        if CStr(Request.QueryString("accessdenied")) <> "" And false Then
          MM_redirectLoginSuccess = Request.QueryString("accessdenied")
        End If
        MM_rsUser.Close
        Response.Redirect(MM_redirectLoginSuccess)
      End If
      MM_rsUser.Close
      Response.Redirect(MM_redirectLoginFailed)
    End If
    %>
    <%
    Dim Recordset1
    Dim Recordset1_cmd
    Dim Recordset1_numRows
    Set Recordset1_cmd = Server.CreateObject ("ADODB.Command")
    Recordset1_cmd.ActiveConnection = MM_nextdns_STRING
    Recordset1_cmd.CommandText = "SELECT * FROM login2"
    Recordset1_cmd.Prepared = true
    Set Recordset1 = Recordset1_cmd.Execute
    Recordset1_numRows = 0
    %>
    <!--#include virtual="/includes/adovbs.inc" -->
    <%
    Repeat1__numRows = 20
    Repeat1__index = 0
    Recordset1_numRows = Recordset1_numRows + Repeat1__numRows
    %>
    <%
    '  *** Recordset Stats, Move To Record, and Go To Record: declare stats variables
    Dim Recordset1_total
    Dim Recordset1_first
    Dim Recordset1_last
    ' set the record count
    Recordset1_total = Recordset1.RecordCount
    ' set the number of rows displayed on this page
    If (Recordset1_numRows < 0) Then
      Recordset1_numRows = Recordset1_total
    Elseif (Recordset1_numRows = 0) Then
      Recordset1_numRows = 1
    End If
    ' set the first and last displayed record
    Recordset1_first = 1
    Recordset1_last  = Recordset1_first + Recordset1_numRows - 1
    ' if we have the correct record count, check the other stats
    If (Recordset1_total <> -1) Then
      If (Recordset1_first > Recordset1_total) Then
        Recordset1_first = Recordset1_total
      End If
      If (Recordset1_last > Recordset1_total) Then
        Recordset1_last = Recordset1_total
      End If
      If (Recordset1_numRows > Recordset1_total) Then
        Recordset1_numRows = Recordset1_total
      End If
    End If
    %>
    <%
    ' *** Validate request to log in to this site.
    MM_LoginAction = Request.ServerVariables("URL")
    If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Request.QueryString
    MM_valUsername=CStr(Request.Form("idid2"))
    If MM_valUsername <> "" Then
      MM_fldDynamicRedirect=""
      MM_fldUserAuthorization="AccessLev"
      MM_redirectLoginSuccessDynamic="file:///C|/Users/Admin/AppData/Local/Temp/{C0C804DA-3712- 4265-839B-02EB4947FC25}/g.asp"
      MM_redirectLoginFailed="file:///C|/Users/Admin/AppData/Local/Temp/{C0C804DA-3712-4265-839 B-02EB4947FC25}/b.asp"
      MM_flag="ADODB.Recordset"
      set MM_rsUser = Server.CreateObject(MM_flag)
      MM_rsUser.ActiveConnection = MM_nextdns_STRING
      MM_rsUser.Source = "SELECT id2, password2"
      If MM_fldDynamicRedirect <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldDynamicRedirect
      If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization
      MM_rsUser.Source = MM_rsUser.Source & " FROM login2 WHERE id2='" & Replace(MM_valUsername,"'","''") &"' AND password2='" & Replace(Request.Form("pwd2"),"'","''") & "'"
      MM_rsUser.CursorType = 0
      MM_rsUser.CursorLocation = 2
      MM_rsUser.LockType = 3
      MM_rsUser.Open
      If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then
        ' username and password match - this is a valid user
        Session("MM_Username") = MM_valUsername
        If (MM_fldUserAuthorization <> "") Then
          Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
        ElseIf (MM_fldDynamicRedirect <> "") Then
          MM_redirectLoginSuccessDynamic = CStr(MM_rsUser.Fields.Item(MM_fldDynamicRedirect).Value)
        Else
          Session("MM_UserAuthorization") = ""
        End If
        if CStr(Request.QueryString("accessdenied")) <> "" And false Then
          MM_redirectLoginSuccessDynamic = Request.QueryString("accessdenied")
        End If
        MM_rsUser.Close
        Response.Redirect(MM_redirectLoginSuccessDynamic)
      End If
      MM_rsUser.Close
      Response.Redirect(MM_redirectLoginFailed)
    End If
    %>
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    <html xmlns="http://www.w3.org/1999/xhtml">
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
    <title>Untitled Document</title>
    <style type="text/css">
    body {
        background-image: url(/graphics/spackle.gif);
    .ctable {
        border-top-style: solid;
        border-right-style: solid;
        border-bottom-style: solid;
        border-left-style: solid;
    </style>
    <script src="/SpryAssets/SpryValidationTextField.js" type="text/javascript"></script>
    <link href="/SpryAssets/SpryValidationTextField.css" rel="stylesheet" type="text/css" />
    </head>
    <body>
    <table width="160" border="1">
      <tr>
        <td width="106"><p><img src="/graphics/coed1.jpg" width="42" height="53" alt="coed1" /></p>
          <form target="paypal" action="https://www.paypal.com/cgi-bin/webscr" method="post">
            <input type="hidden" name="cmd" value="_cart" />
            <input type="hidden" name="add" value="1" />
            <input type="hidden" name="bn" value="webassist.dreamweaver.4_5_0" />
            <input type="hidden" name="business" value="[email protected]" />
            <input type="hidden" name="item_name" value="aaaa" />
            <input type="hidden" name="item_number" value="aaaa" />
            <input type="hidden" name="amount" value=".12" />
            <input type="hidden" name="currency_code" value="USD" />
            <input type="hidden" name="cancel_return" value="http://heritage.site88.net/badorder.asp" />
            <input type="hidden" name="receiver_email" value="[email protected]" />
            <input type="hidden" name="mrb" value="R-3WH47588B4505740X" />
            <input type="hidden" name="pal" value="ANNSXSLJLYR2A" />
            <input type="hidden" name="no_shipping" value="0" />
            <input type="hidden" name="no_note" value="0" />
            <input type="image" name="submit" src="http://images.paypal.com/images/sc-but-03.gif" border="0" alt="Make payments with PayPal - it's fast, free and secure!" />
        </form></td>
        <td width="16"> </td>
        <td width="16"> </td>
      </tr>
      <tr>
        <td> </td>
        <td><img src="/graphics/coed1.jpg" width="14" height="18" alt="coed1" /></td>
        <td> </td>
      </tr>
      <tr>
        <td> </td>
        <td> </td>
        <td><img src="/graphics/coed1.jpg" width="20" height="31" alt="coed1" /></td>
      </tr>
    </table>
    <form target="paypal" action="https://www.paypal.com/cgi-bin/webscr" method="post">
      <div align="center">
        <input type="hidden" name="cmd" value="_cart" />
        <input type="hidden" name="display" value="1" />
        <input type="hidden" name="bn" value="webassist.dreamweaver.4_5_0" />
        <input type="hidden" name="business" value="[email protected]" />
        <input type="hidden" name="receiver_email" value="[email protected]" />
        <input type="hidden" name="mrb" value="R-3WH47588B4505740X" />
        <input type="hidden" name="pal" value="ANNSXSLJLYR2A" />
        <input type="image" name="submit" src="http://images.paypal.com/images/view_cart_02.gif" border="0" alt="Make payments with PayPal - it's fast, free and secure!" />
     </div>
    </form>
    <p> </p>
    <table width="492" border="1" cellspacing="0" cellpadding="0">
      <tr>
        <td width="63"><label for="recnum6">Recnum</label></td>
        <td width="101"> ID</td>
        <td width="154">Password </td>
        <td width="164">AccessLev</td>
      </tr>
    </table>
    <%
    While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF))
    %>
    <td><input name="recnum" type="text" id="recnum" value="<%=(Recordset1.Fields.Item("recnum").Value)%>" size="10" /></td>
    <td><input name="idid" type="text" id="idid" value="<%=(Recordset1.Fields.Item("id2").Value)%>" size="10" /></td>
    <td><input name="pwd" type="text" id="pwd" value="<%=(Recordset1.Fields.Item("password2").Value)%>" /></td>
    <td><input name="accesslev" type="text" id="accesslev" value="<%=(Recordset1.Fields.Item("AccessLev").Value)%>" /></td>
    <label for="accesslev"></label>
    <%
      Repeat1__index=Repeat1__index+1
      Repeat1__numRows=Repeat1__numRows-1
      Recordset1.MoveNext()
      response.write("<br>")
    Wend
    %>
    <p align="center">/<%=(Recordset1_first)%>/<%=(Recordset1_last)%>/<%=(Recordset1_total)%>/</ p>
    <p align="center"> </p>
    <form id="form4" name="form4" method="post" action="file:///C|/Users/Admin/AppData/Local/Temp/{C0C804DA-3712-4265-839B-02EB4947FC25}/ inscust.asp">
      <div align="center">
        <input type="submit" name="register" id="register" value="Register as New User" />
      </div>
    </form>
    <p align="center">-or- </p>
    <form id="form1" name="form1" method="POST" action="<%=MM_LoginAction%>">
      <label for="idid2">                                                                      ID:</label>
      <input type="text" name="idid2" id="idid2" />
      <label for="pwd2">Pwd:</label>
      <input type="password" name="pwd2" id="pwd2" />
      <input type="submit" name="login" id="login" value="Login" />
      <a href="file:///C|/Users/Admin/AppData/Local/Temp/{C0C804DA-3712-4265-839B-02EB4947FC25}/re gister.asp">
      </a>
    </form>
    <form action="<%=MM_editAction%>" method="POST" id="form3" name="form3">
        <label for="11">IdId:</label>
        <input type="text" name="11" id="11" />
        <label for="22">Password2:</label>
        <input type="password" name="22" id="22" />
      <label for="accesslev">AL:</label>
      <input name="accesslev" type="text" id="accesslev" value="2" size="1" maxlength="1" />
      <input type="submit" name="insins" id="insins" value="Insert" />
        <input type="hidden" name="MM_insert" value="form3" />
      </p>
    </form>
    <p></p>
    <p></p>
    <form ACTION="file:///C|/Users/Admin/AppData/Local/Temp/{C0C804DA-3712-4265-839B-02EB4947FC25}/ dodel.asp" METHOD="POST" id="form2" name="form2">
      <label for="delrec">Recnum:</label>
      <input type="text" name="delrec" id="delrec" />
      <input type="submit" name="deleir" id="deleir" value="Delete" />
    </form>
    <p></p>
    <p>
      <script type="text/javascript">
    function zappaypalcookies()
        alert("called");
        alert(document.cookie.length);
        alert(document.cookie);
        document.cookie="fred=sam";
            alert(document.cookie);
      </script></p>
    </body>
    </html>
    <%
    Recordset1.Close()
    Set Recordset1 = Nothing
    %>

  • Total tax percentage in table

    Hi,
    We want to prepare one report with tax code and tax percentage.In one tax code different condiiton exists.In such case is their any table in which we can get total tax.
    For example Country code BE    tax code DA  input tax is 10% (condition type MWVS) and non.ded.input tax 10% (condition type MWVN).In such case in which table can we get total tax against tax code DA.Their are different condition types for different tax codes so cannot generalised this.
    Thanks & Regards
    Vinay

    No reply hence closing this thread.
    Vinay

Maybe you are looking for

  • Webpages open in browser, not the stageWebView?

    Hi, I have an app that I'm just doing some minor updates on after having successfully published it to both Google and Apple's app stores (http://flashgamer.com/apps/ ). The app consists of several lists and UI-elements done in Flash and will eventual

  • Customer creatio (master data mgt.)

    Hi guys, Once we create an customer at our loctaion the same must be registerd in the master data.for that we have a Program(BDC) that is to be executed on daily basis in background.But this program gives error while executing in background.While exe

  • I can not remember the passcode for my sons ipod and I can't reset it or anything - any ideas?

    Does anyone know how to reset this, I know it shouldn't be easy but I can't do anything with it, I have backed it up today.

  • "Flash Player Update Service has stopped working and has closed."

    First I'm using Chrome(up to date) on Vista 64. Have scanned for viruses and nothing was found. I've been getting this persistent error that won't go away that just started happening a few days ago. I haven't installed anything recently. This happens

  • Creating ClassPath

    Hi I designed a space invader game that can be played with the keyboard. Now I want to be able to play the same game using the D-pad of wiimote. I understand I need to import some classes of the wiiflash to achieve my aim. I have downloaded the wiifl