Why JTextPane not obtaining the listeners from the parent JPanel?
Hi All,
When I add JTextPane to the JPanel and adding MouseListeners to the JPanel, it is not responding when I click on JTextPane. If I add JLabel or JButton, it is working fine. I need to add the mouse listeners to the panel only. Can anybody has any idea on this? Here is the code what I wrote:
class Example extends JPanel implements MouseListener {
public Example() {
setLayout(null);
JTextPane pane = new JTextPane();
pane.setBounds(20,20,50,50);
add( pane);
addMouseListener(this);
public void mousePressed(MouseEvent me) {
// Here it is not entering into mousePressed at all
if(getCompnentAt(me.getPoint()) instanceof JTextPane) {
System.out.println("pressed on textpane");
Thanks in advance,
Kishore.
We are not Apple iOS programmers. Just device users like yourself.
feedback.apple.com is where you should send suggestions.
Similar Messages
-
Why can not scp the spfile to another host?
Why can not scp the spfile to another host?
The hostp is physically connect with hosts with a router. Both are RHEL5.0 OS. I copied some files from hostp to hosts successfully a few days ago. But it not work today. The SSH is disabled on both hosts.
[oracle@hostp db10g] $ cd $ORACLE_HOME/dbs
[oracle@hostp dbs] $ ls
hc_db10g.dat init.ora orapwrcatalog spfilercatalog.ora
hc_rcatalog.dat lkDB10G snapcf_db10g.f
initdb10g.ora lkRCATALOG snapcf_rcatalog.f
initdw.ora orapwdb10g spfiledb10g.ora
[oracle@hostp dbs] $ scp spfiledb10g.ora hosts:/u01/app/oracle/product/10.2.0/db_1/dbs/
ssh: connect to host hosts port 22: No route to host
lost connectionI ping the hostp from the hosts, it is reachable; But I ping hosts from the hostp, it is unreachable. The follows are some information for diagnosys.
[root@hostp oracle]# route -n
Kernel IP routing table
Destination Gateway Genmask Flags Metric Ref Use Iface
192.168.0.0 0.0.0.0 255.255.255.0 U 0 0 0 eth0
169.254.0.0 0.0.0.0 255.255.0.0 U 0 0 0 eth0
0.0.0.0 192.168.0.1 0.0.0.0 UG 0 0 0 eth0
[oracle@hostp ~]$ ping hosts
PING hosts (192.168.0.3) 56(84) bytes of data.
CFrom 192.168.0.107 icmp_seq=2 Destination Host Unreachable
From 192.168.0.107 icmp_seq=3 Destination Host Unreachable
From 192.168.0.107 icmp_seq=4 Destination Host Unreachable
--- hosts ping statistics ---
9 packets transmitted, 0 received, +6 errors, 100% packet loss, time 7997ms, pipe 3
[oracle@hostp ~]$ cat /etc/hosts
# Do not remove the following line, or various programs
# that require network functionality will fail.
127.0.0.1 localhost.localdomain localhost
::1 localhost6.localdomain6 localhost6
192.168.0.2 hostp
192.168.0.3 hosts
[oracle@hostp ~]$ ping hostp
PING hostp (192.168.0.2) 56(84) bytes of data.
64 bytes from hostp (192.168.0.2): icmp_seq=1 ttl=64 time=0.394 ms
64 bytes from hostp (192.168.0.2): icmp_seq=2 ttl=64 time=0.194 ms
64 bytes from hostp (192.168.0.2): icmp_seq=3 ttl=64 time=0.190 ms
--- hostp ping statistics ---
3 packets transmitted, 3 received, 0% packet loss, time 2002ms
rtt min/avg/max/mdev = 0.190/0.259/0.394/0.096 ms
[oracle@hostp ~]$ cat /etc/hosts
# Do not remove the following line, or various programs
# that require network functionality will fail.
127.0.0.1 localhost.localdomain localhost
::1 localhost6.localdomain6 localhost6
192.168.0.3 hosts
192.168.0.2 hostp -
Why Oracle not introduced the flexclone till now?
Howdy,
why Oracle not introduced the flexclone technology till now?
We need spend money on other vendor :(
Any one from oracle open world?
Kind Reagrds,
RakeshGood question. I was looking for flexclone as well. Fortunately we are having around 1.5T of database and we do netapp snapshot to duplicate RAC database to standalone, with our custom scripts on daily basis and it is working for almost a year now. :) And to add more we are not paying any third party vendor. Although the process is not supported still it is working without any issue so far.
Regards,
Virendra
Edited by: Virendra.k.Yadav on Oct 7, 2011 10:14 AM -
Why dose not see the call waiting notification when other party in a call with some one ?
why dose not see the call waiting notification when other party in a call with some one ?
Because that is not a feature of the iPhone (or of most phones). If someone does not answer when you call, it means they do not want to or cannot talk to you at that time. They could be on another call or they could be simply busy doing something else. Why does it matter which?
-
why can not open the file
On which OS are you working?
Did you see issue in opening pdf in browser or in Application?
You can try upgarding to latest version of Reader via link
http://get.adobe.com/reader/enterprise/ -
Why has not received the message about the change secret Questions?
Why has not received the message about the change secret Questions on my email?
Be patient. You don't get an immediately notification email. Record the Claim Number somewhere in case something goes wrong. It can take up to 72 hours. I got mine in about 54 hours.
-
Could not obtain latest contract from popen(3C): No such process
when i add a scripts in crontab file.in /var/cron/log shows the error
could not obtain latest contract from popen(3C): No such processI HAVE THE CONFIGURATION OF SOLARIS 10
THE WHOLE CONFIGURATION IS SunOS 5.10 Generic sun4u sparc SUNW,Sun-Fire-V210
ERROR:Re: could not obtain latest contract from popen(3C): No such process
THIS PROBLEM SOLVE WITH YOUR SUGGESTED PATCH -
Why can not I transfer songs from my computer to my iphone?
Why can not I transfer songs from my computer to my iphone?
The songs are on iTunes And I try to add them to my iPhone And it fails!
have tried many times, what am I wrong?
Thank you in advance!Are you manually dragging and dropping files in an attempt to move music from your client itunes to your idevice? And seeing the process hang and potentially locking itunes?
I have been having similar issues, but recently found something that works for my ipad air. Not sure if this will help you but...
In your itunes client music library:
Right click on one music file
Hover over the Add to Playlist option
Select a playlist from your iphone in the side popup window
See if that helps move the music file over. If it does, test out the original drag and drop on a new file. The move to playlist option seemed to clear whatever blockage I had and I'm not dragging and dropping with ease. -
EA 4.2 Two Level TabsLeft and Right Sidebar not highlighting the parent tab
Theme 24 Two Level Tabs - Left and Right Sidebar page template is not highlighting the parent tab. I did some changes to the Current Parent tab section and it is working so can we see the changes in the EA2 or the final 4.2 product.
Orginal
<li><a class="active" href="#TAB_LINK#">#TAB_LABEL#</a>#TAB_INLINE_EDIT#</li>
changed to
<li class="active">#TAB_LABEL##TAB_INLINE_EDIT#</li>Log 4.2EA issues and comments using the Feedback link in the App Builder on apexea.oracle.com.
-
Why can i not obtain the same zoom levels in googlemaps as i do on chrome
I use both Firefox and google chrome browsers for varying reasons..when i use googlemaps in Firefox it will only let me zoom in to a level of 18 before i get a default message about not being able to zoom in to a deeper level
However.....on the very same search in google chrome it will let me zoom in to a lot closer...level 21 as opposed to 18 in firefox..
Does anybody please have the answer and remedy to this please ??
Thanks in advanceYou may have zoomed the page(s) by accident.
Reset the page zoom on pages that cause problems.
*<b>View > Zoom > Reset</b> (Ctrl/Command+0 (zero))
*http://kb.mozillazine.org/Zoom_text_of_web_pages
You can try these steps in case of issues with web pages:
You can reload web page(s) and bypass the cache to refresh possibly outdated or corrupted files.
*Hold down the Shift key and left-click the Reload button
*Press "Ctrl + F5" or press "Ctrl + Shift + R" (Windows,Linux)
*Press "Command + Shift + R" (Mac)
Clear the cache and remove cookies only from websites that cause problems.
"Clear the Cache":
*Firefox/Tools > Options > Advanced > Network > Cached Web Content: "Clear Now"
"Remove Cookies" from sites causing problems:
*Firefox/Tools > Options > Privacy > "Use custom settings for history" > Cookies: "Show Cookies"
Start Firefox in <u>[[Safe Mode|Safe Mode]]</u> to check if one of the extensions (Firefox/Tools > Add-ons > Extensions) or if hardware acceleration is causing the problem.
*Switch to the DEFAULT theme: Firefox/Tools > Add-ons > Appearance
*Do NOT click the Reset button on the Safe Mode start window
*https://support.mozilla.org/kb/Safe+Mode
*https://support.mozilla.org/kb/Troubleshooting+extensions+and+themes -
Why can not catch the standard BACK event in ALV's USER_COMMAND event,
Hi expert, why i can not catch the standard BACK event in ALV's USER_COMMAND event,
Code:
DATA G_CON_UC_FORM TYPE SLIS_FORMNAME VALUE 'F_USER_COMMAND',
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = SY-REPID
I_CALLBACK_TOP_OF_PAGE = G_CON_FORM
I_CALLBACK_USER_COMMAND = G_CON_UC_FORM
IT_FIELDCAT = G_TAB_FIELDCAT
IT_SORT = G_TAB_SORT_INF
I_SAVE = G_CON_U
*<<<Liang
IT_EVENTS = G_TAB_ALV_EVENTS
*<<<Liang
TABLES
T_OUTTAB = G_TAB_OUTPUT_DATA
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2.
*& Form F_USER_COMMAND
ALV USER COMMAND processing
FORM F_USER_COMMAND .
IF SY-UCOMM = '&FO3'.
LEAVE TO SCREEN 0.
ENDIF.
ENDFORM. " F_USER_COMMAND
When I set breakpoint on this subrouting ,and try to click stardard BACK or CANCEL button, the callback form do not run, but if double click one of line of alv report, the callback form works well,
so why??hi
good
check this report and change your code accordingly.
THESE LINES ARE FOR THE MAIN PROGRAM ***
SAP V40B ***
REPORT Z_PICK_LIST .
TABLES: RESB.
SELECTION-SCREEN BEGIN OF BLOCK BL1 WITH FRAME TITLE TEXT-BL1.
SELECT-OPTIONS: S_WERKS FOR RESB-WERKS," Plant
S_AUFNR FOR RESB-AUFNR," Order number
S_BDTER FOR RESB-BDTER." Req. date
SELECTION-SCREEN END OF BLOCK BL1.
PARAMETERS: P_VARI LIKE DISVARIANT-VARIANT DEFAULT '/STANDARD'.
DATA: BEGIN OF OUT OCCURS 10,
AUFNR LIKE RESB-AUFNR, " Order number
MATNR LIKE RESB-MATNR, " Material
BDMNG LIKE RESB-BDMNG, " Requirements in UM
MEINS LIKE RESB-MEINS, " Unit of Measure (UM)
ERFMG LIKE RESB-ERFMG, " Requirements in UE
ERFME LIKE RESB-ERFME, " Unit of Entry (UE)
MAKTX LIKE MAKT-MAKTX, " Mat. description
END OF OUT.
INCLUDE Z_ALV_VARIABLES.
INITIALIZATION.
REPNAME = SY-REPID.
PERFORM INITIALIZE_FIELDCAT USING FIELDTAB[].
PERFORM BUILD_EVENTTAB USING EVENTS[].
PERFORM BUILD_COMMENT USING HEADING[].
PERFORM INITIALIZE_VARIANT.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_VARI.
PERFORM F4_FOR_VARIANT.
AT SELECTION-SCREEN.
PERFORM PAI_OF_SELECTION_SCREEN.
START-OF-SELECTION.
PERFORM GET_ORDERS.
PERFORM GET_MATERIAL_DESCRIPTION.
END-OF-SELECTION.
PERFORM BUILD_LAYOUT USING LAYOUT.
PERFORM BUILD_PRINT USING PRINTS.
PERFORM WRITE_USING_ALV.
FORM INITIALIZE_FIELDCAT *
--> P_TAB *
FORM INITIALIZE_FIELDCAT USING P_TAB TYPE SLIS_T_FIELDCAT_ALV.
DATA: CAT TYPE SLIS_FIELDCAT_ALV.
CLEAR CAT.
ENDFORM. " INITIALIZE_FIELDCAT
*& Form GET_ORDERS
text
FORM GET_ORDERS.
SELECT AUFNR MATNR BDMNG MEINS ERFMG ERFME
FROM RESB
APPENDING TABLE OUT
WHERE XLOEK EQ SPACE " deletion indicator
AND XWAOK EQ 'X' " goods movement indicator
AND WERKS IN S_WERKS " plant
AND BDTER IN S_BDTER " req. date
AND AUFNR IN S_AUFNR. " pr. order
ENDFORM. " GET_ORDERS
*& Form GET_MATERIAL_DESCRIPTION
text
FORM GET_MATERIAL_DESCRIPTION.
SORT OUT BY MATNR.
LOOP AT OUT.
SELECT SINGLE MAKTX
INTO OUT-MAKTX
FROM MAKT
WHERE MATNR EQ OUT-MATNR
AND SPRAS EQ 'EN'.
MODIFY OUT.
ENDLOOP.
SORT OUT BY AUFNR MATNR.
ENDFORM. " GET_MATERIAL_DESCRIPTION
FORM TOP_OF_PAGE *
FORM TOP_OF_PAGE.
DATA: L_POS TYPE P.
first line
WRITE:/ TEXT-001. " Plant:
IF S_WERKS-HIGH NE SPACE.
WRITE: S_WERKS-LOW, TEXT-TO1, S_WERKS-HIGH.
ELSEIF S_WERKS-LOW NE SPACE.
LOOP AT S_WERKS.
WRITE: S_WERKS-LOW.
ENDLOOP.
ELSEIF S_WERKS-LOW EQ SPACE.
WRITE: TEXT-ALL.
ENDIF.
L_POS = ( SY-LINSZ DIV 2 ) - ( STRLEN( TEXT-TIT ) DIV 2 ).
POSITION L_POS. WRITE: TEXT-TIT.
L_POS = SY-LINSZ - 20.
POSITION L_POS. WRITE: TEXT-011, SY-UNAME RIGHT-JUSTIFIED. " User:
second line
WRITE:/ TEXT-002. " Order:
IF S_AUFNR-HIGH NE SPACE.
WRITE: S_AUFNR-LOW, TEXT-TO1, S_AUFNR-HIGH.
ELSEIF S_AUFNR-LOW NE SPACE.
LOOP AT S_AUFNR.
WRITE: S_AUFNR-LOW.
ENDLOOP.
ELSEIF S_AUFNR-LOW EQ SPACE.
WRITE: TEXT-ALL.
ENDIF.
L_POS = SY-LINSZ - 20.
POSITION L_POS. WRITE: TEXT-012,SY-DATUM. " Date:
third line
WRITE:/ TEXT-003. " Req. Date:
IF S_BDTER-HIGH(1) NE '0'.
WRITE: S_BDTER-LOW, TEXT-TO1, S_BDTER-HIGH.
ELSEIF S_BDTER-LOW(1) NE '0'.
LOOP AT S_BDTER.
WRITE: S_BDTER-LOW.
ENDLOOP.
ELSEIF S_BDTER-LOW(1) EQ '0'.
WRITE: TEXT-ALL.
ENDIF.
L_POS = SY-LINSZ - 20.
POSITION L_POS. WRITE: TEXT-013, SY-PAGNO. " Page:
ENDFORM. " TOP_OF_PAGE
FORM END_OF_LIST *
FORM END_OF_LIST.
DATA: L_POS TYPE P.
ULINE.
WRITE:/ '|', TEXT-021. " Delivered by:
L_POS = SY-LINSZ DIV 2.
POSITION L_POS. WRITE: '|', TEXT-031. " Received by:
L_POS = SY-LINSZ.
POSITION L_POS. WRITE: '|'.
WRITE:/ '|'.
L_POS = SY-LINSZ DIV 2.
POSITION L_POS. WRITE: '|'.
L_POS = SY-LINSZ.
POSITION L_POS. WRITE: '|'.
ULINE.
WRITE:/ '|', TEXT-012. " Date:
L_POS = SY-LINSZ DIV 2.
POSITION L_POS. WRITE: '|', TEXT-012. " Date:
L_POS = SY-LINSZ.
POSITION L_POS. WRITE: '|'.
WRITE:/ '|'.
L_POS = SY-LINSZ DIV 2.
POSITION L_POS. WRITE: '|'.
L_POS = SY-LINSZ.
POSITION L_POS. WRITE: '|'.
ULINE.
ENDFORM. " END_OF_LIST
*& Form WRITE_USING_ALV
text
FORM WRITE_USING_ALV.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
EXPORTING
I_PROGRAM_NAME = REPNAME
I_INTERNAL_TABNAME = 'OUT'
I_INCLNAME = REPNAME
CHANGING
CT_FIELDCAT = FIELDTAB.
IF SY-SUBRC <> 0.
WRITE: 'SY-SUBRC: ', SY-SUBRC, 'REUSE_ALV_FIELDCATALOG_MERGE'.
ENDIF.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = REPNAME
i_callback_pf_status_set = 'PF_STATUS_SET'
i_callback_user_command = 'USER_COMMAND'
I_STRUCTURE_NAME = 'OUT'
IS_LAYOUT = LAYOUT
IT_FIELDCAT = FIELDTAB
I_DEFAULT = 'A'
I_SAVE = G_SAVE
IS_VARIANT = G_VARIANT
IT_EVENTS = EVENTS[]
IS_PRINT = PRINTS
TABLES
T_OUTTAB = OUT.
IF SY-SUBRC <> 0.
WRITE: 'SY-SUBRC: ', SY-SUBRC, 'REUSE_ALV_LIST_DISPLAY'.
ENDIF.
ENDFORM. " WRITE_USING_ALV
THESE LINES ARE FOR THE INCLUDE ***
***INCLUDE Z_ALV_VARIABLES .
TYPE-POOLS: SLIS.
DATA: FIELDTAB TYPE SLIS_T_FIELDCAT_ALV,
HEADING TYPE SLIS_T_LISTHEADER,
LAYOUT TYPE SLIS_LAYOUT_ALV,
EVENTS TYPE SLIS_T_EVENT,
REPNAME LIKE SY-REPID,
F2CODE LIKE SY-UCOMM VALUE '&ETA',
PRINTS TYPE SLIS_PRINT_ALV,
TITLE(40) TYPE C,
G_SAVE(1) TYPE C,
G_EXIT(1) TYPE C,
G_VARIANT LIKE DISVARIANT,
GX_VARIANT LIKE DISVARIANT.
CONSTANTS: FORMNAME_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE',
FORMNAME_END_OF_PAGE TYPE SLIS_FORMNAME VALUE 'END_OF_PAGE',
FORMNAME_END_OF_LIST TYPE SLIS_FORMNAME VALUE 'END_OF_LIST',
FORMNAME_BEFORE_LINE TYPE SLIS_FORMNAME VALUE 'BEFORE_LINE',
FORMNAME_AFTER_LINE TYPE SLIS_FORMNAME VALUE 'AFTER_LINE'.
FORM MAIN_STATEMENTS *
THIS IS THE CODE THAT MUST BE INSERTED IN THE MAIN PROGRAM
FORM MAIN_STATEMENTS.
Declare the parameter P_VARI wherever you want it. If you don't
want it, hide it with NO-DISPLAY, but it must exist.
parameters: p_vari like disvariant-variant. " ALV Variant
You have to add the following line after the data and parameter
declaration:
include z_alv_variables.
Then, after the data/parameter declaration, add these lines:
*initialization.
repname = sy-repid.
perform initialize_fieldcat using fieldtab[].
perform build_eventtab using events[].
perform build_comment using heading[].
perform initialize_variant.
If you are using the variable P_VARI (ALV Variant), also add this:
*at selection-screen on value-request for p_vari.
perform f4_for_variant.
*at selection-screen.
perform pai_of_selection_screen.
After the "END-OF-SELECTION" statement, add these lines:
perform build_layout using layout.
perform build_print using prints.
perform write_using_alv.
You also have to create the following forms: (you can find samples
in this program)
INITIALIZE_FIELDCAT
USER_COMMAND (only if you are creating a STATUS)
WRITE_USING_ALV
ENDFORM.
*& Form INITIALIZE_FIELDCAT_SAMPLE
THIS IS A SAMPLE, DO NOT USE THIS FORM IN YOUR PROGRAM
-->P_FIELDTAB[] text *
FORM INITIALIZE_FIELDCAT_SAMPLE USING P_TAB TYPE SLIS_T_FIELDCAT_ALV.
DATA: CAT TYPE SLIS_FIELDCAT_ALV.
CLEAR CAT. " Always clear before use
CAT-TABNAME = 'I'. " Your internal table
CAT-REF_TABNAME = 'ZCUSTMAS'. " The data dictionary reference table
CAT-FIELDNAME = 'KUNNR'. " Name of your field in the itable.
CAT-COL_POS = 1. " Output position
APPEND CAT TO P_TAB.
CAT-FIELDNAME = 'NAME1'. " Next field
CAT-COL_POS = 2.
APPEND CAT TO P_TAB.
CAT-FIELDNAME = 'STRAS'. " and the next
CAT-COL_POS = 3.
APPEND CAT TO P_TAB.
CAT-FIELDNAME = 'LOEVM'.
CAT-SELTEXT_S = 'Del'. " You can always override the descrip-
CAT-SELTEXT_M = 'Delivery'. " tion (short, medium, large)
CAT-SELTEXT_L = 'Delivery Num'.
CAT-COL_POS = 4.
APPEND CAT TO P_TAB.
CAT-FIELDNAME = 'FKIMG'.
CAT-DO_SUM = 'X'. " You want totals calculated.
CAT-NO_OUT = 'X'. " and hidden.
APPEND CAT TO P_TAB.
ENDFORM. " INITIALIZE_FIELDCAT
*& Form BUILD_EVENTTAB
THIS IS THE SAME FOR ALL THE PROGRAMS
-->P_EVENTS[] text *
FORM BUILD_EVENTTAB USING P_EVENTS TYPE SLIS_T_EVENT.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING
I_LIST_TYPE = 0
IMPORTING
ET_EVENTS = P_EVENTS.
READ TABLE P_EVENTS WITH KEY NAME = SLIS_EV_TOP_OF_PAGE
INTO LS_EVENT.
IF SY-SUBRC = 0.
MOVE FORMNAME_TOP_OF_PAGE TO LS_EVENT-FORM.
APPEND LS_EVENT TO P_EVENTS.
ENDIF.
CLEAR LS_EVENT.
READ TABLE P_EVENTS WITH KEY NAME = SLIS_EV_END_OF_LIST
INTO LS_EVENT.
IF SY-SUBRC = 0.
MOVE FORMNAME_END_OF_LIST TO LS_EVENT-FORM.
APPEND LS_EVENT TO P_EVENTS.
ENDIF.
CLEAR LS_EVENT.
READ TABLE P_EVENTS WITH KEY NAME = SLIS_EV_BEFORE_LINE_OUTPUT
INTO LS_EVENT.
IF SY-SUBRC = 0.
MOVE FORMNAME_BEFORE_LINE TO LS_EVENT-FORM.
APPEND LS_EVENT TO P_EVENTS.
ENDIF.
CLEAR LS_EVENT.
READ TABLE P_EVENTS WITH KEY NAME = SLIS_EV_AFTER_LINE_OUTPUT
INTO LS_EVENT.
IF SY-SUBRC = 0.
MOVE FORMNAME_AFTER_LINE TO LS_EVENT-FORM.
APPEND LS_EVENT TO P_EVENTS.
ENDIF.
CLEAR LS_EVENT.
READ TABLE P_EVENTS WITH KEY NAME = SLIS_EV_END_OF_PAGE
INTO LS_EVENT.
IF SY-SUBRC = 0.
MOVE FORMNAME_END_OF_PAGE TO LS_EVENT-FORM.
APPEND LS_EVENT TO P_EVENTS.
ENDIF.
ENDFORM. " BUILD_EVENTTAB
*& Form BUILD_COMMENT
NOT REALLY NEEDED, BUT I'LL LEAVE IT THERE, JUST IN CASE...
-->P_HEADING[] text *
FORM BUILD_COMMENT USING P_HEADING TYPE SLIS_T_LISTHEADER.
DATA: HLINE TYPE SLIS_LISTHEADER,
TEXT(60) TYPE C,
SEP(20) TYPE C.
CLEAR: HLINE, TEXT.
HLINE-TYP = 'H'.
write: text-101 to text+23.
HLINE-INFO = TEXT.
APPEND HLINE TO P_HEADING.
ENDFORM. " BUILD_COMMENT
*& Form INITIALIZE_VARIANT
VERY IMPORTANT WHEN YOU USE VARIANTS!!!
FORM INITIALIZE_VARIANT.
G_SAVE = 'A'.
CLEAR G_VARIANT.
G_VARIANT-REPORT = REPNAME.
GX_VARIANT = G_VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET'
EXPORTING
I_SAVE = G_SAVE
CHANGING
CS_VARIANT = GX_VARIANT
EXCEPTIONS
NOT_FOUND = 2.
IF SY-SUBRC = 0.
P_VARI = GX_VARIANT-VARIANT.
ENDIF.
ENDFORM. " INITIALIZE_VARIANT
*& Form PAI_OF_SELECTION_SCREEN
ALSO FOR VARIANTS
FORM PAI_OF_SELECTION_SCREEN.
IF NOT P_VARI IS INITIAL.
MOVE G_VARIANT TO GX_VARIANT.
MOVE P_VARI TO GX_VARIANT-VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE'
EXPORTING
I_SAVE = G_SAVE
CHANGING
CS_VARIANT = GX_VARIANT
EXCEPTIONS
WRONG_INPUT = 1
NOT_FOUND = 2
PROGRAM_ERROR = 3.
IF SY-SUBRC EQ 0.
G_VARIANT = GX_VARIANT.
ELSE.
PERFORM INITIALIZE_VARIANT.
ENDIF.
ELSE.
PERFORM INITIALIZE_VARIANT.
ENDIF.
ENDFORM. " PAI_OF_SELECTION_SCREEN
*& Form F4_FOR_VARIANT
text
FORM F4_FOR_VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
EXPORTING
IS_VARIANT = G_VARIANT
I_SAVE = G_SAVE
IMPORTING
E_EXIT = G_EXIT
ES_VARIANT = GX_VARIANT
EXCEPTIONS
NOT_FOUND = 2.
IF SY-SUBRC = 2.
MESSAGE ID SY-MSGID TYPE 'S' NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ELSE.
IF G_EXIT = SPACE.
P_VARI = GX_VARIANT-VARIANT.
ENDIF.
ENDIF.
ENDFORM. " F4_FOR_VARIANT
*& Form BUILD_LAYOUT
STANDARD LAYOUT
-->P_LAYOUT text *
FORM BUILD_LAYOUT USING P_LAYOUT TYPE SLIS_LAYOUT_ALV.
P_LAYOUT-F2CODE = F2CODE.
P_LAYOUT-ZEBRA = 'X'.
p_layout-detail_popup = 'X'.
P_LAYOUT-TOTALS_TEXT = SPACE.
P_LAYOUT-SUBTOTALS_TEXT = SPACE.
ENDFORM. " BUILD_LAYOUT
FORM BUILD_PRINT *
STANDARD PRINT OPTIONS *
--> P_PRINT *
FORM BUILD_PRINT USING P_PRINT TYPE SLIS_PRINT_ALV.
P_PRINT-NO_PRINT_LISTINFOS = 'X'.
P_PRINT-NO_PRINT_SELINFOS = ' '.
ENDFORM. " BUILD_PRINT
FORM PF_STATUS_SET *
NAME YOUR STATUS ALV. IF YOU NEED IT.. *
FORM PF_STATUS_SET USING EXTAB TYPE SLIS_T_EXTAB.
SET PF-STATUS 'ALV' EXCLUDING EXTAB.
ENDFORM. " PF_STATUS_SET
FORM USER_COMMAND_SAMPLE *
--> UCOMM *
--> SELFIELD *
FORM USER_COMMAND_SAMPLE USING UCOMM LIKE SY-UCOMM
SELFIELD TYPE SLIS_SELFIELD.
CASE UCOMM.
WHEN 'MSXL'. " Export to Excel
perform set_excel_export.
CLEAR UCOMM.
WHEN 'MM03'.
set parameter id 'MAT' field selfield-value.
call transaction 'MM03' and skip first screen.
CLEAR UCOMM.
WHEN 'BGR1'.
perform fill_available.
perform graph_available.
CLEAR UCOMM.
WHEN 'DOCU'.
call function 'Z_HELP' exporting repname = repname.
ENDCASE.
ENDFORM. " USER_COMMAND
*& Form WRITE_USING_ALV_SAMPLE
*THIS IS A SAMPLE AND MUST BE WRITTEN DIRECTLY IN THE MAIN PROGRAM
FORM WRITE_USING_ALV_SAMPLE.
YOU CAN MERGE WITH A DATA DICTIONARY TABLE USING THIS:
call function 'REUSE_ALV_FIELDCATALOG_MERGE'
exporting
i_program_name = repname
i_internal_tabname = 'I'
i_inclname = repname
changing
ct_fieldcat = fieldtab.
if sy-subrc <> 0.
write: 'SY-SUBRC: ', sy-subrc, 'REUSE_ALV_FIELDCATALOG_MERGE'.
endif.
OR JUST DISPLAY IT USING THIS:
call function 'REUSE_ALV_LIST_DISPLAY'
exporting
i_callback_program = repname
i_callback_pf_status_set = 'PF_STATUS_SET'
i_callback_user_command = 'USER_COMMAND'
i_structure_name = 'I'
is_layout = layout
it_fieldcat = fieldtab
i_default = 'A'
i_save = g_save
is_variant = g_variant
it_events = events[]
is_print = prints
tables
t_outtab = i.
if sy-subrc <> 0.
write: 'SY-SUBRC: ', sy-subrc, 'REUSE_ALV_LIST_DISPLAY'.
endif.
ENDFORM. " WRITE_USING_ALV
thanks
mrutyun^ -
Why is not updateable the Item of block?
I created a block, Update Allowed of the property of block is Yes, Insert Allowed is No, Locking Mode is Immediate.
Set Update Allowed of the property of the item vendor_name is Yes.
Compile the form.
Open the form , but can not update the item vendor_name , Why is that?
Thank you.
Edited by: huak on Sep 2, 2008 9:02 PMCan you give some more detail on what happens when you try to update the field?
Can you place the cursor in it?
Are you trying to add more characters to the field, change a highlighted character or delete a character?
Does the field flicker when you type something or does it not respond at all? -
Why am not getting the FILED LABLES in SM30 for my_Z_table?
Hi Experts,
I created a Z table with 5 fileds, all are Z fileds. Initially, I created all 5 Z domains, corresponding all 5 Z data elements. Then, I assigned thses 5 data elements, to the fileds in the Z table. I have defined the SHORT, MEDIUM, LONG, HEADING fileds, while creating the DATA ELENETS.
Then, I wanna, to populate some entries into this Z table, so, I opened the SM30 for this Z table, but, I did NOT see the FILED LABLES for the last 3 fileds(am getting the LABLES for first 2 fileds), instead am getting as "+" sign at the place of FILED LABLES.
1 - So, pls. let me know that, Why am getting as + instaed of FILED LABELS?
2 - How show up the FILED LABLES for the last 3 fileds.
I guess, there is enough room. coz, length is only 15 CHAR.
thanq
Edited by: Srinivas on Mar 24, 2008 12:28 AMHi Srinivas,
Go to the data elements SAVE and then activate it once more.Now generate the table maintance once again.It will work..
Thanks Arjun -
When I'm using google, yahoo or ask, or any search engine website. I did any random research used and clicked on any link searched by google, it immediately opened and directed me to the new tab to the link that I just clicked. My question is: Why isn't direct the link that I want to load on the same tab? It didn't happen on the last update. Is this a bug? If it's not then is there any solution? Maybe the setting. I will thanks and appreciate for any help.
Opening the results in the same tab or in a new tab can be set via the search settings page of the Google and Yahoo! sites.
For the Google website you can set your preferences on the Google.com page via the gear icon at the top right, click that button to open the menu list and select Search settings.
* http://www.google.com/preferences?hl=en
* Results Window: Open search results in a new browser window.
For Yahoo! on the Yahoo! search page via:
*http://search.yahoo.com/
*More > Preferences > Display & Layout > Open results in a new tab or window -
help...........
it happen, because i wanted to customize my fire fox and drag the tabs over navigation tool bar.. now i can not see the tabs unless i click on group your tabs button :( and can not change it any moreBy PM
''hi John, i can not see, how many sites are open, because i do not see the tabs! i am sorry but i do not know how to explain it:( I see a window with my bookmarks -toolbar, menu bar and navigation bar, but no tabs for the sites, i am on! thank you for taking time and answering! ''
What happens when you open a new tab for instance use Keyboard shortcut Ctrl +T does that open a new tab that you can see. Please attach a screenshot of your ordinary Firefox page e.g. open on this forum. And a screenshot of the Group Your tabs view.
* [[How do I create a screenshot of my problem?]]
* [[How to make screenshots]]
I could suggest trying the Firefox reset, but that may be rather premature
* [[Reset Firefox – easily fix most problems]]
Maybe you are looking for
-
M phone is ded and does not want to turn on.
okay I have an iPhone5c,my iPhone is dead at the very moment, I thought maybe it was just dead, I tried to charge it anyay it does not want to turn back on,at all the screen was just black most of the time it comes out as the little battery with the
-
Dreamweaver CS3 Paste HTML Problem
Hi, I'm a fairly basic user of Dreamweaver CS3. I used to be able to paste HTML into webpages with no problem. I have recently upgraded to CS3 and that menu command (Paste HTML) seems to have gone. Can anybody help? Thanks, your help would be appreci
-
Dear HR gurus, I need your assistance on a strange issue we are facing in our enterprise. We have an employee X for which when monthly payroll was run it shows that system gave an amount XXX under the head of Leave Encashment (Wagetype 3018). When I
-
Submit Button Look and Location
Right now in FormsCentral, we can only put the Submit button in four places (top, bottom, left, right) Is there a way to move it to a different position...like...in the middle of a page? Is there a way to configure the color or size or text of the FC
-
Problem in AT LINE SELECTION event
Hi All, I have a problem in AT LINE SELECTION event. I have an interactive report. In the report after selection on Selection Screen i have to show some totals. Now when I click on the no wgich is shown against the total the report should further dri