Diplaying of ordsys.ordimage field in a Report based on Query
Hi,
I have a table with a ordsys.ordimage field, where I am uploading images. I created a custom report based on that table but I just cant seem to find a way to show images in it. Could anyone please tell me how to do this.
I tried using this
"portal30.wwv_user_utilities.get_intermedia('CP_IMAGE01','CP_IMAGE01','IMAGE',rowid) the_picture " but this does not help at all
Thanks!
vimpi
Hello Prajwal,
It is definely possible !!
If you have already created your query pls paste the same here so that I can help you otherwise. I will give you a general guidelines and you can take it from there..
Using the CASE Statement inside your SELECT you can achieve this.
SELECT T1.ItemCode AS 'Item No.', T1.ItemName AS 'Item Description',
CASE WHEN T1.QryGroup1 = 'N' THEN T0.Price ELSE 0 END 'List Price'
FROM [dbo].[ITM1] T0 INNER JOIN [dbo].[OITM] T1 ON T1.ItemCode = T0.ItemCode WHERE T0.PriceList = 1
Similar Messages
-
Selecting from ORDSYS.ORDImage field
I have a table which contains a photo field of type ORDSYS.ORDImage. I can select images from that table to a report from query wizard, because there in display option you can check "Embed interMedia rich content in the report" -option. That option does not exist in reports from SQL query. So how can I select these images to a normal SQL report?? Is it even possible?
nullDoes somebody have any ideas how to do this?
I also tried to show ORDIMAGE in SQL query based report but with no success.
Thanks in advance! -
Hiding selective fields in a report based on other field in the same report
Hello!
I am trying to create a report of the inventory items. 2 of the fields in the report would be the sale price of the item, and one of the properties (prop1) from the Item Master Property tab.
Depending on whether Prop1 is Y/N, the price of the item should be displayed.
If Prop1 = N, Price is displayed
If Prop1 = Y, Price gets hidden
Using queries, is it possible to create this kind of reports?
I am using SAP 2005b PL 42.
Thanks for any suggestions....
PrajwalHello Prajwal,
It is definely possible !!
If you have already created your query pls paste the same here so that I can help you otherwise. I will give you a general guidelines and you can take it from there..
Using the CASE Statement inside your SELECT you can achieve this.
SELECT T1.ItemCode AS 'Item No.', T1.ItemName AS 'Item Description',
CASE WHEN T1.QryGroup1 = 'N' THEN T0.Price ELSE 0 END 'List Price'
FROM [dbo].[ITM1] T0 INNER JOIN [dbo].[OITM] T1 ON T1.ItemCode = T0.ItemCode WHERE T0.PriceList = 1 -
Print layout designer for develop report based on query
Dear Experts/Gurus,
I am amazing about the manage previous reconciliation report. When I opened it using print layout designer, it looks like the report is not built using query, but I am not sure yet. This is very confusing. I created query similar with manage previous reconciliation (MPR), but when I link the query to print layout and try to make similar format/appearance with MPR report (reconciliation management (system)), it is not success.
Isn't the MPR report built not based on query ? I appreciate your answer. TIA
Rgds,Hi,
I am not sure I understand what's the problem:
Is it the layout that is different or the data?
Regarding the data you can use SQL Profiler (maybe you did?) to find out what queries are fired, but please note that there are some stored procedures in the DB that are used for some specific functions - not sure whether the "MPR" uses any of these.
Then you must include some non-default filter in SQL Profiler...
...but you can also use the logging functionality in B1 for that purpose:
Just activate the logging (see the "log" folder in the B1 subdirectory) in the corresponding config file: choose the option to have the SQLs logged in conjunction with the logging being triggered in all cases (not just error).
Thus you will get all the SQLs - just plain - from the B1 application, but note that it will obviously slow it down!
HTH,
Frank -
Create Report based on Query in SCCM 2012
I have a lot of useful queries, however I would like to create a few reports based on these queries. What is the simple way to do this? I started to create a New Report, but kind of lost after that. Is there a way I can just copy my statement from the
query to a blank report?Execute the WQL query from the queries node in the console and watch smsprov.log on the site server. It should contain the "translated" SQL statement.
Torsten Meringer | http://www.mssccmfaq.de -
Report based on query w/ input variable
Hi,
How can i do a sql report on APEX with an input variable (:P1).
In my tests i've created a sql report then added one text box to the page with name (P1).
When i execute the report it gives me the text box, then i insert the value, press enter and it gives me the result No data found. If i activate the debug i can see, :P1=P1="xpto", so the text box is working fine, but why the report is not generated/displayed?
Thanks In advanceWhen i activate the debug mode this is what i get.
As you can see it seems that the binding is working and it also seems that the query is done because of the message rows loop: 15 row(s), but it doesn't apear any result in the page.
0.06: Computation point: BEFORE_BOX_BODY
0.06: Processing point: BEFORE_BOX_BODY
0.06: Region: Search
Search
0.06: Item: P606_FILENAME TEXT
Search Filename
0.06: Item: P606_GO BUTTON
0.06: Region: Files &P606_TEXT.
Files Ola
0.06: Item: P606_TEXT HIDDEN
0.07: show report
0.07: determine column headings
0.07: parse query as: ADMINSTI
*0.08: binding: ":P606_FILENAME"="P606_FILENAME" value="FLAP_090909.251"*
0.08: print column headings
*0.08: rows loop: 15 row(s)*
no data found
0.08: Computation point: AFTER_BOX_BODY
0.08: Processing point: AFTER_BOX_BODY -
ORDSYS.ORDIMAGE vs BLOB
Dear all,
I've designed a table with an ordsys.ordimage field for images. BIG MISTAKE, because there is no possibility to upload images from a form. I'd like to change it into a BLOB field but an error arises:
"You cannot modify the column definition for types CLOB, NCLOB, BFILE, BLOBand Intermedia Object types(ORDSYS.ORDIMAGE, ORDSYS.ORDAUDIO, ORDSYS.ORDVIDEO). (WWV-17079)"
Could I change it anyhow in order not to build a new table? I have a lot of forms referring to that table and I should change these forms too....(and we know it is pretty difficult)...
I would appreciate any help.
TomasAnd you are possible to display blob from table in form s image item?
I tried this, but it didn't go, can you tell me, how did you do? -
How to build a report on a table containing ORDSYS.ORDIMAGE type?
Hi
I build a table with a column of type ORDSYS.ORDIMAGE then I
build a form using wizard and populate the table by uploading
intermedia type and I can make query on that form and see the
image. But when I build a report using wizard, the report result
shows image data as it is in text format.
Am I doing something wrong or there is another way to make
report on ORDSYS.ORDIMAGE column type.
Thanks.
byeThis could be because, you might have the display type as text
instead of html for this column.
Could you pls verify this by selecting as html and try running
the report. If it still not working then pls post your Portal
Version so that we can verify it out here. Presently, it is
working fine for me.
Thanx,
chetan. -
ORDSYS.ORDIMAGE to BLOB data type in select ??
Is posible to make a SELECT that return a BLOB field from a ORDIMAGE field..??
Example: I have the table XXX :
CREATE TABLE XXX(
image ORDSYS.ORDIMAGE
Now.. I need return the "image" field but like a BLOB field..
It's possible ... ??http://asktom.oracle.com/pls/asktom/f?p=100:11:0::::P11_QUESTION_ID:56973810055298
-
Forms 6i and ordsys.ordimage
i tried to build a form from a table containing an ordsys.ordimage. at first, it looked like it was happening, the forms builder knew all about the little parts of ordsys.ordimage, but when I ran the form, it acted like there were no records (which there are). i tried to build a form displaying only the "normal" fields but it didn't work either. any suggestions?
thanks in advance - burtnevermind -
it works great! i just forgot to commit the whole mess in the sqlplus/plsql session. once i did, everything displayed on the form perfectly. it's really neat. -
Regd: Calculation of TOTAL field in ALV report
Hi All,
We have a scenario that we are not getting the total value for numeric fields in ALV report.
Below i have given the code used for it.
G_KEY = 'X'.
G_NOKEY = SPACE.
G_SUM = 'X'.
G_NOSUM = SPACE.
PERFORM BUILD_FIELDCAT USING 'VBELN' G_KEY G_NOSUM.
PERFORM BUILD_FIELDCAT USING 'BLDAT' G_NOKEY G_NOSUM.
PERFORM BUILD_FIELDCAT USING 'VGBEL' G_KEY G_NOSUM.
PERFORM BUILD_FIELDCAT USING 'POSNR' G_KEY G_NOSUM.
PERFORM BUILD_FIELDCAT USING 'MATNR' G_KEY G_NOSUM..
PERFORM BUILD_FIELDCAT USING 'LFIMG' G_NOKEY G_NOSUM.
PERFORM BUILD_FIELDCAT USING 'VRKME' G_NOKEY G_NOSUM.
PERFORM BUILD_FIELDCAT USING 'NETPR' G_NOKEY G_NOSUM.
PERFORM BUILD_FIELDCAT USING 'BRTWR' G_NOKEY G_NOSUM.
PERFORM BUILD_FIELDCAT USING 'VALUE_INR' G_NOKEY G_SUM.
PERFORM BUILD_FIELDCAT USING 'B_DUTY' G_NOKEY G_SUM.
PERFORM BUILD_FIELDCAT USING 'S_TOTAL1' G_NOKEY G_SUM.
PERFORM BUILD_FIELDCAT USING 'CV_DUTY' G_NOKEY G_SUM.
PERFORM BUILD_FIELDCAT USING 'C_CVD' G_NOKEY G_SUM.
PERFORM BUILD_FIELDCAT USING 'S_TOTAL2' G_NOKEY G_SUM.
PERFORM BUILD_FIELDCAT USING 'C_DUTY' G_NOKEY G_SUM.
PERFORM BUILD_FIELDCAT USING 'S_TOTAL3' G_NOKEY G_SUM.
PERFORM BUILD_FIELDCAT USING 'A_DUTY' G_NOKEY G_SUM.
PERFORM BUILD_FIELDCAT USING 'T_DUTY' G_NOKEY G_SUM.
PERFORM BUILD_LAYOUT.
PERFORM BUILD_DISPLAY.
*& Form DISPLAY
text
FORM BUILD_DISPLAY.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
I_BYPASSING_BUFFER = ' '
I_BUFFER_ACTIVE = ' '
I_CALLBACK_PROGRAM = ' '
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
I_CALLBACK_TOP_OF_PAGE = ' '
I_CALLBACK_HTML_TOP_OF_PAGE = ' '
I_CALLBACK_HTML_END_OF_LIST = ' '
I_STRUCTURE_NAME =
I_BACKGROUND_ID = ' '
I_GRID_TITLE = TEXT-000
I_GRID_SETTINGS =
IS_LAYOUT = IG_LAYOUT
IT_FIELDCAT = IG_FIELDCAT
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT =
IT_FILTER =
IS_SEL_HIDE =
I_DEFAULT = 'X'
I_SAVE = 'A'
IS_VARIANT =
IT_EVENTS =
IT_EVENT_EXIT =
IS_PRINT =
IS_REPREP_ID =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
I_HTML_HEIGHT_TOP = 0
I_HTML_HEIGHT_END = 0
IT_ALV_GRAPHICS =
IT_HYPERLINK =
IT_ADD_FIELDCAT =
IT_EXCEPT_QINFO =
IR_SALV_FULLSCREEN_ADAPTER =
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
TABLES
T_OUTTAB = IG_INBOUND
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. "DISPLAY
*& Form BUILD_FIELDCAT
text
-->G_FIELDNAME text
-->L_KEY text
-->L_SUM text
FORM BUILD_FIELDCAT USING L_FIELDNAME LIKE DD03L-FIELDNAME L_KEY TYPE C L_SUM TYPE C.
CLEAR WG_FIELDCAT_LN.
ADD 1 TO G_COL_POS.
WG_FIELDCAT_LN-REF_TABNAME = 'IG_INBOUND'.
WG_FIELDCAT_LN-FIELDNAME = L_FIELDNAME.
WG_FIELDCAT_LN-KEY = L_KEY.
WG_FIELDCAT_LN-DO_SUM = L_SUM.
WG_FIELDCAT_LN-COL_POS = G_COL_POS.
WG_FIELDCAT_LN-NO_OUT = SPACE.
WG_FIELDCAT_LN-QFIELDNAME = SPACE.
WG_FIELDCAT_LN-HOTSPOT = SPACE.
APPEND WG_FIELDCAT_LN TO IG_FIELDCAT.
ENDFORM. "BUILD_FIELDCAT
*& Form BUILD_LAYOUT
text
FORM BUILD_LAYOUT.
IG_LAYOUT-TOTALS_TEXT = 'Total Amount'.
*IG_LAYOUT-SUBTOTALS_TEXT = 'A'.
IG_LAYOUT-ZEBRA = 'X'.
ENDFORM.
Help and Sugesstions will be much appreciated.
Thanks & Regds.
Ramesh.This is sample program for the same
REPORT Z_50657_ALV_EX2
NO STANDARD PAGE HEADING
LINE-COUNT 65(3)
LINE-SIZE 220
MESSAGE-ID ZZ.
* Type Pools *
TYPE-POOLS: SLIS, ICON.
* Tables *
TABLES: VBAK. "Sales Document Data
* Internal Tables *
* TABLE TO HOLD DATA OF SALES DOCUMENT
DATA: BEGIN OF IT_VBAK OCCURS 0,
VBELN LIKE VBAK-VBELN, "Sales Document
VBTYP LIKE VBAK-VBTYP, "SD document category
AUDAT LIKE VBAK-AUDAT, "Document date (date received/sent)
AUGRU LIKE VBAK-AUGRU, "Order reason (reason for the business)
AUART LIKE VBAK-AUART, "Sales Document Type
NETWR LIKE VBAK-NETWR, "Net Sales Order in Doc. Currency
WAERK LIKE VBAK-WAERK, "SD document currency
ICON TYPE ICON-ID, "traffic lights
END OF IT_VBAK.
* Work Areas *
*WORK AREAS DEFINED FOR ALV'S
DATA: WA_FIELDCAT TYPE SLIS_FIELDCAT_ALV, "field catalog
IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV, "field catalog ITAB
WA_SORT TYPE SLIS_SORTINFO_ALV, "SORT work area
IT_SORT TYPE SLIS_T_SORTINFO_ALV, "SORT ITAB
LAYOUT TYPE SLIS_LAYOUT_ALV, "LAYOUT
WA_FCODE TYPE SLIS_EXTAB, "FUN CODE
I_FCODE_EXTAB TYPE SLIS_T_EXTAB,
WA_EVENTS TYPE SLIS_ALV_EVENT,
IT_EVENTS TYPE SLIS_T_EVENT.
* Selection-Screen *
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME.
SELECT-OPTIONS: S_VBELN FOR VBAK-VBELN.
PARAMETERS: P_VBTYP LIKE VBAK-VBTYP DEFAULT 'C'.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME.
PARAMETERS: LIST RADIOBUTTON GROUP G1,
GRID RADIOBUTTON GROUP G1.
SELECTION-SCREEN END OF BLOCK B2.
* At Selection-Screen *
*VALIDATION
* Start of Selection *
START-OF-SELECTION.
*POPULATION OF DATA INTO INTERNAL TABLE ITAB
PERFORM GET_DATA.
*DEFINE USER DEFINED FIELDCATALOG
PERFORM DEFINE_FIELDCATALOG.
*SUBTOTALS AND TOTALS DISPLAY USING SORT
PERFORM SORT_LIST.
*CHANGE FCODE OF STATUS
PERFORM CHANGE_FCODE.
*CHECK RADIOBUTTON OPTION AND ACCORDINGLY FINAL DISPLAY
PERFORM CHECK_OPTION.
*& Form GET_DATA
* text
FORM GET_DATA.
SELECT VBELN
VBTYP
AUDAT
AUGRU
AUART
NETWR
WAERK FROM VBAK INTO TABLE IT_VBAK
WHERE VBELN IN S_VBELN AND VBTYP = P_VBTYP
AND ERDAT > '01.01.2004' AND NETWR > 0.
LOOP AT IT_VBAK.
IF IT_VBAK-NETWR < 10000.
IT_VBAK-ICON = '@08@'.
ELSEIF IT_VBAK-NETWR > 100000.
IT_VBAK-ICON = '@0A@'.
ELSE.
IT_VBAK-ICON = '@09@'.
ENDIF.
MODIFY IT_VBAK INDEX SY-TABIX.
ENDLOOP.
ENDFORM. "GET_DATA
*& Form CHECK_OPTION
* text
FORM CHECK_OPTION.
WA_EVENTS-NAME = 'TOP_OF_PAGE'.
WA_EVENTS-FORM = 'TOP'.
APPEND WA_EVENTS TO IT_EVENTS.
CLEAR WA_EVENTS.
WA_EVENTS-NAME = 'END_OF_LIST'.
WA_EVENTS-FORM = 'END_LIST'.
APPEND WA_EVENTS TO IT_EVENTS.
CLEAR WA_EVENTS.
IF LIST = 'X'.
PERFORM LIST_DISP.
ENDIF.
IF GRID = 'X'.
PERFORM GRID_DISP.
ENDIF.
ENDFORM. "CHECK_OPTION
*& Form DEFINE_FIELDCATALOG
* text
FORM DEFINE_FIELDCATALOG.
WA_FIELDCAT-COL_POS = 1.
WA_FIELDCAT-FIELDNAME = 'ICON'.
WA_FIELDCAT-SELTEXT_L = 'ICON'.
WA_FIELDCAT-ICON = 'X'.
WA_FIELDCAT-OUTPUTLEN = 8.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 2.
WA_FIELDCAT-FIELDNAME = 'VBELN'.
WA_FIELDCAT-SELTEXT_L = 'SALES DOC NO.'.
WA_FIELDCAT-OUTPUTLEN = 10.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 3.
WA_FIELDCAT-FIELDNAME = 'AUDAT'.
WA_FIELDCAT-SELTEXT_L = 'CREATED ON'.
WA_FIELDCAT-OUTPUTLEN = 10.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 4.
WA_FIELDCAT-FIELDNAME = 'VBTYP'.
WA_FIELDCAT-SELTEXT_L = 'CATEGORY'.
WA_FIELDCAT-OUTPUTLEN = 1.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 6.
WA_FIELDCAT-FIELDNAME = 'AUGRU'.
WA_FIELDCAT-SELTEXT_L = 'REASON'.
WA_FIELDCAT-OUTPUTLEN = 3.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 5.
WA_FIELDCAT-FIELDNAME = 'AUART'.
WA_FIELDCAT-SELTEXT_L = 'DOC TYPE'.
WA_FIELDCAT-OUTPUTLEN = 4.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 7.
WA_FIELDCAT-FIELDNAME = 'NETWR'.
WA_FIELDCAT-SELTEXT_L = 'NET VALUE'.
WA_FIELDCAT-OUTPUTLEN = 17.
WA_FIELDCAT-DECIMALS_OUT = 2.
* WA_FIELDCAT-DO_SUM = 'X'.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-COL_POS = 8.
WA_FIELDCAT-FIELDNAME = 'WAERK'.
WA_FIELDCAT-SELTEXT_L = 'UNIT'.
WA_FIELDCAT-OUTPUTLEN = 50.
WA_FIELDCAT-TABNAME = 'IT_VBAK'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
ENDFORM. "DEFINE_FIELDCATALOG
*& Form DEFINE_LAYOUT
* text
FORM DEFINE_LAYOUT.
LAYOUT-ZEBRA = 'X'.
LAYOUT-SUBTOTALS_TEXT = 'SUBTOTAL SUM'.
LAYOUT-WINDOW_TITLEBAR = 'EXERCISE 2'.
LAYOUT-TOTALS_TEXT = 'TOTAL'.
ENDFORM. "DEFINE_LAYOUT
*& Form SORT_LIST
* text
FORM SORT_LIST.
WA_SORT-FIELDNAME = 'VBELN'.
WA_SORT-TABNAME = 'IT_VBAK'.
WA_SORT-SPOS = 1.
WA_SORT-UP = 'X'.
WA_SORT-SUBTOT = 'X'.
APPEND WA_SORT TO IT_SORT.
CLEAR WA_SORT.
WA_SORT-FIELDNAME = 'NETWR'.
WA_SORT-TABNAME = 'IT_VBAK'.
WA_SORT-UP = 'X'.
WA_SORT-SPOS = 2.
WA_SORT-SUBTOT = 'X'.
APPEND WA_SORT TO IT_SORT.
CLEAR WA_SORT.
ENDFORM. "SORT_LIST
*& Form LIST_DISP
* text
FORM LIST_DISP.
PERFORM DEFINE_LAYOUT.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = SY-REPID
IT_FIELDCAT = IT_FIELDCAT
IS_LAYOUT = LAYOUT
IT_SORT = IT_SORT
I_CALLBACK_PF_STATUS_SET = 'STATUS'
IT_EXCLUDING = I_FCODE_EXTAB
I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
IT_EVENTS = IT_EVENTS[]
* IMPORTING
* E_EXIT_CAUSED_BY_CALLER =
* ES_EXIT_CAUSED_BY_USER =
TABLES
T_OUTTAB = IT_VBAK
* EXCEPTIONS
* PROGRAM_ERROR = 1
* OTHERS = 2
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. "LIST_DISP
*& Form GRID_DISP
* text
FORM GRID_DISP.
PERFORM DEFINE_LAYOUT.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = SY-REPID
IS_LAYOUT = LAYOUT
IT_FIELDCAT = IT_FIELDCAT
IT_SORT = IT_SORT
I_CALLBACK_PF_STATUS_SET = 'STATUS'
IT_EXCLUDING = I_FCODE_EXTAB
I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
IT_EVENTS = IT_EVENTS[]
TABLES
T_OUTTAB = IT_VBAK.
* EXCEPTIONS
* PROGRAM_ERROR = 1
* OTHERS = 2
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. "GRID_DISP
*& Form STATUS
* text
* -->P_EXTAB text
FORM STATUS USING P_EXTAB TYPE SLIS_T_EXTAB.
SET PF-STATUS 'STATUS' EXCLUDING P_EXTAB.
ENDFORM. "STATUS
*& Form USER_COMMAND
* text
* -->R_UCOMM text
* -->RS_SELFIELD text
FORM USER_COMMAND USING R_UCOMM LIKE SY-UCOMM
RS_SELFIELD TYPE SLIS_SELFIELD.
CASE R_UCOMM.
WHEN 'BACK' OR 'CANC' OR 'EXIT'.
LEAVE TO SCREEN 0.
WHEN '&IC1'.
SET PARAMETER ID 'AUN' FIELD RS_SELFIELD-VALUE.
CALL TRANSACTION 'VA03' AND SKIP FIRST SCREEN.
ENDCASE.
ENDFORM. "USER_COMMAND
*& Form CHANGE_FCODE
* text
FORM CHANGE_FCODE.
WA_FCODE = 'PRNT'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&OAD'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&AVE'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&EB9'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&SUM'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&UMC'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&XPA'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
WA_FCODE = '&OMP'.
APPEND WA_FCODE TO I_FCODE_EXTAB.
ENDFORM. "CHANGE_FCODE
*& Form TOP
* text
FORM TOP.
IF LIST = 'X'.
WRITE:/ SY-ULINE.
WRITE:/ 'DATE:', SY-DATUM,55 'INTELLIGROUP ASIA PVT LTD'.
WRITE:/ 'TIME:', SY-UZEIT.
WRITE:/ 'USER NAME:', SY-UNAME,60 SY-TITLE.
WRITE:/ 'PAGE', SY-PAGNO.
WRITE:/ SY-ULINE.
ENDIF.
IF GRID = 'X'.
DATA: LS_LINE TYPE SLIS_LISTHEADER,
E04_LT_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER.
* Listenüberschrift: Typ H
CLEAR LS_LINE.
LS_LINE-TYP = 'H'.
* LS_LINE-KEY: not used for this type
LS_LINE-INFO = 'Summary'.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
* Kopfinfo: Typ S
CLEAR LS_LINE.
LS_LINE-TYP = 'S'.
LS_LINE-KEY = 'Intelligroup'.
LS_LINE-INFO = ''.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
LS_LINE-KEY = 'ASIA'.
LS_LINE-INFO = 'PVT LTD'.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
* Aktionsinfo: Typ A
CLEAR LS_LINE.
LS_LINE-TYP = 'A'.
* LS_LINE-KEY: not used for this type
LS_LINE-INFO = 'truman'.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
IT_LIST_COMMENTARY = E04_LT_TOP_OF_PAGE
I_LOGO = 'ENJOY_SAP_LOGO'.
ENDIF.
ENDFORM. "TOP
*& Form END_LIST
* text
FORM END_LIST.
IF LIST = 'X'.
SKIP 2.
WRITE:/60 'END OF PAGE'.
ENDIF.
IF GRID = 'X'.
DATA: LS_LINE TYPE SLIS_LISTHEADER,
E04_LT_END_OF_LIST TYPE SLIS_T_LISTHEADER.
* Listenüberschrift: Typ H
CLEAR LS_LINE.
LS_LINE-TYP = 'H'.
* LS_LINE-KEY: not used for this type
LS_LINE-INFO = 'Summary'.
APPEND LS_LINE TO E04_LT_END_OF_LIST.
* Kopfinfo: Typ S
CLEAR LS_LINE.
LS_LINE-TYP = 'S'.
LS_LINE-KEY = 'Intelligroup'.
LS_LINE-INFO = ''.
APPEND LS_LINE TO E04_LT_END_OF_LIST.
LS_LINE-KEY = 'ASIA'.
LS_LINE-INFO = 'PVT LTD'.
APPEND LS_LINE TO E04_LT_END_OF_LIST.
* Aktionsinfo: Typ A
CLEAR LS_LINE.
LS_LINE-TYP = 'A'.
* LS_LINE-KEY: not used for this type
LS_LINE-INFO = TEXT-105.
APPEND LS_LINE TO E04_LT_END_OF_LIST.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
IT_LIST_COMMENTARY = E04_LT_END_OF_LIST.
ENDIF.
ENDFORM. "END_LIST -
How to add new fields to standard reports
hi friends,
im into ABAP and working across all modules..the basic thing is users and functional people are not satisfied with the standard reports..they need some logic change or to add some more fieldsinb the standard reports.For logic change we have to copy the standard to zprogram and can do or create a new program itself..but in many cases they ask for extra fields.how to achive it ..
for example my requirement now is adding vendor name field to the report FAGGL03 ....i found a badi and have make changes to it ...now the vendor name will be coming in sgtxt over writing the text ...but they need text also...now what shall i do???
append structure vendor name field in faglposx table ....???how to find out the final internal table from where the output is coming ????
?when we check the standard rewport codes...there are lot of include statements perform statements etc ...how to find out the final structure or internal table which has the output values..???hi
it would be better if u giv full name of the report
if ur displaying the data in alv then search for the
word REUSE_ALV_LIST_DISPLAY REUSE_ALV_GRID_DISPLAY from which u can get the final table name
then check the data that is comming into
try using implicit enhancement or any other exit in the declaration and declare a new structure with the field and append it to the field catalog
if ur displaying the data using write statement
then create a zprogram and add a write statement
fi ur unable to find here the final table then after displayign the report start the debugging and double click on any row to find out more easily
shiva -
one of the Field in my Report is F_Payment_date1 the source column its referring is payment_date which is in the table ..
The Query for this Group is
select
empl.action_context_id
, empl.full_name
, ppf.last_name
, ppf.first_name
, empl.national_identifier
,hou.INTERNAL_ADDRESS_LINE
, empl.employee_number
, empl.organization_name
, substr(empl.employee_address1,1,40) emp_add_ln1
, substr(empl.employee_address2,1,40) emp_add_ln2
, substr(empl.employee_address3,1,40) emp_add_ln3
, rtrim(substr(empl.employee_city,1,26))||' '
||empl.employee_state||' '
||empl.employee_zip_code emp_add_ln4
, empl.beginning_date period_start_date
, empl.ending_date period_end_date
, empl.payment_date
, LTRIM(RTRIM(TO_CHAR(empl.pay_rate,'99999999.00'))) base_salary
, empl.pay_basis salary_basis
, empl.employee_state resident_state
, empl.location_name
, paf.work_At_home
, empl.assignment_id
, :org_payment_method_id org_payment_id
, substr(empl.employer_address1,1,40) emplr_add_ln1
, substr(empl.employer_address2,1,40) emplr_add_ln2
, rtrim(substr(empl.employer_city,1,26))||' '
||empl.employer_state||' '
||empl.employer_zip_code emplr_add_ln3
from PAY_EMPLOYEE_ACTION_INFO_V empl
,pay_assignment_actions paa
,per_assignments_f paf
,per_people_f ppf
,hr_all_organization_units hou
where paa.assignment_action_id = empl.action_context_id
and empl.assignment_id = paa.assignment_id
and paf.assignment_id = paa.assignment_id
and empl.effective_date between hou.DATE_FROM and nvl(hou.date_to,empl.effective_date)
and paf.ORGANIZATION_ID = hou.ORGANIZATION_ID
and empl.employee_number = ppf.employee_number
and empl.effective_date between paf.effective_start_date
and paf.effective_end_date
and empl.effective_date between ppf.effective_start_date
and ppf.effective_end_date
even if the payment date expires in the report it is still showing payment_date
i want to include the logic like this
if overrideing then
v_date:=: PPA_OVERRIDING_DD_DATE ( Ihope this does not work as they are in dfferent group i need to write sql )
else
v_date:=:PAYMENT_DATE;
return(v_date);
PPA_OVERRIDING is in the table pay_assignment_actions
The Query for the other group where the PPA_OVERRIDING_DD_DATE
is
SELECT decode(ppa.action_type,'H',to_number(paa.serial_number)
,paa.action_sequence) orderby
, paa.assignment_action_id asg_actid, to_number(paa.serial_number) xfr_action
, ppa.action_type
, ppa.org_payment_method_id
, paa.assignment_id paa_assignment_id
, ppa.effective_date ppa_effective_date
, ppa.business_group_id business_group_id
, ppa.payroll_action_id ppa_payroll_action_id
, ppa.payroll_id ppa_payroll_id
, ppa.consolidation_set_id ppa_consolidation_set_id
, ppa.date_earned ppa_date_earned
, ppa.overriding_dd_date ppa_overriding_dd_date
FROM pay_assignment_actions paa
,pay_payroll_actions ppa
WHERE paa.payroll_action_id = :pactid
AND paa.chunk_number = :chnkno
AND ppa.payroll_action_id = paa.payroll_action_id
ORDER BY 1
can anyone gimme sugestion how to approach this ..i want to display
PPA_OVERRIDING_DD_DATE column values where ever
payment date is expired .
Thanks in Advance,
Dev Kishore.TIf i understand your question well, you could try this:
In the querygroup (datamodel) of your first query you create a formula column : CF_payment_or_overriding_date
In the PL/SQL Formula of your formula column you add code like this:
function CF_payment_or_overriding_dateF return DATE
is
ld_return DATE;
begin
IF 'overriding'
THEN
use your criteria to retrieve the overriding_dd_date from paa via select into or a cursor construction
ld_return := ppa_overriding_dd_date;
ELSE
-- empl.payment_date is fine do not replace
ld_return := :payment_date;
END IF;
RETURN (ld_return);
end;
And in your layout section,
for your field F_Payment_date1 set your source column to
your formula column CF_payment_or_overriding_date
Hope this helps,
Greetings,
Emiel -
User Comment field available for reporting?
User Comment field available for reporting?
When doing custom reporting against requests with reportable dictionaries we have a user request to also include the user comments. How do I reference / point to the comments field for a request?If you are referring to the comments which are added in the Comments and History section of a requisition, this information is not migrated to the datamart and is not reportable.
If, on the other hand, you are referring to a comments field that you have included in a dictionary on the service form, that information will be available in the datamart so long as that dictionary has been made reportable. -
Length of a field in calendar report...
Hi,
I have a calendar report based on 2 columns as necessary, a date column and a varchar2 column.
All the records for a particular date are grouped and shown under the date in the calendar report as required.
Off late, we have faced an issue as below
Error Error during rendering of region "Scheduled Maintenance".
ORA-06502: PL/SQL: numeric or value error: character string buffer too small
This occurs when there are a large number of records for a single date. I.e, the field on the calendar report for a date is not able to display all the records due to length constraints.
Could somebody pls tell me what is the length of a date field displaying data in the calendar report and also in other reports.
Is there a way, I could change the length of this date field being displayed.
Regards,
Jitesh GurnaniHello Jitesh,
I don't know whats the exact limit. But when I try following queries in apex.oracle.com then..
/*No Error*/
SELECT 'b' name, sysdate date_col from dual connect by rownum < 32000;
/*Error Occured in Month view, works fine in Day view*/
SELECT 'b' name, sysdate date_col from dual connect by rownum < 33000;However I can't imagine calender with so many events and long text. It will destroy look & feel of calender regions.
I suggest you to create some kind of filters so you only display some data at a time. That will definitely help end-users.
Regards,
Hari
Maybe you are looking for
-
No Toolbar buttons on OV page of serch result entity in Value Help PopUp
Hello Friends, In Service Request, I am calling a value help search of CRM_KNOWART_S/KA SearchView for the field of assignment block "Related Knowledge Articles" (component GSDOCFLOW/HdrDocFlowEF ) . I am getting value help AND RESULTS ARE COMING. A
-
Recently RAW files need to be re-processed. Why?
Sorry for the long subject line! When I load RAW files into Aperture, they are all dark and dim. I receive a message saying that an older Apple Raw processor was used, and I'm asked to reprocess, which I do and everything is fine. But how can I elimi
-
Can't create repository as iSCSI physical disk
Using OVM 3.1.1 I am using a ZFS Storage Appliance (simulated under virtualbox for testing) as a SAN. I created two iSCSI LUN devices on the appliance in the same ZFS pool:- a LUN for a server pool, and a LUN for a repository. After creating an Acces
-
How to run batch select query ?
I have multiple "select" query . how do i run the query in a efficient way and absorp the values into an ArrayList ? addbatch() method is mainly used for "insert" kind of query . and also , it would be bad idea to run "select:" query one by one . can
-
How to use 'DELETE ADJACENT DUPLICATES FROM' for deleting as some field
How to use 'DELETE ADJACENT DUPLICATES FROM' for deleting as some field eg: I have a inner table ,it contains a field named ast_guid,now,I search ten records,contains some duplicate records in the field of ast_guid.but I can not delete the duplicate