Tampilkan postingan dengan label developer 6i. Tampilkan semua postingan
Tampilkan postingan dengan label developer 6i. Tampilkan semua postingan

Date Picker Calendar For Oracle Forms 6i

Before you start, make sure you have the "stndrd.olb" and"calendar.pll" file.


DATE_LOV.GET_DATE
(NVL(:BLOCK.ITEM, SYSDATE),
'BLOCK.ITEM',
200, 100,
'SELECT DATE',
'OK','CANCEL',
TRUE, FALSE, FALSE);


ate_lov.get_date (initial date,
return block.item,
window x position,
window y position,
window title,
ok button label,
cancel button label,
highlight weekend days,
autoconfirm selection,
autoskip after selection);


fmb source : https://drive.google.com/file/d/1p-F1AgR_AWbGLatUA7N-Egbzg2lRb8Rx/view

Compile .fmb in folder

one file

ifcmp60 Module=c:\workspaces\project\forms\section\form.fmb Userid=scott/tiger@db batch=yes module_type=form



in folder


FOR %i IN (.fmb) DO ifcmp60 Userid=scott/tiger@db batch=yes module_type=form module=%i batch=yes module_type=form compile_all=yes window_state=minimize


source :






https://dukez.wordpress.com/2010/11/15/compile-oracle-forms-6i-from-command-line-with-olb/

https://www.scribd.com/document/63561272/Batch-Compile-Script-for-Forms-Reports-Libraries-Menus-and-Also-Converting-Binary-to-Text-and-Back-ID-191529-1

How to remove extra space in between a string? oracle 10g


SQL> select replace('AAA BBB CCC', chr(32), '') from dual;

REPLACE('
---------
AAABBBCCC

Oracle Form 6i dynamic query and execute in oracle

  dynamic query

 1.

set_block_property('DIVIEW_SALESES', default_where, 'query statement');

 example :

set_block_property('DIVIEW_SALESES', default_where, 'sls_status='||''''||'A'||''''||' and to_char(sls_date,'||''''||'mm/yyyy'||''''||')='||''''||:tool.REF_DATE||'''');

Done!

Printing with Foxit Reader using command line command

Hi there i wanna share how to printting via Foxit REader using command line.
In my case i use it on my oracle developer 6i
then here it's!!!

host('"C:\Program Files\Foxit Software\Foxit Reader\Foxit Reader.exe" /t "pdf file" "printer name"');
 then
host('"C:\Program Files\Foxit Software\Foxit Reader\Foxit Reader.exe" /t c:\file.pdf printname'); 


How to install oracle developer suite 10g on windows 7

How to install oracle developer suite 10g on windows 7

Actually, I have a little bit problem when i try to install oracle developer suite 10g.
I found error that my system does not support, but now i found the solutions.
It needs a little tricks that will decoy Oracle Standard system required.

Come Let 's Start



1.

Go to "oracle developer suite 10g  Installer Folder"\Install\oraparam.ini


 2.

Find :
[Certified Versions]
Windows=5.0,5.1,5.2
Solaris=5.8,5.9
Linux=redhat-2.1AS
HPUX=B.11.11
 Add this script :
[Certified Versions]
Windows=5.0,5.1,5.2,4.1
Solaris=5.8,5.9
Linux=redhat-2.1AS
HPUX=B.11.11


Find :
[Windows-5.1-required]
#Minimum display colours for OUI to run
MIN_DISPLAY_COLORS=256
SWAP_SPACE=1535
TEMP_SPACE=150
Edit :
[Windows-6.1-required]
#Minimum display colours for OUI to run
MIN_DISPLAY_COLORS=256
SWAP_SPACE=1535
TEMP_SPACE=150
 Save and exit file.

 3.

Add Virtual memory size
Go To Advanced system settings >>Tab " Advanced ">>Button Performance's "Setting">>Tab " Advanced ">>Button "Change"
Initial size = 4000
Max size = 4000

Ok and restart your PC.

 4.

 Go to "oracle developer suite 10g  Installer Folder
Set Property file Compatibility as "Windows XP Console Pack 2" 

 5.

 Run Setup


6.

Done!

#Source : https://www.youtube.com/watch?v=qYeic14YK-Y

Oracle Form 6i: How to put database data into List Item(Combo Box)?

Oracle Form 6i: How to put database data into List Item(Combo Box)?

Last days around, i just tried to make some List Item(ComboBox) that filed from database selected. . .
It's pretty good and easy enough.

1.

Create Program Unit :


PROCEDURE CREATE_Filenames_RG  IS
-- Andrew Fraser v2.2 27th May 2010
-- Populate dynamic lookup

    it_id1   Item := Find_Item('block.my_list_item');

    group1_id    RecordGroup;

    GRP_status       NUMBER;

    V_Space varchar2(10) := ''''||'0'||'''';

BEGIN

  group1_id := Find_Group('FILENAMES_RG');

  IF NOT Id_Null(group1_id) THEN
   delete_group(group1_id);
  END IF;
  group1_id := Create_Group_From_Query('FILENAMES_RG',
        'SELECT field FROM table ORDER BY field') ;

    Grp_status := Populate_Group('FILENAMES_RG');
   IF Grp_status = 0 THEN
If Not Id_Null(it_id1) THEN
  If Get_Item_Property(it_id1,Item_Type) = 'LIST' Then
   Clear_List(it_id1);
   Populate_List(it_id1,'FILENAMES_RG');
    END IF;
END IF;
END IF;

End;


2.

Create/edit triggers to call this:

On form startup:
When-New-Form-Instance on the form as a whole:

CREATE_Filenames_RG;

3.


And/or on mouse click if you want the database table requeried every single time the user clicks on the dropdown:

When-Mouse-Click on the new item itself:

Clear_List('CAS_UPLOAD');
Clear_Item;
CREATE_Filenames_RG;

easy right??