Changing a selection of buttons on a template
Hello.
I have created a template for sub menu that I use on a constant basis. each button on the menu has a drop shadow...
I was wondering if there is a way to select all of them at once and remove that shadow?
I will have anywhere from 1-10 sub menus and it is time consuming for me to remove it button by button with 12 buttons on each menu....
any ideas?
changing the number of buttons doesn't seem like a good idea
it's quite simple like this
a grid 7 x 7
first row for S M T W T F S
the next 6 x 7 for 'locations' of the various days of the month
program opens, builds gui, and determines currentMonth
method setDays() called which
- sets text of 6 x 7 to ""
- determines days in currentMonth
- determines dayOfWeek of 1st day of currentMonth
- sets text of button[7+dayOfweek] to 1, then next button to 2, then 3 etc to daysInMonth
buttons next/previous add/subtract 1 to/from currentMonth, and setDays() called again
changing the button text calls repaint(), so no need to call it yourself.
the above is from memory, so text positions could be off by a day, but it's a basic
routine, and with a bit of experimentaion, should do what you want
Similar Messages
-
Skin or change color of selected radio button or selected checkbox
I'm creating a custom CSS and I want to change the color of the checkmark (or the icon used) for selected radio buttons/checkboxes. Right now it's green (because it's using the simple stylesheet) but I don't know what element I can use to change the color or skin it. I've tried the af:selectBooleanCheckbox and af:selectBooleanRadio (even though they say they are only for disabled and read-only) but they don't appear to do anything... what do I use?
Have a look at
http://www.oracle.com/technology/products/jdev/htdocs/partners/addins/exchange/jsf/doc/skin-selectors.html
Searh e.g for
af:selectBooleanCheckbox Component
to learn how to work with custom images
Frank -
File name should change by selecting the radio buttons
Hi all,
PARAMETERs: p_file LIKE rlgrap-filename.
PARAMETERS: p_app RADIOBUTTON GROUP rg DEFAULT 'X',
p_pre RADIOBUTTON GROUP rg.
this is to download the ITAB data to presentation and application servers depending upon the radio button selected.
if i select p_pre , then default download path is : 'C:/ download.txt'.
if i select P_app , default download path is : '\usr\sap\EBG\SYS\profile\DOWN.TXT'.
how the file name should change by selecting the radio buttons ?
Thanks
KRHi,
DATA: c_x VALUE 'X'.
selection-screen begin of block input with frame title text-000.
parameters :desktop radiobutton group rg_f user-command rg_f,
in_file type ibipparms-path modif id ps DEFAULT 'C:/ download.txt',
menu radiobutton group rg_f ,
sys_file type ibipparms-path modif id as default '\usr\sap\EBG\SYS\profile\DOWN.TXT' .
selection-screen end of block input.
at selection-screen output.
if desktop is initial and menu is initial.
desktop = c_x.
endif.
perform f_toggle_finputs.
form f_toggle_finputs.
loop at screen.
if screen-group1 = 'PS'.
if desktop = c_x.
screen-input = 1.
* sys_file = c_server_path.
else.
screen-input = 0.
endif.
endif.
if screen-group1 = 'AS'.
if menu = c_x.
screen-input = 1.
* clear: in_file.
else.
screen-input = 0.
endif.
endif.
modify screen.
endloop.
endform. "f_toggle_finputs
Hope this helps u.
Thanks. -
How to add Change Layout, savelayout, select layout Button to ALV Toolba
How to add Change Layout, savelayout, select layout Button to ALV Toolbar?
Moderator message: please (re)search yourself before asking.
[Asking Good Questions in the Forums to get Good Answers|/people/rob.burbank/blog/2010/05/12/asking-good-questions-in-the-forums-to-get-good-answers]
locked by: Thomas Zloch on Sep 10, 2010 10:57 AMVariant
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
EXPORTING
is_variant = gs_variant
i_save = c_save
it_default_fieldcat =
IMPORTING
e_exit = gf_exit
es_variant = gs_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 gf_exit = space.
cf_varia = gs_variant-variant.
ENDIF.
ENDIF.
CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET'
EXPORTING
i_save = c_save
CHANGING
cs_variant = gs_variant
EXCEPTIONS
wrong_input = 1
not_found = 2
program_error = 3
OTHERS = 4.
IF sy-subrc NE 0.
cf_subrc = sy-subrc.
ENDIF.
Change Layout, savelayout, select layout Button pass the value which is in BOLD
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = gd_repid
i_callback_user_command = 'U_COMMAND'
i_callback_top_of_page = 'TOP-OF-PAGE'
is_layout = fld_lay
it_fieldcat = fieldcatalog[]
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT = it_sort[]
i_default = 'X'
i_save = 'A'
is_variant = gs_variant
it_events = it_event[]
TABLES
t_outtab = it_sales
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2
Annasaheb -
Changing the Selection Screen on the selection of a radio button
Hi experts,
I am stuck with a situation here.
I have a selection screen with 2 blocks.
The first block contains 5 radio buttons.
The second block contains 7 select options fields.
Now i want to show different select options when the user selects different radio buttons.
For example, when the user selects radio button 1, select options 1, 2, 3, 4, and 5 should be shown.
When the user selects radio button2, select options 3, 4, 5, 6, and 7 should be shown.
How do i go about implementing this????
I guess i need to do the coding in event "AT SELECTION-SCREEN OUTPUT".
Should i use MODIF ID????
Please help.
Points will be awarded.
Thanks and Regards
Gaurav Kumar RaghavUse AT SELECTION-SCREEN
not AT SELECTION-SCREEN OUTPUT.
cause output addition makes it a PBO not PAI
check ur requirement & use the events accordingly
group all select options under one group which you want to show on selection of radio button
under AT SELECTION-SCREEN
loop at screen and change the property "ACTIVE (0/1)" for the group you want
& don't forget to modify screen table in the end.
one more thing u should do is use addition USER-COMMAND with your radio buttons.
PARAMETERS : r1 RADIOBUTTON GROUP r1 USER-COMMAND f1,
r2 RADIOBUTTON GROUP r1.
PARAMETERS : p1 TYPE c MODIF ID a,
p2 TYPE c MODIF ID b.
AT SELECTION-SCREEN . " output
LOOP AT SCREEN .
IF r2 = 'X' AND screen-name = 'P1'.
screen-active = '0'.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
Edited by: mrugesh phatak on Oct 8, 2008 11:00 AM -
How to disable the select options button, while audio is playing in the question template in captivate 8?
Apologies for late reply.
I mean "On Question screens audio keeps on playing even after we have selected an option or options depending on the question type and clicked Submit. How do we stop the audio on selecting an option?" -
Changing the selections in a Group by tool bar in SharePoint Designer to option buttons
I want to simply change the selections from a dropdown to radio buttons in the "Group by:" tool bar in a Data Form Web Part in SharePoint Designer 2010. ANy help will be appreciated.
Mike
Michael L. WilliamsHi,
If you want to use Radio button instead of Dropdown list for the Group by selection, we can use JavaScript to generate the Radio buttons and hide the Dropdown list. When there
is a selection made on Radio buttons, we will trigger the change event of the Dropdown list and filter the Data Form with the corresponding value.
Working with Radio buttons
Handling the change event of the Radio button
Here are two links about how to select and trigger the select event of the Dropdown list:
http://jsfiddle.net/x3UyB/4/
http://stackoverflow.com/questions/902212/trigger-change-event-of-dropdown
Best regards
Patrick Liang
TechNet Community Support -
How to change power state in a Service Profile Template
I'd like to change the setting "Power State" in a Service Profile Template. While I can change nearly every other aspect of the template, I can't find this in the UCS Manager GUI. Is this an immutable decision while creating the template? Can I change it via the CLI?
Hi Joernclausen,
What is the firmware version of your UCS?
From the CLI try the following and let me know if it works.
Go into the FI CLI and perform the steps below, ensure to enter your own template_name and select appropriate type of template followed by setting the power up or down
sj-ucs-r13-mon-A# scope org
sj-ucs-r13-mon-A /org # enter service-profile template_name initial-template
sj-ucs-r13-mon-A /org/service-profile # power up
sj-ucs-r13-mon-A /org/service-profile* # commit-buffer
sj-ucs-r13-mon-A /org/service-profile # power down
sj-ucs-r13-mon-A /org/service-profile* # commit-buffer
You may also be able to change the power state from the individual service profiles
Go to the service profile and use "Change Initial Power State" button for modifying the desired-power value.
see attached screenshot -
Select row button not getting displayed in alv grid.
Hi ,
As per my requirement I am using tab strip in module pool.
Each tab strip is containing one ALV.
And user can change delete or create one record when the alv is displayed.
The same should be saved in the database and ALV should be refreshed.
When I am displaying the ALV the left most option of the ALV with which I can select the whole row is not coming.
Because of which I am unable to call the method to get the selected row and delete or change accordingly.
Why this button is not coming?
I am using set_table_for_first_display in my program.
Please help.Hi,
In the method SET_TABLE_FOR_FIRST_DISPLAY, you will have to change the Selection Mode to 'A'. I guess you are not passing any values to the Layout parameters.
Once you do that, you will find what your are looking for.
Data : LA_LAYO type LVC_S_LAYO.
LS_LAYO_SEL_MODE = 'A'.
and pass this to the method's layout parameter.
Cheers,
SKC, -
How can I change the 'selected' color of one JToggleButton only.
Hi,
This seems like a simple / trivial question, but I just can't figure it out. Is there a way that I can create a JToggleButton and change the selected color of only that JToggleButton.
I'm trying to create a simple sidebar like component for navigation within my app. A group of JToggleButton[s] added to a ButtonGroup (with the proper layout / sizing) works great, but the default JToggleButton colors don't suit my needs. I know that I can change the colors using the UIManager / UIDefaults, but I don't want to change the defaults for every JToggleButton in my app. I only want to change the defaults for a few select JToggleButton[s].
For example, I can do this:
UIManager.put("ToggleButton.select", UIManager.getColor("Table.selectionBackground"));
UIManager.put("ToggleButton.background", UIManager.getColor("Table.background"));but I'd rather do something like this:
JToggleButton jtb = new JToggleButton("Toggle Button Text");
jtb.setSelectedColor(UIManager.getColor("Table.selectionBackground"));
jtb.setBackground(UIManager.getColor("Table.background"));The only thing is, I can't find any method that is the equivilant of 'setSelectedColor(Color)' for JToggleButton.
I know I could do it by adding some listeners to the JToggleButton[s], but that seems a little complicated for something like changing a color.
I'd also seen a solution in the forums where someone had extended the ButtonUI of the pluggable look and feel they were using. I'm not interested in modifying the look and feel I'm using. As far as I'm concerned, that would defeat the purpose of having a pluggable look and feel as I would have to duplicate my efforts for every look and feel I want to use.
Any help would be appreciated,
Ryantry this
import javax.swing.*;
import java.awt.*;
class Testing extends JFrame
public Testing()
setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
setSize(250,75);
setLocation(400,300);
JPanel jp = new JPanel();
JToggleButton jtb = new JToggleButton("Toggle me");
jtb.setUI(new MyUI());
jp.add(jtb);
getContentPane().add(jp);
public static void main(String args[]){new Testing().setVisible(true);}
class MyUI extends javax.swing.plaf.metal.MetalToggleButtonUI
public Color getSelectColor(){return Color.BLACK;}
} -
Get the value of a selected radio button within a ToggleGroup
All
Please see the script below. All I'm trying to do is to identify the selected radio button within a ToggleGroup. This has been working in JavaFX 1.2.
This is JavaFX 1.3 running on NetBeans 6.9 (beta) on Ubuntu 10.04
Does anyone know why this is no longer working?
import javafx.scene.Scene;
import javafx.stage.Stage;
import javafx.scene.control.ToggleGroup;
import javafx.scene.control.RadioButton;
import javafx.scene.layout.HBox;
import javafx.scene.control.Toggle;
def levelGroup = ToggleGroup {};
var selected: Toggle = bind levelGroup.selectedToggle on replace {
// here I want to capture the value of the selected toggle
// the outputted value is always 'null'
println("level toggle = {selected.value}");
println("selectedToggle = {levelGroup.selectedToggle.value}");
Stage {
scene: Scene {
width: 300
height: 300
content: [
HBox {
translateX: 100
translateY: 67
spacing: 20
content: [
RadioButton {
toggleGroup: levelGroup
text: "Easy"
selected: false
RadioButton {
toggleGroup: levelGroup
text: "Medium"
selected: true
RadioButton {
toggleGroup: levelGroup
text: "Hard"
selected: false
}Actually, your code above wouldn't have worked in JavaFX 1.2 as we only added the value property to the new Toggle mixin in 1.3. I believe what worked for you in 1.2 was when you referred to text, which is not a property on Toggle, so you need to cast the selected variable from Toggle to a RadioButton, which does have a text property. For example, this would work:
var selected: Toggle = bind levelGroup.selectedToggle on replace {
println("level toggle = {(selected as RadioButton).text}");
println("selectedToggle = {(levelGroup.selectedToggle as RadioButton).text}");
}Alternatively, instead of casting like this, you can store a value in the value property of the Toggle mixin class, which is extended by RadioButton. For example, your code could be changed to the following (in particular note that the only change is the addition of the value properties in each of the RadioButton):
import javafx.scene.Scene;
import javafx.stage.Stage;
import javafx.scene.control.ToggleGroup;
import javafx.scene.control.RadioButton;
import javafx.scene.layout.HBox;
import javafx.scene.control.Toggle;
def levelGroup = ToggleGroup {};
var selected: Toggle = bind levelGroup.selectedToggle on replace {
println("level toggle = {selected.value}");
println("selectedToggle = {levelGroup.selectedToggle.value}");
Stage {
scene: Scene {
width: 300
height: 300
content: [
HBox {
translateX: 100
translateY: 67
spacing: 20
content: [
RadioButton {
toggleGroup: levelGroup
text: "Easy"
selected: false
value: "Easy"
RadioButton {
toggleGroup: levelGroup
text: "Medium"
selected: true
value: "Medium"
RadioButton {
toggleGroup: levelGroup
text: "Hard"
selected: false
value: "Hard"
}This approach saves you from having to cast from Toggle to RadioButton. This second approach is actually very powerful, as you can store any object in the value field, and can then easily retrieve it at a later point when the user selects the desired RadioButton. Of course, you can just use it as in the simple case above as well.
I hope that helps. -
How to change text + links in footer of existing template
Hello,
I need to change the text and links on the template footer that goes to all TABs. (Home, Articles, About Bluemont, BCA, Contact Us).The file is named NavigationBlank.dwt."
This footerwas created to link visitors to our "join or contribute" page on another site. Now I want to stop using that external site and build the capacity to take memberships within the BluemontVA.org site itself. However the template footer can't be changed so easily as text on a page.
I am webmaster for a local nonprofit (web address = www.BluemontVA.org), but work on a website I inherited. It is a wonderful design, but I don't fully understand it. I have not worked with templates before.
I have read O'Reilly on "Adding a basic editable region" in a template, but need further help.
A couple questions worry me:
How much damage may I have done already by trying? For example, I do seem to have removed the old text/links and added a new text message on the NavigationBlank.dwt page -- but these changes do not show up on the other TAB pages.
Also, when I place the cursor n the design side it no longer tracks to the corresponding spot on the code view. (the cursor shows up in code view way above where it is supposed to be by the text). This is true for the home page and also for several pages I took a look at.
Can I follow instructions to change the template from any of the pages on which it appears? Or do I have to be at NavigationBlank.dwt?
Thanks for any help or advice you can provide.I'm confused.
Working With Dreamweaver Templates (.dwt files).
PART 1
1. Create a page with all the sitewide elements (common header, footer, sidebar, CSS styles, etc..) that you will need for your project. This requires some careful pre-planning even for small web sites.
2. Validate your code & test this prototype page in all major browsers.
3. When you're completely satisfied with the page layout, SaveAs Template. DW will save this as a .dwt file in a site folder called Templates.
4. DW will ask you to add Editable Regions for stuff that will change from page to page. Do this and SAVE.
5. Close your Template.dwt file.
PART 2
1. File > New Page > from Template. Select the template you wish to use. Hit OK.
2. This is a child page. An exact duplicate of your Template however you can only edit content within editable regions. Everything else is locked.
3. SaveAs index.html (your home page) or some-other-filename.html.
PART 3
Repeat PART 2 for each additional site page required.
PART 4
1. Open your main TEMPLATE file and add a navigation menu with links to your site pages. Do not put this into an Editable Region! If you do it won't show up on child pages.
2. SAVE.
3. DW will ask if you want to populate changes to child pages. Hit yes.
4. Publish all site pages to your server.
PART 5
If you should ever need to edit your TEMPLATE .dwt file, Repeat PART 4.
Nancy O.
Alt-Web Design & Publishing
Web | Graphics | Print | Media Specialists
http://alt-web.com/
http://twitter.com/altweb -
Newbie question: How do I cange text on the buttons from a template?
I don't mind when it takes a while to figure out stuff that's really complicated, but it kills me when I can't get something that should be (and I'm sure is) easy. I have my first downtime since getting my Final Cuts bundle and am trying to figure out DVDSP using a menu template to start. I've managed to import all my assets, manage the navigation, change the title, add a slideshow, do looping and linking, and everything plays fine in the simulator. What I can't do is change the names from "Button 1" etc to appropriate names, ie "contact". I'm sure it's something really simple, but I'm not finding it. Any help out there?
G5 Quad Mac OS X (10.4.5)Oh, inspector - text. OK, second time I've posted a question here after working forever on it then found it as soon as I posted.
G5 Quad Mac OS X (10.4.5) -
HOW TO PERFORM SELECT ALL BUTTON IN ALV
Hi ,
i displayed output by using list display. in my status i have one button i.e. select all. when i click that button it has to select all the chckboxes in my list display.
anybody can send me the code please.
i am sending my code below.
report zmahi6.
type-pools : slis.
tables : zuser_secobjects.
data: t_header1 like zvfrcsthdr.
data : begin of t_header occurs 0 .
include structure t_header1.
data : customer_name like zvsfrcsthdr-customer_name,
kukla like kna1-kukla,
end of t_header.
data : t_header1 like zuser_secobjects.
data : begin of it_secobjects occurs 0.
include structure t_header1.
data : box,
input(1) type c,
end of it_secobjects.
*data : it_secobjects like zuser_secobjects occurs 0 with header line.
data : i_field type slis_t_fieldcat_alv with header line.
data : w_field like line of i_field.
data : i_sort type slis_t_sortinfo_alv.
data : w_sort like line of i_sort.
data : it_filt1 type slis_t_filter_alv with header line.
data:
i_tabname type tabname,
i_repid like sy-repid,
is_lout type slis_layout_alv.
data : chk_box type slis_fieldname.
selection-screen: begin of block b1 with frame title text-t01.
parameters : p_appln type zuser_secobjects-appln.
parameters : p_user type usr02-bname, "zuser_secobjects-appln_user,
p_partnr type zuser_secobjects-appln_partner,
p_ptype type zuser_secobjects-partner_type default '02',
p_upostn type zuser_secobjects-user_position,
p_sdate like likp-erdat default sy-datum,
"type zuser_secobjects-start_date
p_edate(10) default '12/31/9999',
type zuser_secobjects-end_date,
p_revnum type zuser_secobjects-revnum,
p_cted type zuser_secobjects-created_by,
p_cdate type zuser_secobjects-creation_date,
p_ctime type zuser_secobjects-creation_time,
p_chnby type zuser_secobjects-changed_by,
p_cdate1 type zuser_secobjects-changed_date,
p_ctime1 type zuser_secobjects-changed_time.
selection-screen: end of block b1.
start-of-selection.
perform get_data.
check sy-subrc eq 0.
set pf-status 'ZMAHEE'.
perform prepare_fieldcatalog.
perform alv_list_display.
form user_command using r_ucomm like sy-ucomm
rs_selfield type slis_selfield.
case r_ucomm.
when 'DELETE'.
perform delete.
endcase.
ENDFORM.
*& Form PREPARE_FIELDCATALOG
text
--> p1 text
<-- p2 text
form prepare_fieldcatalog.
clear: w_field,i_field.
refresh:i_field.
i_field-key = 'X'.
i_field-col_pos = 1.
i_field-ddictxt = 'S'.
i_field-seltext_s = '@11@'.
i_field-checkbox = 'X'.
i_field-input = 'X'.
i_field-fieldname = 'HEADER'.
i_field-outputlen = 0.
append i_field.
clear i_field.
w_field-fieldname = 'APPLN'.
w_field-tabname = 'IT_SECOBJECTS'.
w_field-seltext_l = text-m01.
w_field-outputlen = '10'.
w_field-col_pos = 1.
append w_field to i_field.
clear w_field.
w_field-fieldname = 'APPLN_USER'.
w_field-tabname = 'IT_SECOBJECTS'.
w_field-just = 'C'.
w_field-seltext_l = text-m02.
w_field-outputlen = '7'.
w_field-col_pos = 2.
append w_field to i_field.
clear w_field.
endform. " PREPARE_FIELDCATALOG
FORM pf_status_set *
--> RT_EXTAB *
form pf_status_set using rt_extab type slis_t_extab.
set pf-status '0001'.
endform.
*form user_command using r_ucomm like sy-ucomm
rs_selfield type slis_selfield.
*form user_command using r_ucomm like sy-ucomm
rs_selfield type slis_selfield.
case r_ucomm.
when 'DELETE'.
perform delete.
endcase.
*endform.
*& Form ALV_LIST_DISPLAY
text
--> p1 text
<-- p2 text
form alv_list_display.
i_repid = sy-repid.
call function 'REUSE_ALV_LIST_DISPLAY'
exporting
i_callback_program = i_repid
i_callback_pf_status_set = 'PF_STATUS_SET'
i_callback_user_comomand = 'USER_COMMAND'
is_layout = is_lout
it_fieldcat = i_field[]
it_sort = i_sort
it_events = it_evts[]
tables
t_outtab = it_secobjects.
endform. " ALV_LIST_DISPLAY
*& Form GET_DATA
text
--> p1 text
<-- p2 text
form get_data.
select * from zuser_secobjects
into table it_secobjects.
endform. " GET_DATA
*& Form delete
text
--> p1 text
<-- p2 text
form delete.
data : lines type i.
do lines times.
clear it_secobjects.
read line sy-index field value it_secobjects-box.
read table it_secobjects with key appln = it_secobjects-appln
appln_user = it_secobjects-appln_user.
if it_secobjects-input ne 'X'.
it_secobjects-box = 'X'.
modify line sy-index
field value it_secobjects-box.
else.
it_secobjects-box = space.
modify line sy-index
field value it_secobjects-box.
endif.
enddo.
endform. " delete
this program is not working when i select select all button. this button exist in pf status 0001.
anybody can modify the code and send me the code again.
thanks,
maheedhar.tHI Rich,
i tried in this way also but i didnt get the output. i am sending my code again plz do the necessary changes and resend it to me if possible,
report zmahi6.
type-pools : slis.
tables : zuser_secobjects.
data: t_header1 like zvfrcsthdr.
data : begin of t_header occurs 0 .
include structure t_header1.
data : customer_name like zvsfrcsthdr-customer_name,
kukla like kna1-kukla,
end of t_header.
data : t_header1 like zuser_secobjects.
data : begin of it_secobjects occurs 0.
include structure t_header1.
data : box,
input(1) type c,
checkBOX(1) type c,
end of it_secobjects.
data : wa_ita like line of it_secobjects.
*data : it_secobjects like zuser_secobjects occurs 0 with header line.
data : i_field type slis_t_fieldcat_alv with header line.
data : w_field like line of i_field.
data : i_sort type slis_t_sortinfo_alv.
data : w_sort like line of i_sort.
data : it_filt1 type slis_t_filter_alv with header line.
data:
i_tabname type tabname,
i_repid like sy-repid,
is_lout type slis_layout_alv.
data : chk_box type slis_fieldname.
selection-screen: begin of block b1 with frame title text-t01.
parameters : p_appln type zuser_secobjects-appln.
parameters : p_user type usr02-bname, "zuser_secobjects-appln_user,
p_partnr type zuser_secobjects-appln_partner,
p_ptype type zuser_secobjects-partner_type default '02',
p_upostn type zuser_secobjects-user_position,
p_sdate like likp-erdat default sy-datum,
"type zuser_secobjects-start_date
p_edate(10) default '12/31/9999',
type zuser_secobjects-end_date,
p_revnum type zuser_secobjects-revnum,
p_cted type zuser_secobjects-created_by,
p_cdate type zuser_secobjects-creation_date,
p_ctime type zuser_secobjects-creation_time,
p_chnby type zuser_secobjects-changed_by,
p_cdate1 type zuser_secobjects-changed_date,
p_ctime1 type zuser_secobjects-changed_time.
selection-screen: end of block b1.
start-of-selection.
perform get_data.
check sy-subrc eq 0.
set pf-status 'ZMAHEE'.
perform prepare_fieldcatalog.
perform alv_list_display.
END-OF-SELECTION.
AT USER-COMMAND.
CASE SY-UCOMM.
when 'DELETE'.
loop at it_secobjects.
it_secobjects-checkBOX = 'X'. "<-this would be the name of the
modify it_secobjects.
endloop.
rs_selfield-refresh = 'X'.
PERFORM ALV_LIST_DISPLAY.
endcase.
*ENDCASE.
*ENDFORM.
*& Form PREPARE_FIELDCATALOG
text
--> p1 text
<-- p2 text
form prepare_fieldcatalog.
clear: w_field,i_field.
refresh:i_field.
i_field-key = 'X'.
i_field-col_pos = 1.
i_field-ddictxt = 'S'.
i_field-seltext_s = '@11@'.
i_field-checkbox = 'X'.
i_field-input = 'X'.
i_field-fieldname = 'HEADER'.
i_field-outputlen = 0.
append i_field.
clear i_field.
w_field-fieldname = 'APPLN'.
w_field-tabname = 'IT_SECOBJECTS'.
w_field-seltext_l = text-m01.
w_field-outputlen = '10'.
w_field-col_pos = 1.
append w_field to i_field.
clear w_field.
w_field-fieldname = 'APPLN_USER'.
w_field-tabname = 'IT_SECOBJECTS'.
w_field-just = 'C'.
w_field-seltext_l = text-m02.
w_field-outputlen = '7'.
w_field-col_pos = 2.
append w_field to i_field.
clear w_field.
endform. " PREPARE_FIELDCATALOG
FORM pf_status_set *
--> RT_EXTAB *
form pf_status_set using rt_extab type slis_t_extab.
set pf-status '0001'.
endform.
*form user_command using r_ucomm like sy-ucomm
rs_selfield type slis_selfield.
*form user_command using r_ucomm like sy-ucomm
rs_selfield type slis_selfield.
case r_ucomm.
when 'DELETE'.
perform delete.
endcase.
*endform.
*form user_command using p_ucomm like sy-ucomm
*rs_selfield type slis_selfield.
case p_ucomm.
when 'DELETE'. " SELALL is the FCODE of ur push
*button
loop at it_secobjects into wa_ita.
it_secobjects-check = 'X'.
modify it_secobjects from wa_ita.
endloop.
endcase.
*endform.
form user_command using r_ucomm like sy-ucomm
rs_selfield type slis_selfield.
case r_ucomm.
when 'DELETE'.
loop at it_secobjects.
it_secobjects-checkBOX = 'X'. "<-this would be the name of the
*checkbox field in your internal table.
modify it_secobjects.
endloop.
rs_selfield-refresh = 'X'.
PERFORM ALV_LIST_DISPLAY.
endcase.
endform.
*& Form ALV_LIST_DISPLAY
text
--> p1 text
<-- p2 text
form alv_list_display.
i_repid = sy-repid.
call function 'REUSE_ALV_LIST_DISPLAY'
exporting
i_callback_program = i_repid
i_callback_pf_status_set = 'PF_STATUS_SET'
i_callback_user_comomand = 'USER_COMMAND'
is_layout = is_lout
it_fieldcat = i_field[]
it_sort = i_sort
it_events = it_evts[]
tables
t_outtab = it_secobjects.
endform. " ALV_LIST_DISPLAY
*& Form GET_DATA
text
--> p1 text
<-- p2 text
form get_data.
select * from zuser_secobjects
into table it_secobjects.
endform. " GET_DATA
*& Form delete
text
--> p1 text
<-- p2 text
form delete.
data : lines type i.
do lines times.
clear it_secobjects.
read line sy-index field value it_secobjects-box.
read table it_secobjects with key appln = it_secobjects-appln
appln_user = it_secobjects-appln_user.
if it_secobjects-input ne 'X'.
it_secobjects-box = 'X'.
modify line sy-index
field value it_secobjects-box.
else.
it_secobjects-box = space.
modify line sy-index
field value it_secobjects-box.
endif.
enddo.
endform. " delete
thanks,
maheedhar.t -
Use VBA to place signatures in a word document by selecting radio buttons
Hi,
I'm creating an word document with signatures. I have 4 signatures of which max 2 and at least 1 can be choosen.
I created 2 frames with 4 radiobuttons. The document writer can select one button in the frst frame with the names of het directors and none or 1 in the other frame. How can I relate the choosen radiobuttons to pictures of the signatures and place
them in a table in the word document?I don't understand what you are saying. I do this from a form. The user selects a signatory from a combobox. I look up the corresponding png file in a database and insert a picture, signatory name/position in doc at specified bookmarks
in the template. This is the code to insert picture at bookmark.
Sub SetBkMarkPic(xDoc As Document, xBkName As String, xFile As String)
' Set bookmark in document. Add file to bookmark
If xDoc.Bookmarks.Exists(xBkName) Then
xDoc.Bookmarks(xBkName).Select
xDoc.Bookmarks(xBkName).Range.Text = ""
Selection.InlineShapes.AddPicture fileName:=xFile
End If
End Sub
Maybe you are looking for
-
Vmware.log missing information
Hi! I was wondering if somebody can please enlighten me, I have noticed some of the information is missing from vmware.log file on the VM. For eg: I am investigating if there was any problem on 2015-03-12T15:00:00 but the log is stopping at 2015-03-
-
2760 purchased in USA doesn't work in Australia
I purchased a new 2760 from a Nokia dealer last month and was able to use my Telstra SIM card in it in the USA, but when I arrived back in Australia, I get no signal from Telstra. I transferred the SIM card to an older phone and that worked so there
-
Parallel execution of Mat script in Labview
Hi All I have an application where I am using MatLAB program to simulate 3D image simulation for vibration data. In this we are using two Mat Script call in two instances which are running parallel. The issue observed is MatLAB scripts which am run
-
CANopen communication over TCP/IP
The NI Modbus Library makes it possible to implement the MODBUS protocol through COMPORT or over the TCP/IP. I would like to implement the NI CAN or the NI CANopen communication through a COMPORT (VISA connection) or secondary through TCP. Can anyone
-
Add one more segment in item Category Key Flexfeild
Hi I want to add one more segment in item Category Key Flexfeild and that is not a mandatory feild. What are the implications if I add one more segment in KFF? Does it effect anywhere in the system? Please let me know your thoughts. Thanks