Code Sample: Improved Calender code applying to form.

Hi friends,
Here I developed a Code for dynamically applying Calender code to form. The code is available to your mail address.
regards,
Praveenkumar Talla

<font color=red size=4><b>Everyone READ THIS</b></font>
<p>Praveenkumar Talla has not participated in any Oracle forum since 2004, so he will not be reading your requests here.
<p>His website is here,
<p>and you can email him directly at: [email protected]
<p>or: [email protected]
<p>Or why don't you go to Oracle's website where you can download a calendar form example. Read this thread, and the post by a.j.woodward: Re: Calendar Source Code available
<p><font color=red size=4>Do not post a request with your email address here!</font>

Similar Messages

I Need Help to Access The Source Code From A Form to Know the Calculation Formula

Hi,
I Need Help to Access The Source Code From A Form to Know the Calculation Formula. The application is a windows form application that is linked to SQL Server 2008. In one of the application forms it generates an invoice and does some calculations. I just
need to know where behind that form is the code that's doing the calculations to generate the invoice, I just need to get into the formula that's doing these calculations.
Thank you so much.

Hi,
Thanks for the reply. This is a view and [AmountDue] is supposed to be [CurrentDueAmount] + [PastDueAmount] - [PaidAmount]. The view is not calculating [PaidAmount] right . Below is the complete code of the view. Do you see anything wrong in the code ?
Thanks.
SELECT [isi].[InvoiceID], [ii].[DueDate], [SubInvoiceID] = [isi].[ID], [INV_FacilityID] = [if].[ID], [if].[FacilityID],
[iff].[FacilityFeeID], [LoanID] = NULL, [isi].[PortfolioID], [isi].[Portfolio],
[PaymentType] = [isis_fee].[SectionType], [Name]
= [iff].[Name], [ReceivedAmount], [dates].[CurrentDueAmount],
[PastDueAmount] = CASE WHEN ISNULL([ReceivedAmount],
0) > 0 THEN [pastdue].[PastDueFeeAmount] + ISNULL([ReceivedAmount], 0)
WHEN ISNULL([ReceivedAmount], 0)
< 0 THEN /* We bring past due to zero and
apply reset to current. */ CASE WHEN [pastdue].[PastDueFeeAmount] + ISNULL([ReceivedAmount], 0)
< 0 THEN 0 ELSE [pastdue].[PastDueFeeAmount]
+ ISNULL([ReceivedAmount], 0) END WHEN ISNULL([ReceivedAmount], 0) = 0 AND
[pastdue].[PastDueFeeAmount] < 0 THEN 0 ELSE
[pastdue].[PastDueFeeAmount] END, [PaidAmount] = CASE WHEN ISNULL([ReceivedAmount], 0)
< 0 THEN /* We bring past due to zero and
apply rest to current. */ CASE WHEN [pastdue].[PastDueFeeAmount] + ISNULL([ReceivedAmount], 0)
< 0 THEN - ([pastdue].[PastDueFeeAmount]
+ ISNULL([ReceivedAmount], 0)) ELSE 0 END WHEN ISNULL([ReceivedAmount], 0) = 0 AND
[pastdue].[PastDueFeeAmount] < 0 THEN - [pastdue].[PastDueFeeAmount]
ELSE 0 END, [AmountDue] = [unpaid].[UnpaidFeeAmount], [ID] = [iff].[FacilityFeeID]
FROM [dbo].[INV_SubInvoice] isi JOIN
[dbo].[INV_Invoice] ii ON [isi].[InvoiceID]
= [ii].[ID] JOIN
[dbo].[INV_Facility] [if] ON [isi].[ID] = [if].[SubInvoiceID]
JOIN
[dbo].[INV_FacilityFee] iff ON [if].[ID] = [iff].[INV_FacilityID]
JOIN
(SELECT [sis_fee].[ID],
[sis_fee].[SectionTypeCode], [SectionType] = [st_fee].[Name], [sis_fee].[INV_FacilityFeeID]
FROM
[dbo].[INV_SubInvoiceSection] sis_fee JOIN
[dbo].[INV_SectionType] st_fee ON [sis_fee].[SectionTypeCode] = [st_fee].[Code]
WHERE [INV_FacilityFeeID]
IS NOT NULL AND [StatusCode] = 'BILL') isis_fee ON [iff].[ID] = [isis_fee].[INV_FacilityFeeID] JOIN
(SELECT [iffa].[SectionID],
[AccrualDeterminationDateMax] = MAX([iffa].[AccrualDeterminationDate]),
[AccrualDeterminationDateMin] = MIN([iffa].[AccrualDeterminationDate]), [CurrentDueAmount] = SUM([iffa].[AccruedFeeAmount]),
[ReceivedAmount] = SUM([iffa].[ReceivedFeeAmount])
FROM
[dbo].[INV_FacilityFeeAccrual] iffa
GROUP BY [iffa].[SectionID])
dates ON [isis_fee].[ID] = [dates].[SectionID] LEFT JOIN
(SELECT *
FROM
[dbo].[INV_FacilityFeeAccrual]) unpaid ON [dates].[SectionID] = [unpaid].[SectionID] AND
[dates].[AccrualDeterminationDateMax] = [unpaid].[AccrualDeterminationDate]
LEFT JOIN
(SELECT [SectionID],
[PastDueFeeAmount] = SUM([PastDueFeeAmount])
FROM
[dbo].[INV_FacilityFeeAccrual]
GROUP BY [SectionID]) pastdue
ON [dates].[SectionID] = [pastdue].[SectionID]
UNION
SELECT [isi].[InvoiceID], [ii].[DueDate], [SubInvoiceID] = [isi].[ID], [INV_FacilityID] = [if].[ID], [if].[FacilityID],
[FacilityFeeID] = NULL, [il].[LoanID], [isi].[PortfolioID], [isi].[Portfolio],
[PaymentType] = [isis_loan].[SectionType], [Name]
= [il].[Name], [ReceivedAmount], [CurrentDueAmount], [PastDueAmount] = CASE WHEN ISNULL([ReceivedAmount],
0) > 0 THEN [PastDueAmount] + ISNULL([ReceivedAmount],
0) WHEN ISNULL([ReceivedAmount], 0)
< 0 THEN /* We bring past due to zero and
apply rest to current. */ CASE WHEN [PastDueAmount] + ISNULL([ReceivedAmount], 0)
< 0 THEN 0 ELSE [PastDueAmount] + ISNULL([ReceivedAmount],
0) END WHEN ISNULL([ReceivedAmount], 0) = 0 AND
[PastDueAmount] < 0 THEN 0 ELSE [PastDueAmount]
END,
[PaidAmount] = CASE WHEN [isis_loan].[SectionTypeCode]
= 'LOAN_PRIN' THEN 0 ELSE CASE WHEN ISNULL([ReceivedAmount], 0)
< 0 THEN /* We bring past due to zero and
apply rest to current. */ CASE WHEN [PastDueAmount] + ISNULL([ReceivedAmount], 0)
< 0 THEN - ([PastDueAmount] + ISNULL([ReceivedAmount],
0)) ELSE 0 END WHEN ISNULL([ReceivedAmount], 0) = 0 AND
[PastDueAmount] < 0 THEN - [PastDueAmount]
ELSE 0 END END,
[AmountDue] = CASE WHEN [isis_loan].[SectionTypeCode]
= 'LOAN_PRIN' THEN [CurrentDueAmount] ELSE [unpaid].[AmountDue] END, [ID] = [il].[LoanID]
FROM [dbo].[INV_SubInvoice] isi JOIN
[dbo].[INV_Invoice] ii ON [isi].[InvoiceID]
= [ii].[ID] JOIN
[dbo].[INV_Facility] [if] ON [isi].[ID] = [if].[SubInvoiceID]
JOIN
[dbo].[INV_Loan] il ON [if].[ID] = [il].[INV_FacilityID]
JOIN
(SELECT [sis_loan].[ID],
[sis_loan].[SectionTypeCode], [SectionType] = [st_loan].[Name], [sis_loan].[INV_LoanID]
FROM
[dbo].[INV_SubInvoiceSection] sis_loan JOIN
[dbo].[INV_SectionType] st_loan ON [sis_loan].[SectionTypeCode] = [st_loan].[Code]
WHERE [INV_LoanID]
IS NOT NULL AND [StatusCode] = 'BILL') isis_loan ON [il].[ID] = [isis_loan].[INV_LoanID] JOIN
(SELECT [iffa].[SectionID],
[AccrualDeterminationDateMax] = MAX([iffa].[AccrualDeterminationDate]),
[AccrualDeterminationDateMin] = MIN([iffa].[AccrualDeterminationDate]), [CurrentDueAmount] = SUM([iffa].[ExpectedPrincipalAmount]),
[ReceivedAmount] = SUM([ReceivedPrincipalAmount])
FROM
[dbo].[INV_LoanPrincipalAmortization] iffa
GROUP BY [iffa].[SectionID]
UNION
SELECT [iffa].[SectionID],
[AccrualDeterminationDateMax] = MAX([iffa].[AccrualDeterminationDate]),
[AccrualDeterminationDateMin] = MIN([iffa].[AccrualDeterminationDate]), [CurrentDueAmount] = SUM([iffa].[AccruedInterestAmount]),
[ReceivedAmount] = SUM([ReceivedInterestAmount])
FROM
[dbo].[INV_LoanCashInterestAccrual] iffa
GROUP BY [iffa].[SectionID]
UNION
SELECT [iffa].[SectionID],
[AccrualDeterminationDateMax] = MAX([iffa].[AccrualDeterminationDate]),
[AccrualDeterminationDateMin] = MIN([iffa].[AccrualDeterminationDate]), [CurrentDueAmount] = SUM([iffa].[AccruedInterestAmount]),
[ReceivedAmount] = SUM([ReceivedInterestAmount])
FROM
[dbo].[INV_LoanPIKInterestAccrual] iffa
GROUP BY [iffa].[SectionID])
dates ON [isis_loan].[ID] = [dates].[SectionID] LEFT JOIN
(SELECT [AmountDue]
= [UnpaidPrincipalAmount], [SectionID], [AccrualDeterminationDate]
FROM
[dbo].[INV_LoanPrincipalAmortization]
UNION
SELECT [AmountDue]
= [UnpaidInterestAmount], [SectionID], [AccrualDeterminationDate]
FROM
[dbo].[INV_LoanCashInterestAccrual]
UNION
SELECT [AmountDue]
= [UnpaidInterestAmount], [SectionID], [AccrualDeterminationDate]
FROM
[dbo].[INV_LoanPIKInterestAccrual]) unpaid ON [dates].[SectionID] = [unpaid].[SectionID] AND
[dates].[AccrualDeterminationDateMax] = [unpaid].[AccrualDeterminationDate]
LEFT JOIN
(SELECT [PastDueAmount]
= SUM([PastDuePrincipalAmount]), [SectionID]
FROM
[dbo].[INV_LoanPrincipalAmortization]
GROUP BY [SectionID]
UNION
SELECT [PastDueAmount]
= SUM([PastDueInterestAmount]), [SectionID]
FROM
[dbo].[INV_LoanCashInterestAccrual]
GROUP BY [SectionID]
UNION
SELECT [PastDueAmount]
= SUM([PastDueInterestAmount]), [SectionID]
FROM
[dbo].[INV_LoanPIKInterestAccrual]
GROUP BY [SectionID]) pastdue
ON [dates].[SectionID] = [pastdue].[SectionID]
UNION
SELECT [isi].[InvoiceID], [ii].[DueDate], [SubInvoiceID] = [isi].[ID], [INV_FacilityID] = [if].[ID], [if].[FacilityID],
[FacilityFeeID] = NULL, [il].[LoanID], [isi].[PortfolioID], [isi].[Portfolio],
[PaymentType] = 'PIK Interest Applied', [Name]
= [il].[Name], [ReceivedAmount], [CurrentDueAmount] = - [dates].[CurrentDueAmount],
[PastDueAmount] = - CASE WHEN ISNULL([ReceivedAmount],
0) > 0 THEN [PastDueAmount] + ISNULL([ReceivedAmount], 0) WHEN ISNULL([ReceivedAmount], 0)
< 0 THEN /* We bring past due to zero and
apply rest to current. */ CASE WHEN [PastDueAmount] + ISNULL([ReceivedAmount], 0)
< 0 THEN 0 ELSE [PastDueAmount] + ISNULL([ReceivedAmount],
0) END WHEN ISNULL([ReceivedAmount], 0) = 0 AND
[PastDueAmount] < 0 THEN 0 ELSE [PastDueAmount]
END, [PaidAmount] = - CASE WHEN ISNULL([ReceivedAmount], 0)
< 0 THEN /* We bring past due to zero and
apply rest to current. */ CASE WHEN [PastDueAmount] + ISNULL([ReceivedAmount], 0)
< 0 THEN - ([PastDueAmount] + ISNULL([ReceivedAmount],
0)) ELSE 0 END WHEN ISNULL([ReceivedAmount], 0) = 0 AND
[PastDueAmount] < 0 THEN - [PastDueAmount]
ELSE 0 END, [AmountDue] = - [AmountDue], [ID] = [il].[LoanID]
FROM [dbo].[INV_SubInvoice] isi JOIN
[dbo].[INV_Invoice] ii ON [isi].[InvoiceID]
= [ii].[ID] JOIN
[dbo].[INV_Facility] [if] ON [isi].[ID] = [if].[SubInvoiceID]
JOIN
[dbo].[INV_Loan] il ON [if].[ID] = [il].[INV_FacilityID]
JOIN
(SELECT [sis_loan].[ID],
[sis_loan].[SectionTypeCode], [SectionType] = [st_loan].[Name], [sis_loan].[INV_LoanID]
FROM
[dbo].[INV_SubInvoiceSection] sis_loan JOIN
[dbo].[INV_SectionType] st_loan ON [sis_loan].[SectionTypeCode] = [st_loan].[Code]
WHERE [INV_LoanID]
IS NOT NULL AND [StatusCode] = 'BILL' AND [sis_loan].[SectionTypeCode] = 'LOAN_INT_PIK') isis_loan ON
[il].[ID] = [isis_loan].[INV_LoanID] JOIN
(SELECT [iffa].[SectionID],
[AccrualDeterminationDateMax] = MAX([iffa].[AccrualDeterminationDate]),
[AccrualDeterminationDateMin] = MIN([iffa].[AccrualDeterminationDate]), [CurrentDueAmount] = SUM([iffa].[AccruedInterestAmount]),
[ReceivedAmount] = SUM([ReceivedInterestAmount])
FROM
[dbo].[INV_LoanPIKInterestAccrual] iffa
GROUP BY [iffa].[SectionID])
dates ON [isis_loan].[ID] = [dates].[SectionID] LEFT JOIN
(SELECT [AmountDue]
= [UnpaidInterestAmount], [SectionID], [AccrualDeterminationDate]
FROM
[dbo].[INV_LoanPIKInterestAccrual]) unpaid ON [dates].[SectionID] = [unpaid].[SectionID] AND
[dates].[AccrualDeterminationDateMax] = [unpaid].[AccrualDeterminationDate]
LEFT JOIN
(SELECT [PastDueAmount]
= SUM([PastDueInterestAmount]), [SectionID]
FROM
[dbo].[INV_LoanPIKInterestAccrual]
GROUP BY [SectionID]) pastdue
ON [dates].[SectionID] = [pastdue].[SectionID]

Could you provide example code for interactive form

Dear all.
I have got document at link below
https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/c2567f2b-0b01-0010-b7b5-977cbf80665d
In that document it has some part of abap code.
Could you have full example code for interactive form online and offline?
Thank you very much.

Hi,
Go to the following link to know more about adobe interactive form.
http://wwwimages.adobe.com/www.adobe.com/enterprise/partners/pdfs/bwp_interactive_forms_adobe.pdf
The following link contains a offline application in ABAP. You can try it.
https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/c2567f2b-0b01-0010-b7b5-977cbf80665d
For further questions, check the follow
https://www.sdn.sap.com/irj/sdn/adobe
Improving the Performance of Adobe® LiveCycleu2122 Designer Forms(scripting)
http://www.adobe.com/devnet/livecycle/articles/lc_designer_perf_guidelines.pdf
Interactive Forms Based on Adobe Software: Overview
https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/docs/library/uuid/e635e290-0201-0010-a9be-9e8e4ce04770
Adobe Interactive Forms
http://www.saplounge.be/Files/media/pdf/Huberland-Interactive-Forms-2007.10.10.pdf
Taking interactive forms to next level
https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/8c103c36-0301-0010-cda8-f6b381bedb6e
Introduction to Adobe PDF Library SDK(PDFL SDK)(Simply scroll the document)
http://partners.adobe.com/public/developer/en/webseminars/PDFL_WebSeminar.pdf
Creating Interactive forms in webdynpro for java
https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/docs/library/uuid/5f27e290-0201-0010-ff82-c21557572da1
PDF-Based Print Forms/SAP Interactive Forms by Adobe
http://help.sap.com/saphelp_nw04s/helpdata/en/c8/4adf7ba13c4ac1b4600d4df15f8b84/frameset.htm
Date Objects in Adobe Designer
http://help.sap.com/saphelp_nw04/helpdata/en/dd/60694fddb74ad88cdb7d2a094f3dd2/frameset.htm
Checking and Testing a PDF-Based Print Form
http://help.sap.com/saphelp_nw04s/helpdata/en/c2/1fe9aa4d7b413e8515f90b73729e97/frameset.htm
Architecture
http://help.sap.com/saphelp_nw04/helpdata/en/f2/21021b911f4c0cae11459a4ce0bc62/frameset.htm
http://www.nl4b.com/Adobe/Invitation_SAPBrussels_Q407.pdf
Hope this helps!!
Regards,
Arafat

How to print BAR code in SMART Form

Hi All,
I have the requirement to print BAR CODE in Smartforms.
For this, I create a character format with Bar code in style forms and create a text element in Smart form and associate bar code character format with this text element.
Now when I look the print preview for the data, then it shows me data in bar code format but not in right format i.e. its shows me all the similar block in bar code.
If you look the bar code in SAP script, its always show you bar code with similar block, but in SMART FORM it will show you exact bar code; as in SAP Script, bar code is generated at printer end and in SMARTFORM bar code is generated as graphic in SAP and then sent to printer for print.
PLease let me know, why in SMARTFORM its not showing BAR CODE in correct format in print preview.
Thanks
Piyush Mathur

Hi,
To Create a Bar code prefix:
1) Go to T-code - SPAD -> Full Administration -> Click on Device Type -> Double click the device for which you wish to create the print control -> Click on Print Control tab ->Click on change mode -> Click the plus sign to add a row or prefix say SBP99 (Prefix must start with SBP) -> save you changes , it will ask for request -> create request and save
2) Now when you go to SE73 if you enter SBP00 for you device it will add the newly created Prefix
Create a character format C1.Assign a barcode to the character format.Check the check box for the barcode.
The place where you are using the field value use like this
<C1> &itab-field& </C1>.
You will get the field value in the form of barcode.
Which barcode printer are you using ? Can you download this file and see.
http://www.servopack.de/Files/HB/ZPLcommands.pdf.
It will give an idea about barcode commands.
Check this link:
http://help.sap.com/saphelp_nw04/helpdata/en/d9/4a94c851ea11d189570000e829fbbd/content.htm
Detailed information about SAP Barcodes
A barcode solution consists of the following:
- a barcode printer
- a barcode reader
- a mobile data collection application/program
A barcode label is a special symbology to represent human readable information such as a material number or batch number
in machine readable format.
There are different symbologies for different applications and different industries. Luckily, you need not worry to much about that as the logistics supply chain has mostly standardized on 3 of 9 and 128 barcode symbologies - which all barcode readers support and which SAP support natively in it's printing protocols.
You can print barcodes from SAP by modifying an existing output form.
Behind every output form is a print program that collects all the data and then pass it to the form. The form contains the layout as well as the font, line and paragraph formats. These forms are designed using SAPScript (a very easy but frustratingly simplistic form format language) or SmartForms that is more of a graphical form design tool.
Barcodes are nothing more than a font definition and is part of the style sheet associated with a particular SAPScript form. The most important aspect is to place a parameter in the line of the form that points to the data element that you want to represent as barcode on the form, i.e. material number. Next you need to set the font for that parameter value to one of the supported barcode symbologies.
reward if useful
regards,
ANJI

How to write source code in smart forms?

hi friends,
can anyone can help me in writing sorcecode in smartforms r
any materail link.
if it is helpful points can b rewarded.Thanks in advance.

Hi,
Check this link for
how to write source code in smart forms?
http://****************/Tutorials/Smartforms/GettingStarted/SimpleText.htm
You can write Source Code in smartforms By Choosing Program Lines.
Check this link with Screen Shots
http://****************/Tutorials/Smartforms/PO/page1.htm
Reward All Helpfull Answers
Regards
Fareedas
Edited by: Fareeda Tabassum S on May 21, 2008 3:09 PM

How to use java code in my forms.................

Hi All,
I want to use the below java code in my form 6i ..but don't know how????????
related function is also given below..........
Any idea .......Please
Thanks
Harry.....
import java.awt.*;
import javax.swing.*;
import java.awt.event.*;
import java.sql.*;
public class MyProgram {
private static Connection con = null;
private static Statement st;
public static ResultSet rs;
public static String s;
/* public void setlable(int n)
rs = st.executeQuery("SELECT number_to_words("+n+") FROM dual");
while (rs.next())
output.setText(rs.getString(1));
public static void main(String[] args) {
try
Class.forName("oracle.jdbc.driver.OracleDriver");
Connection con = DriverManager.getConnection("jdbc:oracle:thin:@172.19.193.38:1525:ITSTIN", "scott", "tiger");
st = con.createStatement();
}catch(Exception exp){
System.out.println("Error"+exp.toString());
JFrame f = new JFrame("Conver Digit to Words..");
JLabel input = new JLabel("Enter Numeric digits :");
final JLabel output = new JLabel("Please enter value into TestBox.....",JLabel.CENTER);
final JTextField TF1 = new JTextField(90);
final JButton B1 = new JButton("Close");
f.setSize(750, 250);
f.setLocation(300,200);
f.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
Container contentPane = f.getContentPane();
contentPane.setLayout(null);
contentPane.setBackground(Color.CYAN);
TF1.setLocation(300,25);
TF1.setSize(150,30);
input.setLocation(175,25);
input.setSize(150,30);
input.requestFocus();
output.setLocation(15,100);
output.setSize(650,30);
output.setForeground(Color.RED);
B1.setSize(100,32);
B1.setLocation(620,175);
contentPane.add(TF1);
contentPane.add(input);
contentPane.add(output);
contentPane.add(B1);
f.setVisible(true);
B1.addMouseListener(new MouseAdapter(){
public void mouseClicked(MouseEvent me)
System.exit(0);
TF1.addKeyListener(new KeyAdapter(){
public void keyReleased(KeyEvent event){
if (TF1.getText().equals("") )
output.setText("Please enter value into TestBox.....");
else
try
if (TF1.getText().length()<12)
s = "SELECT initcap(number_to_words("+Long.parseLong(TF1.getText())+")) FROM dual";
rs = st.executeQuery(s); //Function number_to_words exists in scott@itstin created by AMUY-IN
while (rs.next())
output.setText(rs.getString(1));
}catch(Exception e)
System.out.println("Error-2"+e.toString());
================================function===============
CREATE OR REPLACE FUNCTION amuy_con_to_eng(nm2 NUMBER) RETURN VARCHAR2 IS
nm1 NUMBER(10,0) := nm2;
NM VARCHAR2(100):='';
div NUMBER;
BEGIN
WHILE nm1>0 LOOP
IF nm1>=20 THEN
div :=Floor(nm1/10);
NM := NM||' '||base_convert(div*10);
nm1:=Mod(nm1,10);
END IF;
IF nm1>=1 AND nm1<20 THEN
NM := NM||' '||base_convert(nm1);
nm1:=nm1/10;
END IF;
nm1 :=Floor(nm1/10);
END LOOP;
RETURN NM;
END;
CREATE OR REPLACE FUNCTION number_to_words(inm NUMBER) RETURN VARCHAR2 IS
/* Function that converts number's to word's*/
/* Created buy amuy-in */
l_inm NUMBER(35,0);
NM VARCHAR2(1000):='';
div NUMBER;
BEGIN
l_inm := inm;
IF inm<=0 THEN
RETURN 'ZERO';
ELSE
WHILE l_inm>0 LOOP
case when Length(l_inm) >= 1 AND Length(l_inm)<=2
then RETURN NM||' '||sf_num_to_words(l_inm);
when Length(l_inm) = 3
then div :=Floor(l_inm/RPad(1,3,0));
l_inm := Mod(l_inm,RPad(1,3,0));
NM :=NM||' '||sf_num_to_words(div)||' '||'HUNDRED';
when Length(l_inm) >= 4 AND Length(l_inm) <= 5
then div :=Floor(l_inm/RPad(1,4,0));
l_inm := Mod(l_inm,RPad(1,4,0));
NM :=NM||' '||sf_num_to_words(div)||' '||'THOUSAND';
when Length(l_inm) >= 6 AND Length(l_inm) <= 7
then div :=Floor(l_inm/RPad(1,6,0));
l_inm := Mod(l_inm,RPad(1,6,0));
NM :=NM||' '||sf_num_to_words(div)||' '||'LAKH';
when Length(l_inm) >= 8 AND Length(l_inm) <= 9
then div :=Floor(l_inm/RPad(1,8,0));
l_inm := Mod(l_inm,RPad(1,8,0));
NM :=NM||' '||sf_num_to_words(div)||' '||'CRORE';
when Length(l_inm) >= 10 AND Length(l_inm) <= 11
then div :=Floor(l_inm/RPad(1,10,0));
l_inm := Mod(l_inm,RPad(1,10,0));
NM :=NM||' '||sf_num_to_words(div)||' '||'ARAB';
ELSE RETURN 'ERROR {Length of input value should be <12}';
END CASE;
END LOOP;
RETURN NM ;
END IF;
END;
/

You cannot use java directly inside forms. You can either create a java-bean to enhance the GUI (as you have some UI-components in your java-code, i guess this would be the direction) or use the java-importer and call server-side-java. Both require that you are running forms in a web-version and not as client-server.
What exactly is your requirement?

Generate bar codes in mail forms

Hi,
I know how to insert Bar codes in smartforms, but I need to print the bar codes in Mail Forms, is that possible?
Thanks a lot,
Nuno Moreira

Hi Gregor,
What I need to do is:
I have several mail forms treated as a standard response in ICWC. We are using the e-mail view (in ICWC) mainly to print the forms, via smartforms or in online mode without smartforms.
So, at the moment, I have two questions:
1) If I use a smartform to print the mail form, even if I create the form in plain text and create the bar code into mail form, when I print the number it is not converted in a bar code;
2) If I generate the bar code in a mail form and I try to print it in ICWC e-mail view the number is not printed as a bar code too;
Thanks a lot for your help and interest,
Best Regards,
Nuno

Discount codes for web forms

Question:
I have been using two web forms to allow access to a secure zone. Of them, one is for the trial user access and another is for the paid user access.
The problem is: Can I use discount codes for the secure zone access? I can't see the way of integrating eCommerce discount codes with web forms.
Answer:
Discount codes don't actually work with secure zone access since you have to accept payment through web forms. However, I hired an outside developer to write some code for me, which I don't mind sharing:
Put this in the Head of your document:
<script type="text/javascript">
function refreshAmountToCharge() {
var frm = document.forms[0];
var defaultAmountToCharge = 100;
var couponCode = "ABC123"; // A tribute to Michael Jackson...
var percentOff = 50;
var couponCode2 = "DISCOUNT2";
var percentOff2 = 67;
var couponCode3 = "DISCOUNT3";
var percentOff3 = 99;
var couponCode4 = "DISCOUNT4";
var percentOff4 = 75;
/* Fixed amount coupon c*/
var fixedCouponCode1 = "FIXED1";
var fixedAmount1 = 20.00;
var fixedCouponCode2 = "FIXED2";
var fixedAmount2 = 6.00;
var fixedCouponCode3 = "FIXED3";
var fixedAmount3 = 7.00;
var amountToCharge = defaultAmountToCharge.toFixed(2);
if (frm.couponCode.value.toUpperCase() == couponCode)
amountToCharge = (defaultAmountToCharge - (defaultAmountToCharge * percentOff / 100)).toFixed(2);
else if (frm.couponCode.value.toUpperCase() == couponCode2)
amountToCharge = (defaultAmountToCharge - (defaultAmountToCharge * percentOff2 / 100)).toFixed(2);
else if (frm.couponCode.value.toUpperCase() == couponCode3)
amountToCharge = (defaultAmountToCharge - (defaultAmountToCharge * percentOff3 / 100)).toFixed(2);
else if (frm.couponCode.value.toUpperCase() == couponCode4)
amountToCharge = (defaultAmountToCharge - (defaultAmountToCharge * percentOff4 / 100)).toFixed(2);
else if (frm.couponCode.value.toUpperCase() == fixedCouponCode1)
amountToCharge = (defaultAmountToCharge - fixedAmount1).toFixed(2);
else if (frm.couponCode.value.toUpperCase() == fixedCouponCode2)
amountToCharge = (defaultAmountToCharge - fixedAmount2).toFixed(2);
else if (frm.couponCode.value.toUpperCase() == fixedCouponCode3)
amountToCharge = (defaultAmountToCharge - fixedAmount3).toFixed(2);
frm.Amount.value = amountToCharge;
// ----------- End Coupon Code Javascript ---------------------
</script>
Then, you'll need a Coupon Code field in your form:
<div class="item">
    <label for="couponCode">Coupon Code</label><br />
    <input type="text" name="couponCode" id="couponCode" class="cat_textbox" />
    <a href="javascript:refreshAmountToCharge()">Update</a>
</div>
That's it. Let me know if you have any questions. You can set multiple codes, either percentage based or fixed amount. Experiment with it to make sure it works as expected.

This is great Mario! Thanks so much for sharing. It works very well.
One thing I want to add is a validation for the coupon update action. If the coupon is no longer valid or entered incorrectly, a message would be great, because the person might no even notice the fact that the amount did not change even though they think they entered a valid discount code.
Sean

Is it possible write code inside pdf form when click submit button in pdf form

can write code to pdf form
for eg:
we have to write code in Excel sheet using Macro features Like that any possible to write code in pdf form
when i downloaded pdf form from site then filled up the details then click the save button the pdf form will send to the corresponding server then stored in DB
pls reply me soon

You have posted in a completely wrong forum. This one is exclusively for participants testing features of the site.
You may want to try reposting in the appropriate Acrobat forum, which you can find here:
http://forums.adobe.com/community/acrobat?view=overview

Anti spam codes for website forms are not being accepted on my imac or iPad

anti spam codes for website forms are not being accepted on my imac or iPad

In Safari go to preferences click on privacy and on Block Cookies tick the never box

JavaScript code in Adobe Forms

Hi Experts,
I am new to Adobe Forms in SAP.
My query is based on JavaScript coding part in Adobe Forms.
Requirement - Sales Order Creation in SAP via Offline Adobe Forms.
Scenario -
In Adobe Form, i have a drop down field which is filled with Customer Name.
Based on the selected Customer Name, fields like Customer Code, Division and Distribution Channel will get filled automatically in Text Fields
Mentioned values are available in my internal table.
Please share the logic for fetching the internal table values via JavaScript code of Adobe Forms and assign it to designated fields.
Thanks in advance.
Regards
Sunil S Girija

Hi Sunil,
Please refer the below link.
SAP Adobe Interactive Forms - Javascript - Code Gallery - SCN Wiki
If you need more help let me know.
Thanks & Regards,
Nandakumar

Import java code applet into form and execute it

Hi all.
I'm on devsuite 10g.
I have the following applet code:
import java.applet.Applet;
import java.awt.event.*;
import java.awt.*;
public class simple2 extends Applet
implements MouseListener, MouseMotionListener {
      double r0 = 100.0;
      double r1 = 40.0;
    public void paint(Graphics g) {
      int n = 400;
      int x0=0,y0=0,x1,y1;
      for(int i=0;i <=n;i++)
           double rho   = 2*Math.PI*i/n;
           double theta = 16*Math.PI*i/n;
           double x = r0*Math.cos(rho) + r1*Math.cos(theta);
           double y = r0*Math.sin(rho) + r1*Math.sin(theta);
           // cambio sistema di riferimento
           x1 = getSize().width/2+(int)x;
           y1 = getSize().height/2+(int)y;
           // disegno
           if(i>0) g.drawLine(x0,y0,x1,y1);
           x0 = x1;
           y0 = y1;
    public void init() {
      addMouseListener(this);
      addMouseMotionListener(this);
    public void mouseClicked(MouseEvent e) {}
    public void mousePressed(MouseEvent e) {}
    public void mouseReleased(MouseEvent e) {}
    public void mouseEntered(MouseEvent e) {}
    public void mouseExited(MouseEvent e) {}
    public void mouseMoved(MouseEvent e) {}
    public void mouseDragged(MouseEvent e) {
      int x = e.getX(), y = e.getY();
      r0 = x-getSize().width/2;
      r1 = y-getSize().height/2;
      repaint();
      e.consume();
} I want to import this code into my form in order to execute it.
Code make possible drawing graphs to screen...
What I want is to execute this code into my form, in a when-new-block instance trigger or something else.
How can I achieve this???
Thanks all for collaboration,
Fabrizio

It isn't quite as simple as just "importing" your java code if your goal is to have the forms and the java app communicate with each other. Interaction occurs when a properly designed Java Bean is created.
Take a look at some of the examples on the following page as they can likely provide you with a good starting place:
http://sheikyerbouti.developpez.com/forms-pjc-bean/menu/

Code behind a Form

dear all
please explain me how can i see the code behind the Outgoing payments from in SAP B1 using the SAP B1 SDK.
Thanks & Regards
Kanishka

Hi,
Its not possible to see the code behind the forms.... i guess its possible in SAP R/3 using ABAP. But it's not possible here in SAP B1.
Regards,
Vasu Natari.

Can I use "Adobe X Pro" to debug the java code in adobe forms?

HI,
Can I use "Adobe X Pro" to debug the java code in adobe forms?, if not how do i debug the java code written in the adobe form.

I have the adobe acrobat x evaluation version installed, please find the print shot attached, I have pressed CTRL+J in the preview mode, but nothing came up.
Am I doing something wrong..

How to print all pl/sql code in a form?

Is there a way in Forms 6i to print out all the PL/SQL code in that form without having to open up every trigger, etc. and click Print? I'd like to get a text file dump of all the code for each Form in my application.

Have you tried the Object List Report (under File --> Administration) It will include other information as well as the PL/SQL e.g. properties of items etc, but all the PL/SQL should be there.

Code Sample: Improved Calender code applying to form.

Similar Messages

Maybe you are looking for