Need code to generate IP Number.....

I need to retrieve the IP number of the person filling out a
form which has an e-mail function that notifies the client by
e-mail the contents of the message.
The script that captures the data input from a form is
structured to forward the information via e-mail per below.
Unfortunately, this particular structure returns a BLANK space for
IP.
What is incorrect with this code? Or, am I using the wrong
expression?
Name: {FirstName} {LastName}<br>
Phone: {phone}<br>
E-Mail: {e_mail}<br>
IP Address: {Request.ServerVariables.REMOTE_ADDR}<br>
Organization: {organization}<br>
Event Name: {event_name}<br>
Location: {location}<br>
Event Date: {event_date}<br>
Event Time: {event_time}<br>
Admission: {admission}<br>
Comments: {comments}<br>
<br><br>
This is the end of the report.
I have attempted to use the code below in its place but, it
generates an error message and the form will not execute.
<%Request.ServerVariables("remote_addr")%> '
Thank you for any help you can provide..

Be aware that this IP number will only tell you who the
visitor's ISP is,
unless they have a STATIC IP address.
Murray --- ICQ 71997575
Adobe Community Expert
(If you *MUST* email me, don't LAUGH when you do so!)
==================
http://www.projectseven.com/go
- DW FAQs, Tutorials & Resources
http://www.dwfaq.com - DW FAQs,
Tutorials & Resources
==================
"Slowtroll" <[email protected]> wrote in
message
news:g0kcva$bqc$[email protected]..
>I need to retrieve the IP number of the person filling
out a form which has
>an
> e-mail function that notifies the client by e-mail the
contents of the
> message.
>
> The script that captures the data input from a form is
structured to
> forward
> the information via e-mail per below. Unfortunately,
this particular
> structure
> returns a BLANK space for IP.
>
> What is incorrect with this code? Or, am I using the
wrong expression?
>
> Name: {FirstName} {LastName}<br>
> Phone: {phone}<br>
> E-Mail: {e_mail}<br>
> IP Address:
{Request.ServerVariables.REMOTE_ADDR}<br>
> Organization: {organization}<br>
> Event Name: {event_name}<br>
> Location: {location}<br>
> Event Date: {event_date}<br>
> Event Time: {event_time}<br>
> Admission: {admission}<br>
> Comments: {comments}<br>
> <br><br>
> This is the end of the report.
>
> I have attempted to use the code below in its place but,
it generates an
> error
> message and the form will not execute.
>
> <%Request.ServerVariables("remote_addr")%> '
>
> Thank you for any help you can provide..
>

Similar Messages

  • Need Code to generate Inbound Idocs

    Hi friends
    i have a flat file consists of delivery confirmation data
    by using this i need to generate inbound idocs
    i filled all the segments in idoc type /afs/delvry03 and message type whscon
    can any one have the code to generate inbound idocs
    please remember that here i am not using XI
    thanks
    Anil

    Hi this is for Stand alone Programs, I hope it is useful to you.
    Program Flow 
    The program logic contains the following blocks: 
      1.  Provide a selection screen to allow a user to specify the various objects for which IDocs are to be generated. 
      2.  Determine the key of the application document from the object specified in step 1. 
      3.  Select application data from the database using the object key identified in step 2. 
      4.  Populate control record information. 
      5.  Populate an internal table of type EDIDD with data records for the various segments. 
      6.  Call the ALE service layer (MASTER_IDOC_DISTRIBUTE) to create the IDocs in the database. 
      7.  Commit work. 
    The program in Listing 32-2 generates the monthly report IDoc ZMREPT01, which illustrates a stand-alone outbound process. 
    Listing 32-2 
    REPORT ZARNEDI1 MESSAGE-ID ZE. 
    Parameters 
    object key (Social security number for the employee) 
      PARAMETERS: P_SSN LIKE ZEMPDETAIL-SSN. 
    message type 
      PARAMETERS: P_MESTYP LIKE EDMSG-MSGTYP OBLIGATORY. 
    destination system 
      PARAMETERS: P_LOGSYS LIKE TBDLST-LOGSYS. 
    Constants 
      DATA: 
        segment names 
            C_HEADER_SEGMENT           LIKE EDIDD-SEGNAM VALUE 'Z1EMHDR', 
            C_WEEKLY_DETAILS_SEGMENT   LIKE EDIDD-SEGNAM VALUE 'Z1WKDET', 
            C_CLIENT_DETAILS_SEGMENT   LIKE EDIDD-SEGNAM VALUE 'Z1CLDET', 
            C_SUMMARY_SEGMENT          LIKE EDIDD-SEGNAM VALUE 'Z1SUMRY', 
        idoc type 
            C_MONTHLY_REPORT_IDOC_TYPE LIKE EDIDC-IDOCTP VALUE 'ZMREPT01'. 
    Data declarations 
    idoc control record 
      data: control_record_out like edidc. 
    employee header data 
      DATA: FS_EMPHDR_DATA LIKE Z1EMHDR. 
    employee weekly details data 
      DATA: FS_WEEKDET_DATA LIKE Z1WKDET. 
    client details data 
      DATA: FS_CLIENTDET_DATA LIKE Z1CLDET. 
    employee monthly summary data 
      DATA: FS_SUMMARY_DATA LIKE Z1SUMRY. 
    total hours and amount for the summary segment 
      DATA: TOTAL_HRS_MONTH TYPE I, 
            TOTAL_AMT_MONTH TYPE I. 
    Database Tables 
    Application data tables 
      TABLES: ZEMPDETAIL, ZEMPWKDET. 
    Internal tables 
      DATA: 
        weekly details - appplication data 
            IT_WKDET LIKE ZEMPWKDET OCCURS 0 WITH HEADER LINE, 
        data records 
            INT_EDIDD LIKE EDIDD OCCURS 0 WITH HEADER LINE, 
        communication idocs geneerated 
            IT_COMM_IDOCS LIKE EDIDC OCCURS 0 WITH HEADER LINE. 
    Program logic 
      ********************Select Application Data*************************** 
      SELECT SINGLE * FROM ZEMPDETAIL WHERE SSN = P_SSN. 
      IF SY-SUBRC NE 0. 
         MESSAGE E001 WITH P_SSN. 
         EXIT. 
      ENDIF. 
      SELECT * FROM ZEMPWKDET INTO TABLE IT_WKDET WHERE SSN = P_SSN. 
      IF SY-SUBRC NE 0. 
         MESSAGE E002 WITH P_SSN. 
         EXIT. 
      ENDIF. 
      ********************Build Control Record****************************** 
    Fill control record information 
      CONTROL_RECORD_OUT-MESTYP = P_MESTYP. 
      control_record_out-idoctp = c_monthly_report_idoc_type. 
      control_record_out-rcvprt = 'LS'. 
      control_record_out-rcvprn = p_logsys. 
      ********************Build Data Records******************************** 
      *--Employee header--
    fill the employee header information 
      FS_EMPHDR_DATA-LNAME = ZEMPDETAIL-LNAME. 
      FS_EMPHDR_DATA-FNAME = ZEMPDETAIL-FNAME. 
      FS_EMPHDR_DATA-SSN   = ZEMPDETAIL-SSN. 
      FS_EMPHDR_DATA-DOB   = ZEMPDETAIL-DOB. 
    fill the administrative section of the data record 
      INT_EDIDD-SEGNAM = C_HEADER_SEGMENT. 
      INT_EDIDD-SDATA = FS_EMPHDR_DATA. 
    append the employee header data record to the IDoc data 
      APPEND INT_EDIDD. 
      *--Employee weekly details--
      LOOP AT IT_WKDET. 
    fill the weekly details for each week 
        FS_WEEKDET_DATA-WEEKNO = IT_WKDET-WEEKNO. 
        FS_WEEKDET_DATA-TOTHOURS = IT_WKDET-TOTHOURS. 
        FS_WEEKDET_DATA-HRLYRATE = IT_WKDET-HRLYRATE. 
    add administrative information to the data record 
        INT_EDIDD-SEGNAM = C_WEEKLY_DETAILS_SEGMENT. 
        INT_EDIDD-SDATA = FS_WEEKDET_DATA. 
    append the data for the week to the IDoc data 
        APPEND INT_EDIDD. 
    Client details of each week 
        FS_CLIENTDET_DATA-CLSITE = IT_WKDET-CLSITE. 
        FS_CLIENTDET_DATA-WORKDESC = IT_WKDET-WORKDESC. 
    add administrative information to the data record 
        INT_EDIDD-SEGNAM = C_CLIENT_DETAILS_SEGMENT. 
        INT_EDIDD-SDATA = FS_CLIENTDET_DATA. 
    append the client details for the week to the IDoc data 
        APPEND INT_EDIDD. 
      ENDLOOP. 
      *--Employee monthly summary--
    compute total hours and amount for the month 
      LOOP AT IT_WKDET. 
        TOTAL_HRS_MONTH = TOTAL_HRS_MONTH + IT_WKDET-TOTHOURS. 
        TOTAL_AMT_MONTH = TOTAL_AMT_MONTH + ( IT_WKDET-TOTHOURS * 
                                              IT_WKDET-HRLYRATE ). 
      ENDLOOP. 
    fill the summary information 
      FS_SUMMARY_DATA-TOTHRS = TOTAL_HRS_MONTH. 
      FS_SUMMARY_DATA-TOTAMT = TOTAL_AMT_MONTH. 
    condense the summary record fields to remove spaces 
      CONDENSE FS_SUMMARY_DATA-TOTHRS. 
      CONDENSE FS_SUMMARY_DATA-TOTAMT. 
    add administrative information to the data record 
      INT_EDIDD-SEGNAM = C_SUMMARY_SEGMENT. 
      INT_EDIDD-SDATA = FS_SUMMARY_DATA. 
    append summary data to the IDoc data 
      APPEND INT_EDIDD. 
      *************Pass control to the ALE layer**************************** 
      CALL FUNCTION 'MASTER_IDOC_DISTRIBUTE' 
           EXPORTING 
                master_idoc_control            = control_record_out 
           TABLES 
                COMMUNICATION_IDOC_CONTROL     = IT_COMM_IDOCS 
                MASTER_IDOC_DATA               = INT_EDIDD 
           EXCEPTIONS 
                ERROR_IN_IDOC_CONTROL          = 1 
                ERROR_WRITING_IDOC_STATUS      = 2 
                ERROR_IN_IDOC_DATA             = 3 
                SENDING_LOGICAL_SYSTEM_UNKNOWN = 4 
                OTHERS                         = 5. 
      IF SY-SUBRC NE 0. 
         MESSAGE E003 WITH P_SSN. 
      ELSE. 
         LOOP AT IT_COMM_IDOCS. 
           WRITE: / 'IDoc generated', IT_COMM_IDOCS-DOCNUM. 
         ENDLOOP. 
         COMMIT WORK. 
      ENDIF.

  • Hi I need this asap... "Java code to generate XML File from XML Schema"

    Hi all....
    I need this asap... "Java code to generate XML File from XML Schema i.e XML Schema Definition, XSD file".
    Thankz in advance...
    PS: I already posted in the afternoon... this is the second posting.

    take look at :
    http://sourceforge.net/projects/jaxme/
    this might help...

  • Redemption Code entered correctly does not generate serial number.

    I am having a difficult time obtaining a serial number for Adobe Acrobat XI Pro.  I purchased a boxed package from a local retailer.  Inside the box is a redemption code that upon entering, a serial number is supposed to be generated.  I made sure to be careful of ones and zeroes, to not mistake them for "I"s and "O"s .  Upon entering the Red/Cd I receive a message that the retailer has not activated the software purchase.  I go back to the retailer, tell them my issue and they exchange my s/w for a new box.  I get home and the same problem occurs.  My question:  has Adobe changed the process for obtaining a serial number from a boxed software purchase?  This is utterly frustrating.  I cannot understand why Adobe would have a process for obtaining a serial number for legitimately purchased software that does not work.  Any help would be appreciated.  Please forgive me if I posted this to the wrong forum.

    From Adobe support: "You cannot redeem the redemption code,it has to be redeemed by us".  They handled the code redemption, the serial number retrieval and the product registration during my chat session.  I asked the question what is the purpose of providing an enclosed redemption code and that question went unanswered.  At the end of the day, I was able to get my serial number and activate the software.  

  • Need to generate "n" number of files if value of a field say "B" is "n"

    Hi,
    I have a Proxy to file scenario,where I need to generate "n" number of files if value of a field say "B" is "n".
    My source structure is :
    Source
       A
       B
       C
    Source
    How can I do it,all the rest field values will be same in the all the files ,except 1 filed which will increase from 1 to "n" from 1st file to last file.
    Regards,
    Sri
    Edited by: sriparna on Feb 27, 2012 11:28 AM
    Edited by: sriparna on Feb 27, 2012 11:28 AM
    Edited by: sriparna on Feb 27, 2012 11:29 AM

    Dear Sriparna
    First step is to create a UDF (user defined function). Create One input and create two output varaibles for this UDF.
    It will have two objectives
    1. to create source node of the target message (output1_
    2. to create the node B for the target side
    As per your requirement you need to create the Source Node of the target message as per the value of B ( if 2 then two source nodes at target)
    In the UDF take B as input
    int b = B[0];
    for(int i=0;i<b;i++)
      output1.addValue(" "); //you need to map this out put with the source node of your target
      output2.addValue(i+1); // this field should be mappoed with the field B of target
    Hope this clears your confusion
    @ gagan: for a requirement like this handling the logic in mapping is the right way to do, I dont think we should go for OS commands

  • Me_process_po_cust badi for generating internal number range in me21n tcode

    Hi all,
    I have requirement while creating purchase order my client want to generate internal number range based on company code,document type and plant.here, we are making one custom table to hold compny code,plant,doc.type and Number range number.I am using me_process_po_cust badi for the same.I got the po header and item data from this badi.my problem is how i can pass this number range number in me21n to respective fields.
    Regards,
    Sleela Patil

    Hi,
    Thank u both of you..I tried that exit.following is the code I have written for that exit.
    TABLES: T001K,NRIV,EKKO,ZVS_MM_RANGE.
    DATA: WA_TAB TYPE ZVS_MM_RANGE,
          WERKS LIKE T001W-WERKS.
    GET PARAMETER ID 'WRK' FIELD WERKS.
    SELECT SINGLE * FROM T001K
                    WHERE BUKRS EQ NEKKO-BUKRS.
    IF SY-SUBRC EQ 0.
      SELECT SINGLE * FROM ZVS_MM_RANGE
                      INTO WA_TAB
                      WHERE BUKRS EQ NEKKO-BUKRS
                      AND WERKS EQ WERKS    "T001K-BWKEY
                      AND BSART EQ NEKKO-BSART.
      IF SY-SUBRC EQ 0.
        MOVE: NEKKO-EBELN TO NUMBER,
              WA_TAB-NRRANGENR TO RANGE.
      ELSE.
        MESSAGE 'Please maintain Number range in table zvs_mm_range' TYPE 'E'.
      ENDIF.
    ENDIF.
    Here, I am getting data as I needed but problem is client having multiple plant for single company code.I am not able to capture plant in this exit.as, it is in item level.so,later on tried to do it using me_process_po_cust badi.
    Now my problem is that how to pass this number range number in me23n tansaction.
    Regards,
    Sheela Patil

  • In this report i have marked one line..if this width 30,i need to multiply by a number 0.3 and if the width =30,it multiplies by 0.37...how to use this logic here..??? anyone can help??

    In this report i have marked one line..if this width < 30,i need to multiply by a number 0.3 and if the width >=30,it multiplies by 0.37...how to use this logic here..??? anyone can help??
    Declare @FromDate Datetime
    Declare @ToDate Datetime
    Declare @SCCode nvarchar(30)
    select @FromDate = min(S0.Docdate) from dbo.OINM S0 where S0.Docdate >='[%0]'
    select @ToDate = max(S1.Docdate) from dbo.OINM s1 where S1.Docdate <='[%1]'
    --Rcpt from PRDN (Condition checked for Return component exclusion also)
    SELECT T2.U_STKNO as 'PRN No', T2.PostDate as Date,
    T2.DocNum AS 'WorkOrderNo',
    b.DocNum as 'Issue Doc No',
    ISNULL(d.DocNum,'') as 'Receipt Doc No',
    b.U_IssPSCName as 'SubContractor Name',
    T2.ItemCode as 'FG Item Code',
    T3.ItemName as 'FG Item Name',
    T2.PlannedQty as 'FG Planned Qty',
    T2.U_OD as 'OD',
    T2.U_ID as 'ID',
    T2.U_OD/25.4 as 'Inches',
    (T2.U_OD-T2.U_ID)/2 as 'Width',
    0 as 'FG Pending Qty',
    0 as 'FG Receipt Qty',
    '' as 'Issue Item Code',
    '' as 'Issue Item Name',
    Sum(ISNULL(a.Quantity,0)) as 'Total Issue Quantity',
    0 as 'Issue Item - Return Quantity',
    '' as 'Return Doc No',
    SUM(ISNULL(a.U_IssPTotWeight,0)) as 'Total Issue Weight',
    SUM(ISNULL(c.U_Quantity,0)) as 'Total Receipt Weight'
    from OWOR T2 inner join WOR1 T4 on T2.DocEntry = T4.DocEntry
    INNER JOIN OITM T1 ON T1.ItemCode = T4.ItemCode inner join OITM T3 on T3.ItemCode = T2.ItemCode
    LEFT join IGE1 a on T2.DocNum = a.BaseRef Inner JOIN OIGE b on a.DocEntry = b.DocEntry and T4.ItemCode not in (a.ItemCode)
    LEFT JOIN IGN1 c ON c.BaseRef = T2.DocNum and T2.ItemCode = c.ItemCode INNER JOIN OIGN d on c.DocEntry = d.DocEntry
    WHERE b.Series in('101','20') and T2.PostDate >= @FromDate and T2.PostDate <= @ToDate and b.U_IssPSCName = '[%2]'
    GROUP BY T2.U_STKNO, T2.PostDate, T2.DocNum, b.DocNum, d.DocNum, b.U_IssPSCName,T2.ItemCode,T3.ItemName,T2.PlannedQty,T2.U_OD,T2.U_ID, T2.U_OD/25.4,(T2.U_OD-T2.U_ID)/2
    UNION ALL
    SELECT T2.U_STKNO as 'PRN No', T2.PostDate as Date,
    T2.DocNum AS 'WorkOrderNo',
    b.DocNum as 'Issue Doc No',
    ISNULL(d.DocNum,'') as 'Receipt Doc No',
    b.U_IssPSCName as 'SubContractor Name',
    T2.ItemCode as 'Item Code',
    T3.ItemName as 'Item Name',
    T2.PlannedQty as 'Planned Qty',
    T2.U_OD as 'OD',
    T2.U_ID as 'ID',
    T2.U_OD/25.4 as 'Inches',
    (T2.U_OD-T2.U_ID)/2 as 'Width',
    (Select (T2.PlannedQty - (Select ISNULL(sum(a1.Quantity),0) from IGN1 a1 inner join OWOR b1 on a1.BaseRef = b1.DocNum and a1.ItemCode in (b1.itemcode) where b1.DocNum = t2.DocNum))) as 'Pending Qty',
    (Select ISNULL(sum(a1.Quantity),0) from IGN1 a1 inner join OWOR b1 on a1.BaseRef = b1.DocNum and a1.ItemCode in (b1.itemcode) where b1.DocNum = t2.DocNum) as 'Receipt Qty',
    a.ItemCode as 'Issued Item Code',
    a.Dscription as 'Issued Item Name',
    Sum(ISNULL(a.Quantity,0)) as 'Total Issue Quantity',
    (Select (Select ISNULL(sum(a1.Quantity),0) from IGN1 a1 inner join OWOR b1 on a1.BaseRef = b1.DocNum inner join WOR1 b2 on b1.DocEntry = b2.DocEntry where b1.DocNum = t2.DocNum and a1.ItemCode in (b2.itemcode))) as 'Issue Item - Return Quantity',
    (ISNULL((Select (Select a2.DocNum from OIGN a2 where a2.DocEntry = a1.DocEntry) from IGN1 a1 inner join OWOR b1 on a1.BaseRef = b1.DocNum inner join WOR1 b2 on b1.DocEntry = b2.DocEntry where b1.DocNum = t2.DocNum and a1.ItemCode in (b2.itemcode)),'')) as 'Return Doc No',
    SUM(ISNULL(a.U_IssPTotWeight,0)) as 'Total Issue Weight',
    SUM(ISNULL(c.U_Quantity,0)) as 'Total Receipt Weight'
    from OWOR T2 inner join WOR1 T4 on T2.DocEntry = T4.DocEntry
    INNER JOIN OITM T1 ON T1.ItemCode = T4.ItemCode inner join OITM T3 on T3.ItemCode = T2.ItemCode
    LEFT join IGE1 a on T2.DocNum = a.BaseRef Inner JOIN OIGE b on a.DocEntry = b.DocEntry and T4.ItemCode in (a.ItemCode)
    LEFT JOIN IGN1 c ON c.BaseRef = T2.DocNum and T2.ItemCode = c.ItemCode LEFT JOIN OIGN d on c.DocEntry = d.DocEntry 
    WHERE b.Series in('101','20') and T2.PostDate >= @FromDate and T2.PostDate <= @ToDate and b.U_IssPSCName = '[%2]'
    GROUP BY T2.U_STKNO, T2.PostDate, T2.DocNum, b.DocNum, d.DocNum, b.U_IssPSCName,T2.ItemCode,T3.ItemName,T2.PlannedQty,T2.U_OD,T2.U_ID,T2.U_OD/25.4,(T2.U_OD-T2.U_ID)/2,a.ItemCode,a.Dscription    order by T2.DocNum desc

    Hi,
    Try this:
    Declare @FromDate Datetime
    Declare @ToDate Datetime
    Declare @SCCode nvarchar(30)
    select @FromDate = min(S0.Docdate) from dbo.OINM S0 where S0.Docdate >='[%0]'
    select @ToDate = max(S1.Docdate) from dbo.OINM s1 where S1.Docdate <='[%1]'
    --Rcpt from PRDN (Condition checked for Return component exclusion also)
    SELECT T2.U_STKNO as 'PRN No', T2.PostDate as Date,
    T2.DocNum AS 'WorkOrderNo',
    b.DocNum as 'Issue Doc No',
    ISNULL(d.DocNum,'') as 'Receipt Doc No',
    b.U_IssPSCName as 'SubContractor Name',
    T2.ItemCode as 'FG Item Code',T3.ItemName as 'FG Item Name',T2.PlannedQty as 'FG Planned Qty',T2.U_OD as 'OD',T2.U_ID as 'ID',T2.U_OD/25.4 as 'Inches',(T2.U_OD-T2.U_ID)/2 as 'Width',case when ((T2.U_OD-T2.U_ID)/2) <30 then ((T2.U_OD-T2.U_ID)/2) *0.3 end, 0 as 'FG Pending Qty',0 as 'FG Receipt Qty','' as 'Issue Item Code','' as 'Issue Item Name',Sum(ISNULL(a.Quantity,0)) as 'Total Issue Quantity',0 as 'Issue Item - Return Quantity','' as 'Return Doc No',SUM(ISNULL(a.U_IssPTotWeight,0)) as 'Total Issue Weight',SUM(ISNULL(c.U_Quantity,0)) as 'Total Receipt Weight'from OWOR T2 inner join WOR1 T4 on T2.DocEntry = T4.DocEntryINNER JOIN OITM T1 ON T1.ItemCode = T4.ItemCode inner join OITM T3 on T3.ItemCode = T2.ItemCodeLEFT join IGE1 a on T2.DocNum = a.BaseRef Inner JOIN OIGE b on a.DocEntry = b.DocEntry and T4.ItemCode not in (a.ItemCode)LEFT JOIN IGN1 c ON c.BaseRef = T2.DocNum and T2.ItemCode = c.ItemCode INNER JOIN OIGN d on c.DocEntry = d.DocEntryWHERE b.Series in('101','20') and T2.PostDate >= @FromDate and T2.PostDate <= @ToDate and b.U_IssPSCName = '[%2]'GROUP BY T2.U_STKNO, T2.PostDate, T2.DocNum, b.DocNum, d.DocNum, b.U_IssPSCName,T2.ItemCode,T3.ItemName,T2.PlannedQty,T2.U_OD,T2.U_ID, T2.U_OD/25.4,(T2.U_OD-T2.U_ID)/2UNION ALL SELECT T2.U_STKNO as 'PRN No', T2.PostDate as Date,T2.DocNum AS 'WorkOrderNo',
    b.DocNum as 'Issue Doc No',
    ISNULL(d.DocNum,'') as 'Receipt Doc No',
    b.U_IssPSCName as 'SubContractor Name',
    T2.ItemCode as 'Item Code',T3.ItemName as 'Item Name',T2.PlannedQty as 'Planned Qty',T2.U_OD as 'OD',T2.U_ID as 'ID',T2.U_OD/25.4 as 'Inches',(T2.U_OD-T2.U_ID)/2 as 'Width',case when ((T2.U_OD-T2.U_ID)/2) >=30 then ((T2.U_OD-T2.U_ID)/2) *0.37 end, (Select (T2.PlannedQty - (Select ISNULL(sum(a1.Quantity),0) from IGN1 a1 inner join OWOR b1 on a1.BaseRef = b1.DocNum and a1.ItemCode in (b1.itemcode) where b1.DocNum = t2.DocNum))) as 'Pending Qty',(Select ISNULL(sum(a1.Quantity),0) from IGN1 a1 inner join OWOR b1 on a1.BaseRef = b1.DocNum and a1.ItemCode in (b1.itemcode) where b1.DocNum = t2.DocNum) as 'Receipt Qty',
    a.ItemCode as 'Issued Item Code',
    a.Dscription as 'Issued Item Name',
    Sum(ISNULL(a.Quantity,0)) as 'Total Issue Quantity',
    (Select (Select ISNULL(sum(a1.Quantity),0) from IGN1 a1 inner join OWOR b1 on a1.BaseRef = b1.DocNum inner join WOR1 b2 on b1.DocEntry = b2.DocEntry
    where b1.DocNum = t2.DocNum and a1.ItemCode in (b2.itemcode))) as 'Issue Item - Return Quantity',
    (ISNULL((Select (Select a2.DocNum from OIGN a2 where a2.DocEntry = a1.DocEntry) from IGN1 a1 inner join OWOR b1 on a1.BaseRef = b1.DocNum inner join WOR1 b2 on b1.DocEntry = b2.DocEntry where b1.DocNum = t2.DocNum and a1.ItemCode in (b2.itemcode)),'')) as 'Return Doc No',
    SUM(ISNULL(a.U_IssPTotWeight,0)) as 'Total Issue Weight',
    SUM(ISNULL(c.U_Quantity,0)) as 'Total Receipt Weight'
    from OWOR T2 inner join WOR1 T4 on T2.DocEntry = T4.DocEntry
    INNER JOIN OITM T1 ON T1.ItemCode = T4.ItemCode inner join OITM T3 on T3.ItemCode = T2.ItemCode
    LEFT join IGE1 a on T2.DocNum = a.BaseRef Inner JOIN OIGE b on a.DocEntry = b.DocEntry and T4.ItemCode in (a.ItemCode)
    LEFT JOIN IGN1 c ON c.BaseRef = T2.DocNum and T2.ItemCode = c.ItemCode LEFT JOIN OIGN d on c.DocEntry = d.DocEntry
    WHERE b.Series in('101','20') and T2.PostDate >= @FromDate and T2.PostDate <= @ToDate and b.U_IssPSCName = '[%2]'
    GROUP BY T2.U_STKNO, T2.PostDate, T2.DocNum, b.DocNum, d.DocNum, b.U_IssPSCName,T2.ItemCode,T3.ItemName,
    T2.PlannedQty,T2.U_OD,
    T2.U_ID,T2.U_OD/25.4,(T2.U_OD-T2.U_ID)/2,a.ItemCode,a.Dscription  
    order by T2.DocNum desc
    Thanks & Regards,
    Nagarajan

  • How do I add an area code to a phone number after clicking number in text message?

    Some people send 7 digit phone number in emails and text messages, and I need to add the area code to the front of the number, or else AT&T will choke. I have not found a simple way to do this.
    Current method: copy number to notes, add area code, then paste full number into dialer

    Any carrier in the U.S. will choke unless the number is in your area code.
    I'm not aware of a way to do this. Selecting the number dials the number.

  • I had Net10 Wireless, What information do i need to transfer my net10 number to my new iPhone 5 through T-mobile?

    So i had Net10 on a 3GS Phone, im buying a new iPhone 5 through T-mobile on Tuesday, What information from Net10 do i need to transfer my phone number to the NEW iPhone 5 through T-mobile?

    Further info:
    The FCC requires all simple ports, which yours is, to be completed in one business day & NET10 cannot refuse to port the number for any reason, but, they are permitted to charge for processing the port on their end. Your new carrier, T-Mobile starts the porting process. The FCC recommends you provide your new carrier with account number & zip code, in addition to phone number, but such additional info is not required.

  • Need Code for book publishing in BPC

    Does anyone have any VBA code for generating multiple report tabs?  This would take the place of book publishing since I do not want to create PDFs or HTML reports, but rather spreadsheets.

    I am just noticing this -   did you resolve your issue?   You basically need to write the code.
    Edited by: Deborah Silverman on Mar 16, 2009 7:30 PM

  • Java code to generate XML File from XML Schema

    Hi I need this asap... "Java code to generate XML File from XML Schema i.e XML Schema Definition, XSD file".
    Thankz in advance...

    JAXB has been available as an early release download for some time. There are also XML Binding packages available from Borland (JBuilder) and Castor. These tools create Java classes from a source document, xml,dtd etc. You can use these classes to marshal-unmarshal XML documents.
    Dave

  • Vat code change, EDI file number finding and EDI file structure chage?

    Hello Gurus
    Our client has a plant in Europe, which has a largest supplier. We process electronic invoices to the vendor through a provider OB10 ( private company - invoicing provider ).
    In the transfer of the electronic data to the invoice posting, a VAT code is added to the details, that appears to be pulling from a certain Table in the system.
    I want to know from which tables this field has pulled up to the Invoice?
    In continuation of the process ...I have come across an issue on EDI file structure change. I have provided with the the Idoc numbers of above invoices, from the idoc numbers i need to find out the EDI file number. But when i went to WE02, WE05 with those idoc numbers i couldn't find the EDI file number( Interchange file number ref).
    How can i find the EDI file number and i have to suggest the EDI team for changing the file structure in regard to the VAT code updating according to the Plants abroad function.
    What are the things i need to suggest them exactly in regard to this?
    Please reply me ASAP...
    Thanks
    Mallik

    The table for tax code is T076M - maintainable using T code OBCD.  For EDI file number, execute T Code WE02 - enter IDoc number and execute (F8). In the right window pane, choose select layout -> change layout and pick up the field Interchange file reference. Guess this is what you are looking for.
    OR
    Go to transaction WE02 or WE05 enter Idoc number and choose execute. When Idoc data is displayed double click on Control Record in left pane. Choose Details tab. Interchangable file under References.
    You can also refer the entries in table EDIDC.
    Reference to interchange file:
    This field contains the reference number of the interchange file in which the EDI message was transmitted.

  • BAPI_ACC_DOCUMENT_POST & generated document number

    Hi,
    I am using BAPI function BAPI_ACC_DOCUMENT_POST to post financial documents in the system. My question is, how properly retrieve generated document number (BKPF-BELNR). We are using internal document number generation so the function generates document number. But, function itself, does not return generated document number. Currently, after commit I try to locate a record of generated document using reference key ... Isn't there any better way how to get generated document number?
    Tkank you.

    Yes, I found this code ... as I wrote, there is not problem if I set curtp = '10'. BUT, there is another problem, with different currencies. Then, when I try to post document in different currency that the currency of company code is, function raises error "Inconsistent currency information" ...
    here is an example, how I fill tax information, as requested:
    DATA:   docHeader     TYPE BAPIACHE09,
            accGL         LIKE BAPIACGL09 OCCURS 0 WITH HEADER LINE,
            accReceivable LIKE BAPIACAR09 OCCURS 0 WITH HEADER LINE,
            accAmnt       LIKE BAPIACCR09 OCCURS 0 WITH HEADER LINE,
            accTax        LIKE BAPIACTX09 OCCURS 0 WITH HEADER LINE,
            extension     LIKE BAPIACEXTC OCCURS 0 WITH HEADER LINE,
            tax_account   TYPE STRING,
            tax_code      TYPE STRING,
            tax_trans     TYPE STRING,
            tax_spec      LIKE ZIFPRMS-VALUE,
            itemno        TYPE N LENGTH 10.
    * initialize document header
      docHeader-bus_act    = 'RFBU'.
      docHeader-username   = sy-uname.
      docHeader-header_txt = fin_data-text.
      docHeader-comp_code  = header-company_code.
      docHeader-doc_date   = header-document_date.
      docHeader-pstng_date = fin_data-posting_date.
      docHeader-ref_doc_no = header-id_sale.
      docHeader-doc_type = params-doc_type.
    * process document items, in loop
      LOOP AT fin_items INTO fin_item.
    * initialize AR (line 1)
         accReceivable-itemno_acc = itemno.
         accReceivable-customer   = cus_data-id_contact.
         accReceivable-comp_code = header-company_code.
         CONCATENATE fin_item-text ' (receivable)' INTO accReceivable-item_text.
         accReceivable-pmnttrms = params-payment_term.
         accReceivable-pmnt_block = params-payment_block.
         IF doc_type = 'APR'.
            accReceivable-sp_gl_ind = 'F'.
         ENDIF.
         APPEND accReceivable.
    * initialize receivable amount
         accAmnt-itemno_acc = itemno.
         accAmnt-currency = fin_data-currency.
         accAmnt-curr_type = '10'.
         accAmnt-amt_doccur = fin_item-vat_base + fin_item-vat.
         IF doc_type(2) = 'CR'.
            accAmnt-amt_doccur = accAmnt-amt_doccur * ( -1 ).
         ENDIF.
         APPEND accAmnt.
         itemno = itemno + 1.
    * do not continue when posting a down payment request
         CHECK doc_type < > 'APR'.
    * initialize GL account line item
         accGL-itemno_acc = itemno.
         accGL-gl_account = params-doc_gl_account.
         CONCATENATE fin_item-text ' (revenue)' INTO accGL-item_text.
         accGL-pstng_date = fin_data-posting_date.
         accGL-tax_code = tax_code.
         accGL-doc_type = params-doc_type.
         accGL-costcenter = fin_item-cost_centre.
         APPEND accGL.
    * initialize GL amount
         accAmnt-itemno_acc = itemno.
         accAmnt-currency = fin_data-currency.
         accAmnt-curr_type = '10'.
         accAmnt-amt_doccur = - ( fin_item-vat_base ).
         IF doc_type(2) = 'CR'.
            accAmnt-amt_doccur = accAmnt-amt_doccur * ( -1 ).
         ENDIF.
         APPEND accAmnt.
         itemno = itemno + 1.
    * initialize TAX account line item
         IF STRLEN( tax_code ) > 0.
            accTax-itemno_acc = itemno.
            accTax-gl_account = tax_account.
            accTax-tax_code   = tax_code.
            accTax-cond_key   = 'MWAS'.
            APPEND accTax.
    * initialize tax amount
            accAmnt-itemno_acc = itemno.
            accAmnt-currency = fin_data-currency.
            accAmnt-curr_type = '10'.
            accAmnt-amt_doccur = - ( fin_item-vat ).
            accAmnt-amt_base = - ( fin_item-vat_base ).
            IF doc_type(2) = 'CR'.
               accAmnt-amt_doccur = accAmnt-amt_doccur * ( -1 ).
               accAmnt-amt_base = accAmnt-amt_base * ( -1 ).
            ENDIF.
            APPEND accAmnt.
            itemno = itemno + 1.
         ENDIF.
      ENDLOOP.
    * translate customer field to BAPI format
      CALL FUNCTION 'MAP2E_BAPICOBL_CI_TO_BAPIEXTC'
         TABLES    INTERNAL_CI_COBL      = cust_ext
                   EXTENSION_CODINGBLOCK = extension.
    * call BAPI function to create customer invoice
      CALL FUNCTION 'BAPI_ACC_DOCUMENT_POST'
         EXPORTING DOCUMENTHEADER = docHeader
         IMPORTING OBJ_TYPE = obj_type
                   OBJ_KEY  = obj_key
                   OBJ_SYS  = obj_sys
         TABLES    ACCOUNTGL = accGL
                   ACCOUNTRECEIVABLE = accReceivable
                   ACCOUNTTAX = accTax
                   CURRENCYAMOUNT = accAmnt
                   EXTENSION1 = extension
                   RETURN = returnTab.
    Edited by: Rastislav Mojzis on Jul 9, 2008 7:18 AM

  • Generating Symbolic Number at the time of Syndication

    Hi! All
    I have the following user requirement:
    The Material number in one of the client system is in the following format-
    70000-00001, which is a symbolic number. There are already 54000 records in that particular system. These records needs to be cleaned by MDM and then syndicated back to the respective system with the number being generated in the same format ie. symbolic number and also if any record is added further, it should  generate the number in the ascending order. For Eg. 70000-00001, 70000-00002, 70000-003, etc.
    Please suggest me the best possible solution. Thanks in advance for the same.
    With Best Regards,
    Devendra Pandey

    hi,
    if you have AUTO ID field in the main table. It will generate number for each record in the ascending order only.
    for example:
    700000-00001 for this record the auto id is  001 .
    when ever you are syndicating, you can use Cust Items property in the syndicator ( concatenation of two fields).
    you can set custom delimiter for custom items.
    EX:
    1.create a custom item( ex: custom number ), in that custom tab, you can create the formula, click on that formula,
    2.select the fields, you want to concatinate, ( in our example: material number and auto ID,), this custom filed you find in the source items.
    3.map this Concatinated field to Destination item.
    4.and you can synicate
    hope this may help you,
    Regards,
    Srinivas

  • Reg: Generating  custom number instead of system generated no in ME21n

    Hi Experts,
                      I need to know user exits or Badi to generate custom number instead of system generated number while saving p.o ME21n transaction.
    Regards,
    Vikram.S

    Vikram,
    Instead of doing it programatically , ypu can satisfy your requirement in configuration settings.
    check SPRO with the help of functional consultant.

Maybe you are looking for

  • Can't get iTunes "Home Sharing" to work...

    Before we switched to FIOS, we had Comcast and the Home Sharing on iTunes worked fine.  Now, some setting must be different because I can't get the libraries from 2 different computers to "talk" to each other.  I have all the settings in iTunes corre

  • Print Server 2012 R2

    Hi, I am planning to implementation of Print server 2012 r2, but I am little confusion, below futures are available in 2012 r2? Machine Name User Name Document Name Date /Time Printer Name Page count  Limitation of printing  Thanks,

  • Drop Zone Editor

    I can not re order the positions of images in the drop zone editor. Instriuctions say to click and drag an image to a new position but this is not working for me. Is anyone else having this problem? --ken

  • Calling a procedure in the loop

    Just want to know one thing : I am calling a procedure with the following parameters DECLARE     PROFIT_CENTER NUMBER; BEGIN   PROFIT_CENTER:= 1109 --( Similarly I am running the proc for 5 more profit_centers 1123,1132,1122,3211,1111 one by one by p

  • Cannot update PB00 with COND_A or INFREC

    I'm trying to update the pricing condition PB00, but COND_A is not getting it done.  The idoc posts successfully, but the price doesn't update.  Could there be required fields I'm not populating?  I've taken care of all the obvious ones.