Write code for this its urgent
hi its a alv bills of material report plz write code for this
Develop a report to high light the bom and/or master receipes fall into the constrained planning horizon those are not ready for porduction
this report will identity the items with a bom with a status other that 03(ready for production) and/or master receips witha a status other than 04(released). the items will be reveiwed in predefined horizon.
within a few weeks of entering the 18 th week constrained planning horizon.
for this report take bom tables stko,stpo,mast.
in sel-scren take mrp controller, plant, divison.
send immedialtly
Brother this is not the correct way to ask.
In your words you are commanding...
But we have to request the EXPERTS.
WE are in learning stage dont order or command.
Just request them in another way...... then only u get the required reply....
With regards,
Prasad.
Similar Messages
-
How to write code for this logic in a routine, very urgent --help me
hi all,
i want to apply this logic into one subroutin ZABC.
here i m giving my logic ,can any body help me in coding for this, this is very urgent, i hv to submit on wednesday.
4.1 Read the company code number BSEG-BUKRS from document line item.
4.2 Fetch PRDHA from MARA into GV_PRDHA where MATNR = BSEG-MATNR.
4.3 Fetch Business area (GSBER) from ZFIBU into GV_GSBER where (PRDHA = GV_PRDHA and BUKRS = BSEG-BUKRS) OR (PRDHA = GV_PRDHA and BUKRS = SPACE).
4.4 If business area match is found, go to step 3.9. Else continue.
4.5 If BKPF-BLART IN set ZVS_POSDT OR BKPF-XBLNR starts with I0*, execute steps below. Else, go to Step 3.6.
i. MOVE: BSEG-BKURS TO work area field WA_ZFIBUE-BUKRS,
BSEG-MATNR TO work area field WA_ZFIBUE-MATNR,
GV_PRDHA TO work area field WA_ZFIBUE-PRDHA,
BSEG-HKONT TO work area field WA_ZFIBUE-HKONT,
BSEG-GSBER TO work area field WA_ZFIBUE-GSBER,
BSEG-PSWBT TO work area field WA_ZFIBUE-PSWBT,
BKPF-BUDAT TO work area field WA_ZFIBUE-BUDAT,
SY-DATUM TO work area field WA_ZFIBUE-CREDATE,
SY-UZEIT TO work area field WA_ZFIBUE-CRETIME,
Fetch running serial number (WA_ZFIBUE-SERIALNO) from ZFICO. This number will be stored in ZFICO with PARAMTYPE = "BPM030307", SUBTYPE = "ZFIBUE" and KEY1 = "SERIALNO". The actual serial number will be stored in the field VALUE1.
i. Insert WA_ZFIBUE INTO ZFIBUE.
ii. Send email notification to the user (if it is not already sent to user on the same posting date).
Use function module SO_NEW_DOCUMENT_ATT_SEND_API1 to send mail.
Fetch email address and date of last email from ZFICO. These values will be stored in ZFICO with PARAMTYPE = "BPM030307", SUBTYPE = "EMAIL" and KEY1 = "<USERNAME>". The email address will be stored in the field VALUE1 and posting date in VALUE2. Once mail is sent, VALUE2 is updated with latest posting date (BKPF-BUDAT).
iii. Increment the running serial number and update ZFICO with new serial number.
a. GV_ SERIALNO = WA_ZFIBUE-SERIALNO + 1
b. Update ZFICO Set value1 = GV_SERIALNO
Where PARAMTYPE = "BPM030307" AND
SUBTYPE = "ZFIBUE" AND
KEY1 = "SERIALNO".
iv Move VDFT to BSEG-GSBER.
v. Exit routine.
4.6 Fetch MTART into GV_MTART from MARA where MATNR = BSEG-MATNR.
4.7 If SY-BATCH = INITIAL AND GV_MTART <> ROH, issue the error message - Maintain the mapping of product hierarchy <PRDHA> from article <MATNR> for <BUKRS>. Else, go to step 3.8.
4.8 If SY-BATCH <> INITIAL AND GV_MTART <> ROH, issue the error message - Maintain product hierarchy on article master. Go to step 3.10.
4.9 Move GV_GSBER TO BSEG-GSBER.
4.10 Exit Routine
plz give me reply asap --this is very urgent
thanks in advance
swathiHi Swathi,
If it's very very urgent then you better get on with it, don't waste time on the web. Chop chop. -
How to write code for this logic, plz help me very urgent
Hi All,
i am new to sap-abap, i got this work and i m working on this can any body help me in writing code, plz help me, this is very very urgent.
here i m giving my logic, can anybody send me the code related to this logic.
this is very urgent .
this program o/p should be in ALV format and need to create one commond 'SAVE" on this o/t list if user clicks save processedon and processedby fields in ZFIBUE should be updated automatically.
i am creating one custom table zfibue having fields: (serialno, bukrs, matnr,prdha,hkont,gsber,wrbtr,budat, credate, cretime,processed, processedon, processedby,mapped)
fields of zfibue:
serailno = numc
bukrs = char
matnr = char
prdha = char
hkont = char
gsber = char
wrbtr = char
budat = date
credate = date
cretime = time
processed= char
processedon = date
processedby = char
mapped = char are belongs to above type data types
and seelct-optionfields: s_bukrs for bseg-bukrs
s_hkont for bseg-hkont,
s_budat for bkpf-budat,
s_processed for zfibue-processed,
s_processedon for zfibue-processedon,
s_mapped. for zfibue-mapped
parameters: p_chk1 as checkbox,
p_chk2 as checkbox.
p_filepath type rlgrap-filename.
1.1 Validate the user inputs (S_BUKRS and S_HKONT) against respective check tables (T001 and SKB1). If the validation fails, provide respective error message. Eg: Invalid input for Company Code.
1.2 Fetch SERIALNO, BUKRS, MATNR, PRDHA, HKONT, GSBER, WRBTR, BUDAT, CREDATE, CRETIME, PROCESSED, PROCESSEDON, PROCESSEDBY, MAPPED from table ZFIBUE into internal table GT_ZFIBUE where BUKRS IN S_BUKRS, HKONT IN S_HKONT, BUDAT IN S_BUDAT, PROCESSED IN S_PROCESSED, PROCESSEDON IN S_PROCESSEDON, and MAPPED IN S_MAPPED.
1.3 If P_CHK2 = X, go to step 1.11. Else continue.
1.4 If P_CHK1 = X, continue. Else go to step 1.9
1.5 Fetch MATNR, PRDHA from MARA into GT_MARA for all entries in GT_ZFIBUE where MATNR = GT_ZFIBUE-MATNR.
1.6 Sort and delete adjacent duplicates from GT_MARA based on MATNR.
1.7 Loop through GT_ZFIBUE where PRDHA = blank.
Read Table GT_MARA based on MATNR = GT_ZFIBUE-MATNR.
IF sy-subrc = 0.
Move GT_MARA-PRDHA to GT_ZFIBUE-PRDHA.
Modify Table GT_ZFIBUE. Update Product Hierarchy
Endif.
Fetch PRDHA, GSBER from ZFIBU into GT_ZFIBU for all entries in GT_ZFIBUE where PRDHA = GT_ZFIBUE-PRDHA.
Read Table GT_ZFIBU based on PRDHA = GT_ZFIBUE-PRDHA.
IF sy-subrc = 0.
Move GT_ZFIBU-GSBER to GT_ZFIBUE-GSBER.
Move X to GT_ZFIBUE-MAPPED.
Modify Table GT_ZFIBUE.
Endif.
Endloop.
1.8 Modify database table ZFIBUE from GT_ZFIBUE.
1.9 Fill the field catalog table GT_FIELDCAT using the details of output fields listed in section Inputs/Outputs (above).
Eg: LWA_ FIELDCAT -SELTEXT_L = 'Serial Number.
LWA_ FIELDCAT -DATATYPE = NUMC.
LWA_ FIELDCAT -OUTPUTLEN = 9.
LWA_ FIELDCAT -TABNAME = 'GT_ZFIBUE'.
LWA_ FIELDCAT-FIELDNAME = 'SERIALNO'.
Append LWA_FIELDCAT to GT_FIELDCAT
Note: a) The output field GT_ZFIBUE-PROCESSED will be editable marking INPUT = X in field catalog (GT_FIELDCAT).
b) The standard ALV functionality will be used to give the user option for selecting all or blocks of entries at a time.
c) The PF-STATUS STANDARD_FULLSCREEN from function group SLVC_FULLSCREEN will be copied to the program and modified to include a SAVE button.
1.10 Call the function module REUSE_ALV_GRID_DISPLAY passing output table GT_ZFIBUE and field catalog GT_FIELDCAT. Additional parameters like I_CALLBACK_PF_STATUS_SET (= ZFIBUESTAT) and I_CALLBACK_USER_COMMAND (=HANDLE_USER_ACTION) will also be passed to handle user events. Go to 2.14.
1.11 Download the file to P_FILEPATH using function module GUI_DOWNLOAD passing GT_ZFIBUE.
1.12 Exit Program.
Logic to be implemented in routine Handle_User_Action
This routine will have the following interface:
FORM Handle_User_Action USING r_ucomm LIKE sy-ucomm
rs_selfield TYPE slis_selfield.
ENDFORM.
Following logic will be implemented in this routine:
1. If r_ucomm = SAVE, continue. Else exit.
2. Loop through GT_ZFIBUE where SEL_ROW = X. Row is selected
a. IF GT_ZFIBUE-PROCESSED = X.
i. GT_ZFIBUE-PROCESSEDON = SY-DATUM.
ii. GT_ZFIBUE-PROCESSEDBY = SY-UNAME.
iii. MODIFY ZFIBUE FROM work area GT_ZFIBUE.
Endif.
Endloop.Hi Swathi,
If it's very very urgent then you better get on with it, don't waste time on the web. Chop chop. -
Classical report how to write code for this task
coding
Delivery Due List: This Report program generates list with details of quantity available, quantity planned, quantity delivered and quantity still to be delivered for sales orders and stock transport orders based on shipping pointHi,
Try to get TABLE and FIELD names from your senoir or functional consultants.
or
search the field names in the following tables...
VBAP
LIPS
VBRP.
Regards,
Billa -
I am trying to open iTunes on my mac. But a box pops up saying "The folder iTunes is on a locked disk or you do not have write permissions for this folder". Anyone know what that means? I've had my computer 2 years and its never had a problem opening it
I've already right-clicked on the application, clicked "get info", and changed it so all people listed in the "Sharing & Permissions" section have the "read & write" privilage.
The error message is referring to your iTunes library, not your iTunes application.
You need to check and fix the permissions of the iTunes folder in your iTunes library. This is by default located in your "Music" folder.
Select the folder Music > iTunes in the Finder, right click on it or Ctrl Click and click "Get Info". At the bottom of the contextual window thatwill pop up, disclose the Sharing and Permissions brick, change your status from Read only to Read & Write. You may need to click the padlock icon to make changes. -
Wanted to sync up my new IPhone4, and thought that I should make sure I had the most up to date version of ITunes on my desktop first. Tried to get on site, and got an error message saying; "The folder ITunes is on a locked disk or you do not have write permissions for this folder." Cannot get on ITunes at all now. Help! Thx.
In my case its a new computer the old one was stolen and the time machine disk did not work for a restore but did for copying the info to the new mac
-
In the transformation between 0FIGL_O02(table1) and ZSPM_D01(table2), delete records in 0FIGL_O02(table1), if 0AC_DOC_NO AND 0FISCPER AND 0COMP_CODE do not exists in 0FIAP_O03(table 3).
need code for this...i have to implement it in BW.pls give me necessary code.
Moderator message: please do more research before asking, show what you have done when posting, use meaningful titles when posting, read the rules of engagement.
Edited by: Thomas Zloch on Feb 24, 2012Hai Pavan
Check the following Code
tables : mara.
data : begin of itab occurs 0,
matnr like mara-matnr,
mbrsh like mara-mbrsh,
mtart like mara-mtart,
meins like mara-meins,
end of itab.
select-options : S_matnr for mara-matnr.
initialization.
clear s_matnr.
refresh : s_matnr.
s_matnr-low = '0001'.
s_matnr-high = '0010'.
s_matnr-Sign = 'I'.
s_matnr-Option = 'BT'.
append s_matnr.
start-of-selection.
select matnr
mbrsh
mtart
meins
from mara
into table itab
where matnr in s_matnr.
if sy-subrc = 0.
sort itab by matnr.
endif.
if not itab[] is initial.
loop at itab.
if itab-matnr NOT BETWEEN s_matnr-high AND s_matnr-low.
if sy-subrc = 0.
write :/ 'OK'.
else.
write :/ 'Not OK'.
endif.
endif.
endloop.
endif.
Thanks & regards
Sreenivasulu P
Message was edited by: Sreenivasulu Ponnadi -
Need code for this checkbox trigger...please
Hi All,
I have a checkbox in detail block where block is having No. of records displayed is 3(Three) so Checkbox and all other items are displaying thrice. I am inserting the records 1 by 1 using the following code
Declare
Begin
Loop
First_Record;
Insert into Veri_Test values(:PNo,:c1);
Exit When :System.Last_Record='TRUE';
Next_Record;
End Loop;
COMMIT;
End;
Its inserting properly. no problem. But what I want is
when i checked on 1st row of checkbox remaining two(2nd,3rd row) checkboxes should be disabled. If i uncheck 1st row checkbox then
remaining two should be enabled. As same way
If i click on 3rd row of checkbox remaining two(1,2) should be disabled. If i uncheck 3rd row checkbox then remaining two(1,2) should be enabled.
Hope its clear. is it possible ? if yes can anyboxy give the code for this checkbox trigger ?
Thanks in Advacne
DevenderHello,
Apply this in a When-Checkbox-Changed trigger:
Declare
-- Record being modified --
LN$CurRec pls_integer := :system.cursor_record ;
LN$Rec pls_integer := 1 ;
Begin
If :BLOC.CB1 = 'O' Then
-- Goto first record --
First_record ;
Loop
If LN$Rec <> LN$CurRec Then
-- record <> current record --
:BLOC.CB1 := 'N' ;
End if ;
If :system.last_record = 'TRUE' Then
Exit ;
End if ;
-- Goto next record --
Next_record ;
LN$Rec := LN$Rec + 1 ;
End loop ;
-- Jump to current record --
Go_Record( LN$CurRec );
End if ;
End ;Francois -
Need code for this Small validation on when-validate-item
Hi All,
I have a text item(date datatype) in forms 4.5 I need to do a small validation want to write on when-validate-item. When I enter a date in that text item (Ex 10-JUN-2005) it has to check
1) It Cannot be "blank"
2) It cannot be "Not older than today"
can you please put me code for this small validation. I am new to Forms.
Thanks in Advance,
ReddyI always put code in the when-validate-RECORD trigger to ensure fields are entered, rather than setting the property. That way, the user can enter other fields within the record, and then gets a message that the field is required only when leaving the record.
...of course, if the date item is the only field in the block, then the when-validate triggers will not run unless the user at least types a space in the date. In that case, you need to check in the key-commit trigger. -
Hi all! Plz go through this!! Hope you understood this
material no item no description
1 10 abc
1 80 cde
1 35 fgh
1 50 ijk
1 95 lmn
2 52 xyz
Now for the same material we have to concatenate the description only for the least 3 of the item no(10,35,50) how to write a code for this?
Plz send me to [email protected]sort itab by matnr item.
loop at itab.
lv_tabix = sy-tabix.
at new matnr.
read itab index lv_tabix.
loop at itab where matnr = itab-matnr.
if count < 3.
count = count + 1.
concatenate desc itab-desc into desc separated by space.
else.
clear count.
clear desc.
exit.
endif.
itab_new-matnr = itab-matnr.
itab_new-desc = desc.
append itab_new.
clear itab_new.
endloop.
endat.
endloop.
Regards,
Ravi -
Need help to write code for 'Print" button......!
Hi all,
I am working in oracle forms 6i.I am creating forms for ordering product/quantity(Entering quantity/product details). In my form i have "Print button" to print the quantity details which is in multi-record block(database item).Please help me of how to write code for print button. If u had any source code please post it.
Please help asap......!
Thanks
regards,
jameYou haven't got an answer or a reply because this question is asked so many times.
Why don't you search the forum to find them? -
I have unintalled and reinstalled several times, just suddenly stopped working. I have windows 7, have for awhile. I get the following message: The Folder I tunes is on a locked disk or you do not have write permissions for this folder"
I had an existing account that i am no longer able to access.
I got one email suggesting right click and run as program administrator, tried it and did not work. Also went into permissions folder and ensured was listed as program administrator.
Help and Thanks in advance.Hi Chris,
I apologize, I'm a bit unclear on the exact nature of your issue. When you say a "different server", if you mean that you recently changed the location where iTunes was storing its files (local or otherwise), you may find the following article helpful:
iTunes for Windows: Moving your iTunes Media folder
http://support.apple.com/kb/ht1364
Regards,
- Brenden -
How to write code for page up and page down buttons on alv screen?
Hi,
Page up and page down buttons are not working in general alv report. Thease buttons are in disable mode. But is stnd. transactions (tcode : fbl5n) these are enabled and working properly, but we can't debug this with /h
How to write code for page up and page down buttons on alv screen?Poonam,
On doing the screen debugging it took me over to Include LSTXWFCC ,kindly check the below code.
module cc_display.
fcode = sy-ucomm(4).
case sy-ucomm(4).
when 'P--'.
perform cc_firstpage.
when 'P-'.
perform cc_prevpage.
when 'P+'.
perform cc_nextpage.
when 'P++'.
perform cc_lastpage.
when 'EX--'.
perform cc_firstcopy.
when 'EX-'.
perform cc_prevcopy.
when 'EX+'.
perform cc_nextcopy.
when 'EX++'.
perform cc_lastcopy.
I guess it can give you some lead.
K.Kiran. -
How to write code for font family using swing?
how to write code for font family using swing?
i tried this code.but i got only font styles.but i need font family.observ this code
import java.awt.*;
import java.awt.event.*;
public class fontSelect extends java.awt.Dialog implements AdjustmentListener, ItemListener, TextListener, ActionListener {
public Font selectedFont; //to get result
public boolean isSelected = false;
public Color selectedBackground, selectedForeground;
public fontSelect(Frame parent, boolean modal) {
super(parent, modal);
String fntName[] = getToolkit().getFontList();
GraphicsEnvironment ge = GraphicsEnvironment.getLocalGraphicsEnvironment();
String[] names = ge.getAvailableFontFamilyNames();
//{{INIT_CONTROLS
setLayout(null);
setVisible(false);
//setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
setSize(insets().left + insets().right + 380,insets().top + insets().bottom + 282);
setBackground(java.awt.Color.lightGray);
fontList = new java.awt.Choice();
//fontList = new java.awt.List(0,false);
add(fontList);
fontList.setBounds(insets().left +25,insets().top + 50,137,144);
//label1 = new java.awt.Label("Example:-");
//label1.setBounds(insets().left + 220,insets().top + 36,84,30);
//add(label1);
exampleText = new java.awt.TextField();
//exampleText.setText("sample string ");
//exampleText.setBounds(insets().left + 40,insets().top + 50,84,21);
//add(exampleText);
label2 = new java.awt.Label("Font Family:-");
label2.setBounds(insets().left + 25,insets().top + 30,70,19);
add(label2);
isBold = new java.awt.Checkbox("Bold");
isBold.setBounds(insets().left + 320,insets().top + 90,60,18);
isBold.setFont(new Font("Times New Roman", Font.BOLD, 12));
add(isBold);
isItalic = new java.awt.Checkbox("Italic");
isItalic.setBounds(insets().left + 250,insets().top + 90,48,17);
isItalic.setFont(new Font("Times New Roman", Font.ITALIC, 12));
add(isItalic);
showFont = new java.awt.Label("samplestring ",Label.CENTER);
showFont.setBounds(insets().left + 240,insets().top +50,120,30);
showFont.setBackground(java.awt.Color.white);
add(showFont);
label11 = new java.awt.Label("Size:-");
label11.setBounds(insets().left + 290,insets().top + 120,70,19);
add(label11);
fontSize = new java.awt.Choice();
add(fontSize);
//label11 = new java.awt.Label("Example string");
fontSize.setBounds(insets().left + 290,insets().top + 140,60,23);
fontSize.setBackground(java.awt.Color.white);
btnSelect = new java.awt.Button();
btnSelect.setLabel("Select");
btnSelect.setBounds(insets().left + 280,insets().top + 190,87,24);
add(btnSelect);
btnCancel = new java.awt.Button();
btnCancel.setLabel("Cancel");
btnCancel.setBounds(insets().left + 280,insets().top + 230,91,24);
add(btnCancel);
label3 = new java.awt.Label("Background:-");
label3.setBounds(insets().left + 24,insets().top + 90,94,18);
add(label3);
rBackground = new java.awt.Scrollbar(Scrollbar.HORIZONTAL,255,0,0,255);
rBackground.setBounds(insets().left + 24,insets().top +110 ,197,21);
add(rBackground);
gBackground = new java.awt.Scrollbar(Scrollbar.HORIZONTAL,255,0,0,255);
gBackground.setBounds(insets().left + 24,insets().top + 135,197,21);
add(gBackground);
bBackground = new java.awt.Scrollbar(Scrollbar.HORIZONTAL,255,0,0,255);
bBackground.setBounds(insets().left + 24,insets().top + 160,197,21);
add(bBackground);
label4 = new java.awt.Label("R");
label4.setBounds(insets().left + 12,insets().top + 110,12,18);
label4.setFont(new Font("Times New Roman", Font.BOLD, 12));
label4.setForeground(java.awt.Color.red);
add(label4);
label5 = new java.awt.Label("G");
label5.setBounds(insets().left + 12,insets().top + 135,12,18);
label5.setFont(new Font("Times New Roman", Font.BOLD, 12));
label5.setForeground(new Color(-16744448));
add(label5);
label6 = new java.awt.Label("B");
label6.setBounds(insets().left + 12,insets().top + 160,12,18);
label6.setFont(new Font("Times New Roman", Font.BOLD, 12));
label6.setForeground(java.awt.Color.blue);
add(label6);
rBackValue = new java.awt.Label("255");
rBackValue.setBounds(insets().left + 225,insets().top + 110,24,12);
rBackValue.setFont(new Font("Times New Roman", Font.BOLD, 12));
rBackValue.setForeground(java.awt.Color.red);
add(rBackValue);
gBackValue = new java.awt.Label("255");
gBackValue.setBounds(insets().left + 225,insets().top + 135,24,12);
gBackValue.setFont(new Font("Times New Roman", Font.BOLD, 12));
gBackValue.setForeground(new Color(-16744384));
add(gBackValue);
bBackValue = new java.awt.Label("255");
bBackValue.setBounds(insets().left + 225,insets().top + 160,24,12);
bBackValue.setFont(new Font("Times New Roman", Font.BOLD, 12));
bBackValue.setForeground(java.awt.Color.blue);
add(bBackValue);
label7 = new java.awt.Label("Foreground:-");
label7.setBounds(insets().left + 20,insets().top + 185,94,18);
add(label7);
rForeground = new java.awt.Scrollbar(Scrollbar.HORIZONTAL,0,0,0,255);
rForeground.setBounds(insets().left + 20,insets().top + 205,197,21);
add(rForeground);
gForeground = new java.awt.Scrollbar(Scrollbar.HORIZONTAL,0,0,0,255);
gForeground.setBounds(insets().left + 20,insets().top + 230,197,21);
add(gForeground);
bForeground = new java.awt.Scrollbar(Scrollbar.HORIZONTAL,0,0,0,255);
bForeground.setBounds(insets().left + 20,insets().top + 255,197,21);
add(bForeground);
label8 = new java.awt.Label("R");
label8.setBounds(insets().left + 10,insets().top + 205,12,18);
label8.setFont(new Font("Times New Roman", Font.BOLD, 12));
label8.setForeground(java.awt.Color.red);
add(label8);
label9 = new java.awt.Label("G");
label9.setBounds(insets().left + 10,insets().top + 230,12,18);
label9.setFont(new Font("Times New Roman", Font.BOLD, 12));
label9.setForeground(new Color(-16744448));
add(label9);
label10 = new java.awt.Label("B");
label10.setBounds(insets().left + 10,insets().top + 255,12,18);
label10.setFont(new Font("Times New Roman", Font.BOLD, 12));
label10.setForeground(java.awt.Color.blue);
add(label10);
rForeValue = new java.awt.Label("255");
rForeValue.setBounds(insets().left + 220,insets().top + 205,24,12);
rForeValue.setFont(new Font("Times New Roman", Font.BOLD, 12));
rForeValue.setForeground(java.awt.Color.red);
add(rForeValue);
gForeValue = new java.awt.Label("255");
gForeValue.setBounds(insets().left + 220,insets().top + 230,24,12);
gForeValue.setFont(new Font("Times New Roman", Font.BOLD, 12));
gForeValue.setForeground(new Color(-16744384));
add(gForeValue);
bForeValue = new java.awt.Label("255");
bForeValue.setBounds(insets().left + 220,insets().top + 255,24,12);
bForeValue.setFont(new Font("Times New Roman", Font.BOLD, 12));
bForeValue.setForeground(java.awt.Color.blue);
add(bForeValue);
setTitle("Choosing font");
//{{REGISTER_LISTENERS
exampleText.addTextListener(this);
btnSelect.addActionListener(this);
btnCancel.addActionListener(this);
isBold.addItemListener(this);
fontList.addItemListener(this);
isItalic.addItemListener(this);
fontSize.addItemListener(this);
rBackground.addAdjustmentListener(this);
gBackground.addAdjustmentListener(this);
bBackground.addAdjustmentListener(this);
rForeground.addAdjustmentListener(this);
gForeground.addAdjustmentListener(this);
bForeground.addAdjustmentListener(this);
for (int i = 0; i < (int)fntName.length; i++)
fontList.addItem(fntName);
showFont.setFont(new Font(fntName[0], Font.PLAIN, 12));
// GraphicsEnvironment ge = GraphicsEnvironment.getLocalGraphicsEnvironment();
//String[] names = ge.getAvailableFontFamilyNames();
for ( int i=0; i<names.length; i++ )
System.out.println( names[i] );
selectedBackground = showFont.getBackground();
selectedForeground = showFont.getForeground();
int i = 8;
do {
fontSize.addItem(""+i);
if (i<=30) i+=2;
else if (i<=70) i+=4;
else i+=8;
} while (i<150);
try {
fontSize.select(2);
} catch (IllegalArgumentException e) { }
//{{DECLARE_CONTROLS
//java.awt.List fontList;
java.awt.Label label11;
java.awt.Label label1;
java.awt.TextField exampleText;
java.awt.Label label2;
java.awt.Checkbox isBold;
java.awt.Checkbox isItalic;
java.awt.Label showFont;
java.awt.Choice fontSize;
java.awt.Choice fontList;
java.awt.Button btnSelect;
java.awt.Button btnCancel;
java.awt.Label label3;
java.awt.Scrollbar rBackground;
java.awt.Scrollbar gBackground;
java.awt.Scrollbar bBackground;
java.awt.Label label4;
java.awt.Label label5;
java.awt.Label label6;
java.awt.Label rBackValue;
java.awt.Label gBackValue;
java.awt.Label bBackValue;
java.awt.Label label7;
java.awt.Scrollbar rForeground;
java.awt.Scrollbar gForeground;
java.awt.Scrollbar bForeground;
java.awt.Label label8;
java.awt.Label label9;
java.awt.Label label10;
java.awt.Label rForeValue;
java.awt.Label gForeValue;
java.awt.Label bForeValue;
private Font constructFont() {
int l;
try {
l = Integer.parseInt(fontSize.getSelectedItem());
} catch (NumberFormatException e) {l = 12;}
selectedFont = new Font(fontList.getItem(fontList.getSelectedIndex()>=0?fontList.getSelectedIndex():0 ), (isBold.getState()?Font.BOLD:0)+(isItalic.getState()?Font.ITALIC:0), l);
selectedBackground = new Color(rBackground.getValue(), gBackground.getValue(), bBackground.getValue());
selectedForeground = new Color(rForeground.getValue(), gForeground.getValue(), bForeground.getValue());
return (selectedFont);
public void textValueChanged(java.awt.event.TextEvent event) {
Object object = event.getSource();
if (object == exampleText) showFont.setText(exampleText.getText());
public void actionPerformed(java.awt.event.ActionEvent event) {
Object object = event.getSource();
if (object == btnSelect) {
isSelected = true;
selectedFont = constructFont();
dispose();
} else if (object == btnCancel) {
selectedFont = null;
selectedBackground = null;
selectedForeground = null;
dispose();
public void itemStateChanged(java.awt.event.ItemEvent event) {
Object object = event.getSource();
if (object == isBold) showFont.setFont(constructFont());
else if (object == fontList) showFont.setFont(constructFont());
else if (object == isItalic) showFont.setFont(constructFont());
else if (object == fontSize) showFont.setFont(constructFont());
public void adjustmentValueChanged(java.awt.event.AdjustmentEvent event)
Object object = event.getSource();
constructFont();
showFont.setBackground(new Color(rBackground.getValue(), gBackground.getValue(), bBackground.getValue()));
showFont.setForeground(new Color(rForeground.getValue(), gForeground.getValue(), bForeground.getValue()));
if (object == rBackground) rBackValue.setText(""+rBackground.getValue());
else if (object == gBackground) gBackValue.setText(""+gBackground.getValue());
else if (object == bBackground) bBackValue.setText(""+bBackground.getValue());
else if (object == rForeground) rForeValue.setText(""+rForeground.getValue());
else if (object == gForeground) gForeValue.setText(""+gForeground.getValue());
else if (object == bForeground) bForeValue.setText(""+bForeground.getValue());Okay, that's better. It would have been nice if the code was formatted, and if there was about 20% of that code. (Your example could have been just one JLabel and nothing else, for example.)
Anyway, now that you've posted that code, what is your question about it? I see you are calling a "getAvailableFontFamilyNames" method; do you have a question about that? If so, what is the question? -
After downloading IOS5, i can't access my itune and receive the following message "The Folder "Itune" is on locked disk or you do not have write permissions for this folder", noting that i access this folder in a normal way. Any clue ?
In my case its a new computer the old one was stolen and the time machine disk did not work for a restore but did for copying the info to the new mac
Maybe you are looking for
-
How to track the Back and Forword functiona on a JFrame
We are Developing an Application with Java swings.In this we 've used some of the components and are JFrame,JPanel,SplitPane,JButtons and etc. In this we've used JButton for the Back and forword function as we have with the I.E. So the Problem is tha
-
PDFs in XP are bigger and TABs turn into boxes in Acrobat 9
I recently upgraded a computer from Windows 2000 to Windows XP. Now when Illustrator saves as PDF the files are 100kb or more bigger. TAB characters display as rectangles in Acrobat 8 and 9, but not 5. I have since tested 3 computers in about 10 diff
-
I have a transaction that a user accidentally posted with a doc date and due date of 2007. I don't care about the docdate so much, but I need to update the due date to be 2009. What table(s) and fields do I need to update in sql to do this? I nee
-
Hi, I am unable to schedule the reports after implementing SSL in OBIEE 11.1.1.6.2 I get the below error. when ever i try to save the agent. The following error occurred: Oracle BI Scheduler Error: Error Message From BI Security Service: [nQSError: 1
-
More af tables, same viewobject, different whereclause
Hi. JDeveloper 11.1.1.2, bc4j, jsff Is it possible to have to pages (jsff) based on the same viewobject ie. persons where page1 shows men (where sex=male) and page2 shows women (where sex=female)? How? Best regards Erik