Problem in Using OLE Container

Question

Sir I have development an ActiveX in VB for urdu in oracle forms.
The problems I am facing is that it is storing the input efficiently but
when I Query the saved data it is not working,
I got an Error that OLE Object not defined for the current record.
It create the OLE object for a new record and take input & save it
But as I assign the retrieved Data in Post Query, it give error object not
defined.
At the same time it display out when assign with when button pressed.
the code that is working is for saving in the database is at save button (when
button pressed)
DECLARE
VEN_IDp OLE2.OBJ_TYPE;
VEN_NAMEp OLE2.OBJ_TYPE;
ADD1p OLE2.OBJ_TYPE;
CITYp OLE2.OBJ_TYPE;
ZIPCODEp OLE2.OBJ_TYPE;
STATEp OLE2.OBJ_TYPE;
COUNTRYp OLE2.OBJ_TYPE;
PHONE1p OLE2.OBJ_TYPE;
PHONE2p OLE2.OBJ_TYPE;
MOBILEp OLE2.OBJ_TYPE;
FAXp OLE2.OBJ_TYPE;
ECOMMENTSp OLE2.OBJ_TYPE;
n1 NUMBER;
V1 VARCHAR2(255);
V2 VARCHAR2(255);
V3 VARCHAR2(255);
V4 VARCHAR2(255);
V5 VARCHAR2(255);
V6 VARCHAR2(255);
V7 VARCHAR2(255);
V8 VARCHAR2(255);
V9 VARCHAR2(255);
V10 VARCHAR2(255);
V11 VARCHAR2(255);
V12 VARCHAR2(255);
BEGIN
--creating pointers to the activeX's
VEN_IDp := FORMS_OLE.GET_INTERFACE_POINTER('VEN_IDU');
VEN_NAMEp := FORMS_OLE.GET_INTERFACE_POINTER('VEN_NAMEU');
ADD1p := FORMS_OLE.GET_INTERFACE_POINTER('ADD1U');
CITYp := FORMS_OLE.GET_INTERFACE_POINTER('CITYU');
ZIPCODEp := FORMS_OLE.GET_INTERFACE_POINTER('ZIPCODEU');
STATEp := FORMS_OLE.GET_INTERFACE_POINTER('STATEU');
COUNTRYp := FORMS_OLE.GET_INTERFACE_POINTER('COUNTRYU');
PHONE1p := FORMS_OLE.GET_INTERFACE_POINTER('PHONE1U');
PHONE2p := FORMS_OLE.GET_INTERFACE_POINTER('PHONE2U');
MOBILEp := FORMS_OLE.GET_INTERFACE_POINTER('MOBILEU');
FAXp := FORMS_OLE.GET_INTERFACE_POINTER('FAXU');
ECOMMENTSp := FORMS_OLE.GET_INTERFACE_POINTER('ECOMMENTSU');
--getting new value returned by the ActiveX
N1 :=Project1_UserControl1.getUrduText(VEN_IDp);
V2 :=Project1_UserControl1.getUrduText(VEN_NAMEp);
V3 :=Project1_UserControl1.getUrduText(ADD1p);
V4 :=Project1_UserControl1.getUrduText(CITYp);
V5 :=Project1_UserControl1.getUrduText(ZIPCODEp);
V6 :=Project1_UserControl1.getUrduText(STATEp);
V7 :=Project1_UserControl1.getUrduText(COUNTRYp);
V8 :=Project1_UserControl1.getUrduText(PHONE1p);
V9 :=Project1_UserControl1.getUrduText(PHONE2p);
V10 :=Project1_UserControl1.getUrduText(MOBILEp);
V11 :=Project1_UserControl1.getUrduText(FAXp);
V12 :=Project1_UserControl1.getUrduText(ECOMMENTSp);
assigning the value to database item for saving
:VEN_ID := N1;
:VEN_NAME :=V2;
:ADD1 := V3;
:CITY :=V4;
:ZIPCODE :=V5;
:STATE :=V6;
:COUNTRY:=V7;
:PHONE1 :=V8;
:PHONE2 :=V9;
:MOBILE :=V10;
:FAX :=V11;
:ECOMMENTS :=V12;
END;
-- It save the record successfully
and the code not working at (post query OR timer expired created at post query)
It query the data from database and display it in the textitem but I want to
assign it to ActiveX for Urdu Display
(the activeX display Urdu for assiged value in button pressed case)
DECLARE
VEN_IDp OLE2.OBJ_TYPE;
VEN_NAMEp OLE2.OBJ_TYPE;
ADD1p OLE2.OBJ_TYPE;
CITYp OLE2.OBJ_TYPE;
ZIPCODEp OLE2.OBJ_TYPE;
STATEp OLE2.OBJ_TYPE;
COUNTRYp OLE2.OBJ_TYPE;
PHONE1p OLE2.OBJ_TYPE;
PHONE2p OLE2.OBJ_TYPE;
MOBILEp OLE2.OBJ_TYPE;
FAXp OLE2.OBJ_TYPE;
ECOMMENTSp OLE2.OBJ_TYPE;
V1 VARCHAR2(255);
V2 VARCHAR2(255);
V3 VARCHAR2(255);
V4 VARCHAR2(255);
V5 VARCHAR2(255);
V6 VARCHAR2(255);
V7 VARCHAR2(255);
V8 VARCHAR2(255);
V9 VARCHAR2(255);
V10 VARCHAR2(255);
V11 VARCHAR2(255);
V12 VARCHAR2(255);
str1 VARCHAR2(255);
str2 VARCHAR2(255);
str3 VARCHAR2(255);
str4 VARCHAR2(255);
str5 VARCHAR2(255);
str6 VARCHAR2(255);
str7 VARCHAR2(255);
str8 VARCHAR2(255);
str9 VARCHAR2(255);
str10 VARCHAR2(255);
str11 VARCHAR2(255);
str12 VARCHAR2(255);
BEGIN
SYNCHRONIZE;
VEN_IDp := FORMS_OLE.GET_INTERFACE_POINTER('VEN_IDU');
VEN_NAMEp := FORMS_OLE.GET_INTERFACE_POINTER('VEN_NAMEU');
ADD1p := FORMS_OLE.GET_INTERFACE_POINTER('ADD1U');
CITYp := FORMS_OLE.GET_INTERFACE_POINTER('CITYU');
ZIPCODEp := FORMS_OLE.GET_INTERFACE_POINTER('ZIPCODEU');
STATEp := FORMS_OLE.GET_INTERFACE_POINTER('STATEU');
COUNTRYp := FORMS_OLE.GET_INTERFACE_POINTER('COUNTRYU');
PHONE1p := FORMS_OLE.GET_INTERFACE_POINTER('PHONE1U');
PHONE2p := FORMS_OLE.GET_INTERFACE_POINTER('PHONE2U');
MOBILEp := FORMS_OLE.GET_INTERFACE_POINTER('MOBILEU');
FAXp := FORMS_OLE.GET_INTERFACE_POINTER('FAXU');
ECOMMENTSp := FORMS_OLE.GET_INTERFACE_POINTER('ECOMMENTSU');
--function setUrduText(interface oleobj,text in out varchar2) Return varchar2
This function Displays Urdu when value is assigned in when button pressed event
str1 :=Project1_UserControl1.setUrduText(VEN_IDp,:VENDOR.VEN_ID);
str2 :=Project1_UserControl1.setUrduText(VEN_NAMEp,:VENDOR.VEN_NAME);
str3 :=Project1_UserControl1.setUrduText(ADD1p,:VENDOR.ADD1);
str4 :=Project1_UserControl1.setUrduText(CITYp,:VENDOR.CITY);
str5 :=Project1_UserControl1.setUrduText(ZIPCODEp,:VENDOR.ZIPCODE);
str6 :=Project1_UserControl1.setUrduText(STATEp,:VENDOR.STATE);
str7 :=Project1_UserControl1.setUrduText(COUNTRYp,:VENDOR.COUNTRY);
str8 :=Project1_UserControl1.setUrduText(PHONE1p,:VENDOR.PHONE1);
str9 :=Project1_UserControl1.setUrduText(PHONE2p,:VENDOR.PHONE2);
str10 :=Project1_UserControl1.setUrduText(MOBILEp,:VENDOR.MOBILE);
str11 :=Project1_UserControl1.setUrduText(FAXp,:VENDOR.FAX);
str12 :=Project1_UserControl1.setUrduText
END;
I am not getting the point that why the Error OLE object not defined occur in
display case where as in new record the object is activited on new record
instane by itself but not in post query
I am working on application of a library with Urdu data and at last step Iam
facing the problem above PLs guide me
Thanks in advance
null

Answer 1

Hi,
- I am using Oracle Forms [32 bit] Versión 5.0.6.23.1 and Oracle 8i Enterprise Edition Release 8.1.7.0.0 as database.
- The process can be reproduced in a stand alone form. You need to access a table with a RAW column in which the file is stored and put that column in an OLE Container.
- It works with filetypes .xls, .doc, .pdf but (sometimes, not always) not with filetype .TIF (with an MS Imaging program associated).
- I have 2 errors:
- "No se puede encontrar el archivo 'C:\DOCUME~1\CAPEST~1\CONFIG~1\Temp\PKGnnn.TIF' (o uno de sus componentes). Asegúrese de que la ruta y el nombre de archivo son correctos y de que todas las bibliotecas está disponibles." This would be something like "The file 'C:\DOCUME~1\CAPEST~1\CONFIG~1\Temp\PKGnnn.TIF' (or one of its components) can be found. Be sure that the path and the filename are corrects and all the libraries are ready".
- "No se puede abrir el archivo 'C:\DOCUME~1\CAPEST~1\CONFIG~1\Temp\PKGnnn.TIF'. Compruebe el nombre de archivo y los permisos." ("The file 'C:\DOCUME~1\CAPEST~1\CONFIG~1\Temp\PKGnnn.TIF' can´t be open. Check the filename and the grants."
I hope this help.
Edited by: Valla1 on Jan 21, 2009 8:40 AM
The problem was that the field was mouse navigable.