Updating a new field in an Interactive Report

I created an Interactive Report based on a table. I recently had to add a new field to the table, I was able to make the IR report show the new field. However, when I go the form page to create a new record I get this error:
ORA-06550: line 1, column 89: PL/SQL: ORA-00904: "BUDGET_MONTHLY_AMOUNT": invalid identifier ORA-06550: line 1, column 7: PL/SQL: SQL Statement ignored
If I run the Update process, I do not get any errors but the record does not get updated.
By looking at the DML process' source, I don't see where (if at all) I need to make changes.
Has anybody else seen this? Any help is greatly appreciated.

Hello Omar.
At this time you cannot retrospectively add a table based column to an IRR once you have created the IRR.
You will have to delete the IRR and recreate it i n order for your new column to appear.
It is for this reason that we typically construct report regions using the 'Classic' report format until the users have confirmed the content is correct. Then we convert it to an IRR.
Kind regards
Simon Gadd

Similar Messages

Enabling Update of New Fields for Provisioning

hai all,
I am using Microsoft Active Directory User Management Release 9.1.1.x (MSFT_AD_Base_9.1.1.7.0), i am following this procedure
http://download.oracle.com/docs/cd/E11223_01/doc.910/e11197/extnd_func.htm#CIHEDAEF
and I have configured all that is mentioned in the section "Enabling Update of New Fields for Provisioning" but unfortunately when I update the value of the Employee ID it is not reflected in the AD, whereas the Provisioning and Reconciliation is working perfect, the values of Employee ID field are going to the AD from IDM while provisioning new user, as well as being reconciled to IDM if updated in the AD. But if I edit user in IDM and update the employee id it is not going to AD and there is no error shown, its like this adapter is not running at all.
Can any one tell me what am i missing to make the adapter run and update the values in to the AD. AD is my trusted source.
Thanks all
Edited by: 828703 on Jul 5, 2011 6:24 AM

please let me know if there is anything additional to be done, other then following?
http://download.oracle.com/docs/cd/E11223_01/doc.910/e11197/extnd_func.htm#CIHEDAEF
I have followed step by step...... still no luck..... :(
I need to update the record from the Process form only....
one more thing that on the process definition in the Offline Flag is set to 0 for the employee update task is this the issue? I have also tried with the offline flag value 1 (check the offline checkbox = true) still no effect.
thanks......
Edited by: 828703 on Jul 6, 2011 10:40 PM

GenIL Model Attribute Structure not getting updated with new fields added

Hi All,
I have modelled the service interface using GenIL Modelling in Duet Enterprise 1.0. Later, I added some fields to the read operation in the Enterprise Services Builder in the ESR system.
But in the Read Operation mapper method "/IWFND/IF_SRD_BOP_MAP_GET_OBJ~MAP_POST_GET_OBJECTS", when I try to define an object of type GenIL model Attribute Structure (ZMDLZPRGET_DETAIL), Iam unable to access the newly added fields in the read operation.
In transaction " GENIL_MODEL_EDITOR ", under Root Objects, when I open the Attribute Structure name, only the old fields are available, newly added fields are not updated.
But I was able to see the newly added fields in the READ OPERATION data types of Enterprise Services Browser in SE80.
Please help me how to update the new fields for GenIL Model Attribute Structure(ZMDLZPRGET_DETAIL).
Thanks,
Kris

Hi sap_wiz,
Thanks for your reply.
My problem solved,
Thanks
Kris

Simple way to change color of field in an interactive report

Is there a simple way with css to change the color of a field in an interactive report. I want certain fields to stand out.
Can you provide an example and where the code is inserted in APEX? TY.

jfr620 wrote:
Is there a simple way with css to change the color of a field in an interactive report. I want certain fields to stand out.On what basis?
The appearance of cells based on the report structure can be controlled using CSS: +{message:id=10373505}+
Conditional formatting based on cell values is better handled using the built-in highlighting, or Dynamic Actions/JavaScript, which provide better separation of concerns than generating HTML in the query: +{message:id=10493230}+
(For even better separation, use the Dynamic Action to apply <tt>class</tt>es rather than setting style properties directly, and use separate CSS rules to apply the formatting.)

Addition of new fields in the standard report QM15

Dear Experts,
i need to add new fields to the standard report t.code QM15 which display the list of items: selection of notifications.
the fields i want to add are:
1. batch no
2. Sample no
3. Main vendor
4. text for CDR
plz let me know how can i do this. if any one can help me with screenshoot doc. this is really helpfull.
Thanks
Sachin
Moderator message: "spec dumping", please work yourself first on your requirement.
Edited by: Thomas Zloch on Sep 28, 2011 9:45 AM

Hi,
Have you added the selection text for the field ? also check the activation status.
Regards
Bikas

New column header on Interactive Report

We have an interactive report on a view and when we add a new column to the view, we would need the report to add the header automatically too (without previous deployment). Can this be done in simple manner?
Thanks,
Ricardo

Hi,
I have tested the behavior of the different reports in Apex.
This is the conclusions:
Created a new column in a test table and running directly the Apex application with the table mapped in three reports:
1- Interactive Report:
- No errors in the report when you open it but the new column is not showed.
2- Classical Report with default options:
- Errors showed when you open it (ora-01403 No data found)
3- Classical Report with the option checked "Use Generic Columns Names":
- It shows automatically the new column in the report.
But still I do not have a solution to solve the problem.
Regards,
Ricardo

How to get a new fields information in a report

Hi Experts
I have added new fields as per sdn blog (/people/khalil.serrhini/blog/2010/08/06/charm--new-fields-in-crmdorder-and-crmdnomonitor-reporting-enhancement--part-a) and it's working fine for me.
Now I want the same information in the report. Please help me how i can get the information in the reports.
Thanks & Regards
Venkat

Hello Venkat,
Maybe the note "1525010 Enhance the transaction monitor in ChaRM: new date fields" can help you.
Best Regards,

Add new field in CMP9 transaction report output

Hi,
I want to add a new field in the CMP9 transaction report output. Is there any way ?
Thanks,
Fract

Hi,
BADI: CYMP_MODIFY_DISPLAY Change of Work Distribution to Personnel Resource Output

To add new field in withholding tax report

Hi Experts,
I have a requirement to add pan no. field in withholding tax reporting in Tax per business Partner.
Can somebody help me how to do it with BADI or User exit.
Thanks in advance
Rahul
Moderator Message: Do some work of your own first. Do not expect others to do your entire work for you
Edited by: kishan P on Oct 28, 2010 10:17 AM

Hi Dheeraj Late,
MESSAGE_TYPE_X is likely kernel problem.
want to update your kernel level up to latest version.
will solve most cases.
Regards,
Padma.

Can we add new field to inventory Warehouse Report

I have to add new field name "Desc in Frgn from Item master data" to inventory Warehouse Report
How can I do that

Hello,
IN print out (PLD) yes, in SAP b1 form not possible.
Regards
János

Creating new .OCE file in Interactive reporting Studio

Hi all,
I was trying to make a new document with a new database connection file, for Essbase on Interactive reporting studio 9.3.1 ( windows 32 bit)
For this purpose I used
connection software: Essbase
Dtaabase : Essbase
But some critical error message was displayed and the process couldn't proceed for user name , Pwd. and Host name.
While going through OTN discussion for this issue I came to know that we need to do the following:
start->All Programs->Hyperion->Reporting and Analysis->Utilities and Administration->Service Configurator->Modules->Local Service Configurator-> [sign in]-> [doubleclick on local service "DAS1_<servername>"]->Data Source->New...->
Connectivity type -- Essbase
Database type -- Essbase
" Signing in" into LSC was not successful still I could progress as shown in above navigation.
However even this could not resolve the issue.Even restarting the server was of no help.
Please help if any of you have the solution.
Thanks in advance....
Please see otn discussion link below for further details:
connect to a essbase database from interactive reporting studio
Edited by: user12973893 on May 14, 2010 3:28 AM

Forgot to mention I installed version 9.2

How to add new fields to standard alv report

Hi,
Tcode(VL10G) .ie.out put list will not showing one new field.I want to add one more field to output list. append the field(VIKP-SDABW) In the SHP_VL10_ITEM structure .And write the logic in the exit LV50R_VIEWG05----
>USEREXIT_PREPARE_LAYOUT_FILL.Please expain what is the process?
Why i have write the code?what logic i will write?
Thanks & Regards,
sairam

FORM ZI004_FIELDCAT_MOULD .
    wa_fieldcat-fieldname = 'ZMLDCDID' .      "Mould Code ID
    wa_fieldcat-tabname   = 'IT_MLDETAILS' .
    wa_fieldcat-outputlen = 40 .
    wa_fieldcat-seltext_l = text-010 .
    APPEND wa_fieldcat TO it_fieldcat.
    CLEAR wa_fieldcat.
    wa_fieldcat-fieldname = 'ZMLDID' .        "Mould ID
    wa_fieldcat-tabname   = 'IT_MLDETAILS' .
    wa_fieldcat-outputlen = 20 .
    wa_fieldcat-seltext_l = text-011 .
    APPEND wa_fieldcat TO it_fieldcat.
    CLEAR wa_fieldcat.
    wa_fieldcat-fieldname = 'ZMLDCODE' .      "Mould Code
    wa_fieldcat-tabname   = 'IT_MLDETAILS' .
    wa_fieldcat-outputlen = 40 .
    wa_fieldcat-seltext_l = text-012 .
    APPEND wa_fieldcat TO it_fieldcat.
    CLEAR wa_fieldcat.
endform.

How to keep hotspot on particular field in alv interactive report

hi all,
i have a small requirement.i developed one interactive alv.in vasic alv wheni click on sales order number it shows secondary alv.but here i would like to keep hotspot symbol so user can understand that he has to click on this sales order number only.
any body can send me the sam ecode please.
thanks,
maheedhar.t

hi...
here is an ALV report i did with hot spot!!
(only a part of my entire report)
tables: marc.
types : begin of DISP,
        SLNO TYPE I,
        werks type MARC-WERKS,
        matnr type MARA-MATNR,
        maktx type MAKT-MAKTx,
        mtart type MARA-MTART,
        volum type MARA-VOLUM,
        ntgew type MARA-NTGEW,
        ersda type MARA-ERSDA,
        laeda type MARA-LAEDA,
        end of DISP.
data : it_disp type table of disp,
       wa_disp type disp.
Data: it_fcat type slis_t_fieldcat_alv,
      wa_fcat type slis_fieldcat_alv.
parameters : p_werks type marc-werks.
IF p_werks IS INITIAL.
MESSAGE I000(Z_errors).
ELSE.
select MARC~WERKS
       MARA~MATNR
       MAKT~MAKTX
       MARA~MTART
       MARA~VOLUM
       MARA~NTGEW
       MARA~ERSDA
       MARA~LAEDA
from
MARC inner join MARA
on marcmatnr = maramatnr
inner join makt
on marcmatnr = maktmatnr
into corresponding fields of table IT_DISP
where marc~werks = p_werks and spras = 'EN'.
IF SY-SUBRC = 0.
PERFORM display.
ELSE.
MESSAGE I001(Z_errors).
ENDIF.
ENDIF.
form display.
LOOP AT IT_DISP INTO WA_DISP.
MOVE SY-TABIX TO WA_DISP-SLNO.
MODIFY IT_DISP FROM WA_DISP TRANSPORTING SLNO.
ENDLOOP.
wa_fcat-col_pos = 1.
wa_fcat-fieldname = 'SLNO'.
WA_fcat-SELTEXT_L = 'SLNO'.
wa_fcat-tabname = 'IT_DISP'.
wa_fcat-ref_fieldname ='SLNO'.
*wa_fcat-ref_tabname = ''.
<b>wa_fcat-hotspot = 'X'.</b>
append wa_fcat to it_fcat.
clear wa_fcat.
the line in bold is wat which wil enable hpt spot for ur ALV display!
try out.
reward if my ans is useful.

Adding a new Field to an existing report

Hi all,
Can anybody tell me, how to add an extra field in existing
report, without changing the basic calulation, which i made
in the same report.
Regards
Hema

okay... that is not a standard program.
sombody developed it.following is my existing code, here in last column i want to add BOM(mast-stlnr) and Component(stpo-idnrk). remaining things are okay.
REPORT ZPOTREND NO STANDARD PAGE HEADING
                  LINE-SIZE 195
                  LINE-COUNT 60(3)
                  MESSAGE-ID Z1.
TABLES: EKBE,
        MARA,
        TCURR.
SELECT-OPTIONS: S_GJAHR FOR EKBE-GJAHR,
                S_BUDAT FOR EKBE-BUDAT DEFAULT SY-DATUM NO-EXTENSION,
                S_MATNR FOR EKBE-MATNR,
                S_WERKS FOR EKBE-WERKS DEFAULT 'CE',
                S_MTART FOR MARA-MTART.
PARAMETERS: X_APP_L TYPE P DECIMALS 2 NO-DISPLAY,
            X_APP_H TYPE P DECIMALS 2 NO-DISPLAY,
            X_DTL   AS CHECKBOX.
DATA: BEGIN OF I_EKBE OCCURS 0,
      BUDAT LIKE EKBE-BUDAT,
      MENGE LIKE EKBE-MENGE,
      DMBTR LIKE EKBE-DMBTR,
      SHKZG LIKE EKBE-SHKZG,
      EBELN LIKE EKBE-EBELN,
      MATNR LIKE EKBE-MATNR,
      WERKS LIKE EKBE-WERKS,
      MTART LIKE MARA-MTART,
      MEINS LIKE MARA-MEINS,
END OF I_EKBE.
DATA: P_EBELN LIKE EKBE-EBELN,
      P_MATNR LIKE EKBE-MATNR,
      P_WERKS LIKE EKBE-WERKS,
      P_MTART LIKE MARA-MTART,
      P_MEINS LIKE MARA-MEINS.
DATA: BEGIN OF YMTH OCCURS 10,
      YYMM(6),
      MTH(3),
      COL TYPE I,
      MENGE LIKE EKBE-MENGE,
      DMBTR LIKE EKBE-DMBTR,
END OF YMTH.
DATA: S_YMTH LIKE YMTH OCCURS 10 WITH HEADER LINE.
DATA: W_YMTH LIKE YMTH OCCURS 10 WITH HEADER LINE.
DATA: G_YMTH LIKE YMTH OCCURS 10 WITH HEADER LINE.
DATA: S_FLAG.                                               "MTART FLAG
DATA: BEGIN OF CDATE,
      YYMM(6),
      DD(2) VALUE '01',
END OF CDATE.
DATA: SDATE LIKE SY-DATUM.
DATA: CMTH(6),
      PMTH(6),
      LMTH1(6),
      LMTH2(6),
      MTH(2).
DATA: W_MENGE LIKE EKBE-MENGE,
      W_DMBTR LIKE EKBE-DMBTR,
      W_MENGE1 LIKE EKBE-MENGE,
      W_DMBTR1 LIKE EKBE-DMBTR,
      W_TOTAL TYPE P DECIMALS 2,
      W_COL TYPE I,
      WTEXT(18),
      APP TYPE P DECIMALS 4,
      APP1 TYPE P DECIMALS 4,
      APP2 TYPE P DECIMALS 4.
PERFORM GET_YMTH.
SELECT P~BUDAT P~MENGE P~DMBTR P~SHKZG P~EBELN P~MATNR P~WERKS
       Q~MTART Q~MEINS
       INTO TABLE I_EKBE
         FROM EKBE AS P INNER JOIN MARA AS Q
       ON P~MATNR = Q~MATNR
       WHERE P~GJAHR IN S_GJAHR
         AND P~BUDAT IN S_BUDAT
         AND P~MATNR IN S_MATNR
         AND P~WERKS IN S_WERKS
         AND P~BEWTP = 'E'
         AND Q~MTART IN S_MTART.
FORMAT INTENSIFIED OFF.
IF X_DTL <> 'X'.
   LOOP AT I_EKBE.
      I_EKBE-EBELN = SPACE.
      MODIFY I_EKBE.
   ENDLOOP.
ENDIF.
SORT I_EKBE BY WERKS MTART MATNR EBELN BUDAT.
LOOP AT I_EKBE.
CMTH = I_EKBE-BUDAT(6).
IF P_WERKS IS INITIAL.
    P_WERKS = I_EKBE-WERKS.
    P_MTART = I_EKBE-MTART.
    P_MATNR = I_EKBE-MATNR.
    P_EBELN = I_EKBE-EBELN.
    P_MEINS = I_EKBE-MEINS.
    PMTH = CMTH.
ENDIF.
IF P_WERKS NE I_EKBE-WERKS.
    PERFORM CHG_MTH.
    PERFORM CHG_MATNR.
    PERFORM CHG_MTART.
    PERFORM CHG_WERKS.
ENDIF.
IF P_MTART NE I_EKBE-MTART.
    PERFORM CHG_MTH.
    PERFORM CHG_MATNR.
    PERFORM CHG_MTART.
ENDIF.
IF P_MATNR NE I_EKBE-MATNR.
    PERFORM CHG_MTH.
    PERFORM CHG_MATNR.
ENDIF.
IF P_EBELN NE I_EKBE-EBELN.
    PERFORM CHG_MTH.
    PERFORM CHG_MATNR.
ENDIF.
IF PMTH NE CMTH.
    PERFORM CHG_MTH.
ENDIF.
IF I_EKBE-SHKZG = 'H'.
    I_EKBE-MENGE = I_EKBE-MENGE * -1.
    I_EKBE-DMBTR = I_EKBE-DMBTR * -1.
ENDIF.
IF I_EKBE-DMBTR NE 0.
    W_MENGE = W_MENGE + I_EKBE-MENGE.
    W_DMBTR = W_DMBTR + I_EKBE-DMBTR.
ENDIF.
ENDLOOP.
PERFORM CHG_MTH.
PERFORM CHG_MATNR.
PERFORM CHG_MTART.
PERFORM CHG_WERKS.
TOP-OF-PAGE.
WRITE:/ SY-DATUM,SY-UZEIT,
          77 'A M T E K   E N G I N E E R I N G   L T D',
          180 'Page', (4) SY-PAGNO.
WRITE: / SY-REPID,
          77 '     Purchase Price Trending Report      ',
          180 SY-UNAME.
write: /78 'From Date', S_BUDAT-LOW, 'To Date', S_BUDAT-HIGH.
SKIP.
WRITE: / 'SBU :', I_EKBE-WERKS,
           '     Material Type :', I_EKBE-MTART.
SKIP.
READ TABLE YMTH WITH KEY YYMM = '999901'.
IF SY-SUBRC EQ 0.
    WRITE AT YMTH-COL ' APP Change'.
ENDIF.
WRITE: /01 'Part No',
          19 'PO No',
          31 'Curr'.
LOOP AT YMTH.
    YMTH-COL = YMTH-COL + 3.
    IF YMTH-YYMM NE '999901'.
      WRITE AT YMTH-COL YMTH-YYMM(4).
      WRITE YMTH-MTH.
    ELSE.
      WRITE AT YMTH-COL '       %'.
    ENDIF.
ENDLOOP.
ULINE.
*&      Form get_ymth
      text
--> p1        text
<-- p2        text
FORM GET_YMTH.
CMTH = S_BUDAT-HIGH(6).
PMTH = S_BUDAT-LOW(6).
IF S_BUDAT-HIGH IS INITIAL.
    CMTH = PMTH.
ELSEIF S_BUDAT-LOW IS INITIAL.
    PMTH = CMTH.
ENDIF.
LMTH1 = CMTH.
CDATE-YYMM = CMTH.
SDATE = CDATE.
SDATE = SDATE - 1.
LMTH2 = SDATE(6).
WHILE PMTH <= CMTH.
    MTH = CMTH+4(2).
    CDATE-YYMM = CMTH.
    YMTH-YYMM = CMTH.
    PERFORM GET_MTH.
    APPEND YMTH.
    SDATE = CDATE.
    SDATE = SDATE - 1.
    CMTH = sdate(6).
ENDWHILE.
YMTH-YYMM = '999901'.
YMTH-MTH = ' % '.
APPEND YMTH.
SORT YMTH BY YYMM.
W_COL = 21.
LOOP AT YMTH.
    W_COL = W_COL + 15.
    YMTH-COL = W_COL.
    MODIFY YMTH.
ENDLOOP.
APPEND LINES OF YMTH TO S_YMTH.
APPEND LINES OF YMTH TO W_YMTH.
APPEND LINES OF YMTH TO G_YMTH.
REFRESH YMTH.
APPEND LINES OF S_YMTH TO YMTH.
ENDFORM.                                                    " get_ymth
*&      Form get_mth
      text
--> p1        text
<-- p2        text
FORM GET_MTH.
CASE MTH.
    WHEN '01'.
      YMTH-MTH = 'Jan'.
    WHEN '02'.
      YMTH-MTH = 'Feb'.
    WHEN '03'.
      YMTH-MTH = 'Mar'.
    WHEN '04'.
      YMTH-MTH = 'Apr'.
    WHEN '05'.
      YMTH-MTH = 'May'.
    WHEN '06'.
      YMTH-MTH = 'Jun'.
    WHEN '07'.
      YMTH-MTH = 'Jul'.
    WHEN '08'.
      YMTH-MTH = 'Aug'.
    WHEN '09'.
      YMTH-MTH = 'Sep'.
    WHEN '10'.
      YMTH-MTH = 'Oct'.
    WHEN '11'.
      YMTH-MTH = 'Nov'.
    WHEN '12'.
      YMTH-MTH = 'Dec'.
ENDCASE.
ENDFORM.                                                    " get_mth
*&      Form chg_matnr
      text
--> p1        text
<-- p2        text
FORM CHG_MATNR.
CLEAR W_TOTAL.
LOOP AT YMTH.
    W_TOTAL = W_TOTAL + YMTH-DMBTR.
ENDLOOP.
IF W_TOTAL = 0.
    EXIT.
ENDIF.
CLEAR: W_DMBTR, W_MENGE, W_DMBTR1, W_MENGE1, APP, APP1, APP2.
READ TABLE YMTH WITH KEY YYMM = LMTH2.
IF SY-SUBRC EQ 0 AND
     YMTH-MENGE NE 0.
    W_DMBTR = YMTH-DMBTR.
    W_MENGE = YMTH-MENGE.
    READ TABLE YMTH WITH KEY YYMM = LMTH1.
    IF SY-SUBRC EQ 0.
      APP = W_DMBTR / W_MENGE.
      APP1 = YMTH-DMBTR / YMTH-MENGE.
      APP2 = ( APP1 - APP ) / APP * 100.
    ENDIF.
ENDIF.
IF X_APP_L IS INITIAL AND
     X_APP_H IS INITIAL.
ELSE.
    IF APP2 < X_APP_L OR
       APP2 > X_APP_H.
      EXIT.
      CLEAR: W_DMBTR, W_MENGE, APP.
      P_MATNR = I_EKBE-MATNR.
      P_EBELN = I_EKBE-EBELN.
      PERFORM CLR_YMTH.
    ENDIF.
ENDIF.
SKIP.
WRITE:/ P_MATNR, ' Amount ',
         'USD'.
LOOP AT YMTH.
   WRITE AT YMTH-COL(12) YMTH-DMBTR NO-ZERO.
ENDLOOP.
WRITE:/(18) ' ', ' Quantity',
        P_MEINS.
LOOP AT YMTH.
   WRITE AT YMTH-COL(12) YMTH-MENGE NO-ZERO.
ENDLOOP.
WRITE:/ P_MATNR(18), P_EBELN, 'USD' UNDER 'Curr'.
LOOP AT YMTH.
    IF YMTH-YYMM NE '999901'.
      CLEAR APP.
      IF Ymth-menge ne 0.
        APP = YMTH-DMBTR / YMTH-MENGE.
      ENDIF.
      WRITE AT YMTH-COL(12) APP.
      READ TABLE S_YMTH WITH KEY YYMM = YMTH-YYMM.
      IF SY-SUBRC EQ 0.
        S_YMTH-MENGE = S_YMTH-MENGE + YMTH-MENGE.
        S_YMTH-DMBTR = S_YMTH-DMBTR + YMTH-DMBTR.
        MODIFY S_YMTH INDEX SY-TABIX.
      ENDIF.
      READ TABLE W_YMTH WITH KEY YYMM = YMTH-YYMM.
      IF SY-SUBRC EQ 0.
        W_YMTH-MENGE = W_YMTH-MENGE + YMTH-MENGE.
        W_YMTH-DMBTR = W_YMTH-DMBTR + YMTH-DMBTR.
        MODIFY W_YMTH INDEX SY-TABIX.
      ENDIF.
    ELSE.
      WRITE AT YMTH-COL(12) APP2.
    ENDIF.
ENDLOOP.
CLEAR: W_DMBTR, W_MENGE, APP.
P_MATNR = I_EKBE-MATNR.
P_EBELN = I_EKBE-EBELN.
PERFORM CLR_YMTH.
ENDFORM.                                                    " chg_matnr
*&      Form chg_mtart
      text
--> p1        text
<-- p2        text
FORM CHG_MTART.
SKIP.
ULINE.
CONCATENATE P_MTART 'Total' INTO WTEXT SEPARATED BY SPACE.
PERFORM PRN_TOT TABLES S_YMTH.
P_MTART = I_EKBE-MTART.
LOOP AT S_YMTH.
    CLEAR: S_YMTH-DMBTR, S_YMTH-MENGE.
    MODIFY S_YMTH.
ENDLOOP.
ENDFORM.                                                    " chg_mtart
*&      Form chg_werks
      text
--> p1        text
<-- p2        text
FORM CHG_WERKS.
CONCATENATE P_WERKS 'Total' INTO WTEXT SEPARATED BY SPACE.
PERFORM PRN_TOT TABLES W_YMTH.
CLEAR: W_DMBTR, W_MENGE, APP.
P_WERKS = I_EKBE-WERKS.
LOOP AT W_YMTH.
    CLEAR: W_YMTH-DMBTR, W_YMTH-MENGE.
    MODIFY W_YMTH.
ENDLOOP.
NEW-PAGE.
ENDFORM.                                                    " chg_werks
*&      Form chg_mth
      text
--> p1        text
<-- p2        text
FORM CHG_MTH.
READ TABLE YMTH WITH KEY YYMM = PMTH.
IF SY-SUBRC EQ 0.
    YMTH-MENGE = W_MENGE.
    YMTH-DMBTR = W_DMBTR.
    MODIFY YMTH INDEX SY-TABIX.
ENDIF.
CLEAR: W_MENGE, W_DMBTR.
PMTH = CMTH.
ENDFORM.                                                    " chg_mth
*&      Form clr_ymth
      text
--> p1        text
<-- p2        text
FORM CLR_YMTH.
LOOP AT YMTH.
    CLEAR: YMTH-DMBTR, YMTH-MENGE.
    MODIFY YMTH.
ENDLOOP.
ENDFORM.                                                    " clr_ymth
*&      Form prn_tot
      text
--> p1        text
<-- p2        text
FORM PRN_TOT TABLES I_YMTH STRUCTURE YMTH.
CLEAR: W_DMBTR, W_MENGE, W_DMBTR1, W_MENGE1, APP, APP1, APP2.
READ TABLE I_YMTH WITH KEY YYMM = LMTH2.
IF SY-SUBRC EQ 0 AND
     I_YMTH-MENGE NE 0.
    W_DMBTR = I_YMTH-DMBTR.
    W_MENGE = I_YMTH-MENGE.
    READ TABLE I_YMTH WITH KEY YYMM = LMTH1.
    IF SY-SUBRC EQ 0.
      APP = W_DMBTR / W_MENGE.
      APP1 = I_YMTH-DMBTR / I_YMTH-MENGE.
      APP2 = ( APP1 - APP ) / APP * 100.
    ENDIF.
ENDIF.
WRITE:/ WTEXT, ' Amount ',
         'USD'.
LOOP AT I_YMTH.
    SELECT SINGLE * FROM TCURR
      WHERE FCURR = 'SGD'
      AND   TCURR = 'USD'.
      I_YMTH-DMBTR = I_YMTH-DMBTR * TCURR-UKURS.
   WRITE AT I_YMTH-COL(12) I_YMTH-DMBTR NO-ZERO.
ENDLOOP.
WRITE:/(18) ' ', ' Quantity'.
LOOP AT I_YMTH.
   WRITE AT I_YMTH-COL(12) I_YMTH-MENGE NO-ZERO.
ENDLOOP.
WRITE:/(18) ' ', ' APP     ', 'USD'.
LOOP AT I_YMTH.
    IF I_YMTH-YYMM NE '999901'.
      CLEAR APP.
      IF I_YMTH-MENGE NE 0.
        APP = I_YMTH-DMBTR / I_YMTH-MENGE.
      ENDIF.
      WRITE AT I_YMTH-COL(12) APP.
    ELSE.
      WRITE AT I_YMTH-COL(12) APP2.
    ENDIF.
ENDLOOP.
ULINE.
CLEAR: W_DMBTR, W_MENGE, APP.
ENDFORM.                    " prn_tot

How to add a new field from SQL to report

Post Author: Auburn
CA Forum: .NET
The field I am wanting to add to my report is not an actual field in SQL. The field is actually a calculation done in the Select statement like this: SELECT (SUM(CASE KILSHEET.Contract WHEN 1 THEN ((TOT_CARC_WEIGHT / 100) * 1.75) ELSE 0 END)) AS LSS here is the actual full SELECT: SELECT Sum(KILSHEET.PAY) As Pay, Sum(KILSHEET.Dead_Pay) As Dead_Pay, Sum(KILSHEET.GRADE_PREM) As Grade_Prem, Sum(KILSHEET.SORT_ADJ) As Sort_Adj, Sum(KILSHEET.SLOWS_PAY) As Slows_Pay, Sum(KILSHEET.RESALES_PAY) As Resales_Pay, Sum(KILSHEET.PLANT_CHARGE) As Plant_Charge, Sum(KILSHEET.OTHER_PREM) As Other_Prem, Sum(KILSHEET.NPB) As NPB, Sum(KILSHEET.SLOW_NPB) AS Slow_NPB, Sum(KILSHEET.RESALE_NPB) AS RESALE_NPB, Sum(KILSHEET.NPPC) AS NPPC, Sum(KILSHEET.SLOW_NPPC) AS SLOW_NPPC, Sum(KILSHEET.RESALE_NPPC) AS RESALE_NPPC, Sum(KILSHEET.NUMB_HEAD) AS NUMB_HEAD, Sum(KILSHEET.WEIGHT_FEE) AS WEIGHT_FEE, Sum(KILSHEET.SLOW_WEIGHT_FEE) AS SLOW_WEIGHT_FEE, Sum(KILSHEET.RESALE_WEIGHT_FEE) AS RESALE_WEIGHT_FEE, Sum(KILSHEET.WEIGHT) AS WEIGHT, Avg(KILSHEET.PER_LEAN)AS PER_LEAN, AVG(KILSHEET.ACTUAL_YIELD_PER) AS ACTUAL_YIELD_PER, AVG(KILSHEET.AVG_BACKFAT) AS AVG_BACKFAT, Sum(KILSHEET.TOT_CARC_WEIGHT) AS TOT_CARC_WEIGHT, Sum(KILSHEET.DIY) AS DIY, Sum(KILSHEET.DEAD) AS DEAD, Sum(KILSHEET.SLOWS) AS SLOWS, Sum(KILSHEET.RESALES) AS RESALES, Sum(KILSHEET.CONDEMNED) AS CONDEMNED, Sum(KILSHEET.DEAD_WEIGHT) AS DEAD_WEIGHT, Sum(KILSHEET.CONDEMNED_WEIGHT) AS CONDEMNED_WEIGHT, Sum(KILSHEET.SLOWS_WEIGHT) AS SLOWS_WEIGHT, Sum(KILSHEET.RESALES_WEIGHT) AS RESALES_WEIGHT, SUM((Kilsheet.TOT_Carc_WEIGHT / 100) * MarketPrice.mkprice) As TotalPrice,(SUM(CASE KILSHEET.Contract WHEN 1 THEN ((TOT_CARC_WEIGHT / 100) * 1.75) ELSE 0 END)) AS LSS FROM KILSHEET LEFT OUTER JOIN marketprice ON KILSHEET.Contract = marketprice.contract AND DATEPART(week, KILSHEET.KILLDATE) = marketprice.mkweek AND DATEPART(year, KILSHEET.KILLDATE) = marketprice.mkyear " & condStr + " " + locStr The problem with this is that my report is a Summary report. It has to summarize multiple fields and the LSS calculation only needs to be calculated for certain records, hence the CASE. Is there a way to add the LSS field to the report without it being physically part of the database? I am really struggling with this and any help would be greatly appreciated. I hope I described this ok.

Post Author: blairwheadon
CA Forum: .NET
This is what SQL Expressions are for. I suggest you try using those (visible in the Field Explorer) to capture custom SQL field logic.
Alterantively you could use a SQL command with your hand-written SQL.
Thanks, Blair

Updating a new field in an Interactive Report

Similar Messages

Maybe you are looking for