Needed program unit to translate number as currency to string

HI All,
Can you please tell me if there is existing program unit that i can use to translate number as currency to string
Ex:
i have numbeer like 110.5 and currency code EGP
i need the program unit to return
Only One Hundred Ten Egyptian Pound (s) and Fifty Piaster (s)
for ococourse if the EGP is USD it'll return dollar instead of egyptian pound
Thanks you

Yeah i already did so and i got the function and used it my problem just in the currency translation for decimals
that means when i need to translate 100.5 EGP
one hundred Egyptian Pounds and fifty piasters
i can now translate to one hundred Egyptian Pounds and fifty but what about the piasters
i think i had to create a table that contains a currency code and the corresponding currency translation piasters , cents , ...etc
so i think i'll have to search on google about the currency transaltion for the decimal point currency i hoped there is a tabke in the e-business suite contains it as it exists for the currency code

Similar Messages

Hello , I need to find the serial number of my programs . Would anyone know where and how to do it? The programs are installed on PC Thank you

Hello , I need to find the serial number of my programs .
Would anyone know where and how to do it?
The programs are installed on PC
Thank you

Find your serial number quickly

I need to retrieve my serial number so I can sign into my Adobe Creative Cloud programs.

I have my Adobe ID and password, however, I need to retrieve my serial number so I can sign into my Adobe Creative Cloud programs. It has been 10 months since I used Illustrator and I need to update my resume on that program. I would appreciate your help.

Cloud programs do not use serial numbers... you log in to your paid Cloud account to download & install & activate... you MAY need to log out of the Cloud and restart your computer and log back in to the Cloud for things to work
Log out of your Cloud account... Restart your computer... Log in to your paid Cloud account
-Sign in help http://helpx.adobe.com/x-productkb/policy-pricing/account-password-sign-faq.html
-Ask for serial number http://forums.adobe.com/thread/1234635 has a FAQ link

Trial version. Today I have downloaded the program with the serial number, now I'm doing the istallation he asks me the serial number, I put it and he tells me that I need also the serial number of the previous version. How can I find the serial number of

1 month ago I Downloaded a trial version. Today I have downloaded the program with the serial number, now I'm doing the istallation he asks me the serial number, I put it and he tells me that I need also the serial number of the previous version. How can I find the serial number of the trial version?

What program, and did you buy the UPGRADE version, or the FULL version?
Your description indicates that you bought an upgrade version... which requires proof of a previous version to install
So, if you had A and you bought A+ you need to provide your A serial number during install so A+ knows you are legal

String translation in program units

Hi everyone, it is my first post.
We are using TranslationHub to create an Spanish version of our application.
We have a lot of strings that we use as messages when the form does validations; we want to translate those strings as well.
Can Translation Hub extract strings from PL/SQL code as program unit or triggers code in a form?
Thanks in advance.

Translation Hub doesn't handle strings in PL/SQL code.
And...
It's not a good idea to use hardcoded strings in PL/SQL code.
You should get those out of your code.

Error : ORA-06508: PL/SQL: could not find program unit being called

Hi
I got surprise issue while testing my Oracle code . Let me explain first the environment detail . Our appliaction built on
Java/J2EE(Weblogic) and backend is Oracle 11g re2 . While calling from java it call thru different user which have been provide
synonym and exectue option for corresponding procdure ,
I created on package EXTRACT_CUSTOMER_INFO_PK which will exract data to text file using UTL_FILE ( direcory , UTL_FILE grant is provided to DB user).
Now this package has been called from rp_execute_procedure_pr -- Here I is the code
CREATE OR REPLACE PROCEDURE RP_EXECUTE_PROCEDURE_PR
i_atlas_job_schedule_fk IN atlas_job_schedule.atlas_job_schedule_pk%TYPE,
i_job_id IN atlas_job.job_id%TYPE,
i_parm_value IN atlas_job_schedule.parm_value%TYPE,
o_status_code OUT NUMBER,
o_status_mesg OUT VARCHAR2
IS
-------Other old code which is not relevent for this issue ----
--------Other old code which is not relevent for this issue ----
----Below code I added ----
ELSIF l_job_id = 'CUST_EXTRACT' THEN
EXTRACT_CUSTOMER_INFO_PK.customer_report ( i_parm_value ,
o_status_code,
o_status_mesg ) ;
-- o_status_code := -99999999;
--o_status_mesg := 'PARTHA PARTHA PARTHAcess terminated!';
ELSE
o_status_code := -20300;
o_status_mesg := 'Job Id : ' || l_job_id || ' NOT found. Process terminated!';
END IF;
update_log_auto
ajs_rec.atlas_job_schedule_pk ,
'Processing End Time (GMT): '
EXCEPTION
WHEN eProcError THEN
o_status_code := SQLCODE;
o_status_mesg := SUBSTR(vMsg ||'-'||SQLERRM, 1, 200);
WHEN OTHERS THEN
o_status_code := -20300;
o_status_mesg := SUBSTR(SQLERRM, 1, 200);
update_log_auto
ajs_rec.atlas_job_schedule_pk ,
'Error : '||SQLERRM||' '
update_log_auto
ajs_rec.atlas_job_schedule_pk,
'Processing End Time (GMT): '
END RP_EXECUTE_PROCEDURE_PR;
Now It compiled sucesfully . And while I did SIT then RP_EXECUTE_PROCEDURE_PR run fine and extracted txt file . But while I called it from Java procedure It gives us error like
Error : ORA-06508: PL/SQL: could not find program unit being called 02-AUG-2012 13:16:51.
As I told RP_EXECUTE_PROCEDURE_PR old proc and used by other proc , So I first suspect issue is newly added code or may be some grant or synonym ( Although it should not be )
so I created public synony amd gave execute grant to my pkg to public .
But it repeat same error .
I did lot of R&D on my pkg but nothing happen . Finally I remane my new pkg RP_EXTRACT_CUSTOMER_INFO_PK and it works fine
I need to know what is the RCA for it . I donot think any dependecy issue as renaming pkg is working fine .
NB my DB user is iATLAS and Javauser is SUDEEP
Thanks in Advance
Debashis Mallick

First of all If i run the main procedure in like below in my Schema it is working fine
begin
-- Call the procedure
rp_execute_procedure_pr(i_atlas_job_schedule_fk => :i_atlas_job_schedule_fk,
i_job_id => :i_job_id,
i_parm_value => :i_parm_value,
o_status_code => :o_status_code,
o_status_mesg => :o_status_mesg);
end;
So thre is no question of parameter .... or Invalid state etc . If it is parameter or Invalid state issue it will give other error.
Here problem is not syntax issue .
let me give u more detail regards this issue
1.. All objects corresponding to procedure all Valid
2.. If I test on the proc on my schema like above code . It works fine
3.rp_execute_procedure_pr is a old procudere which called for differner report generartion based on parameter passing . Also as extract_customer_info_pk called with in rp_execute_procedure_pr So there is no question of synonym or privilage issue for new procedure.
4. Suprising thing is if I rename and recreate package like extract_customer_info_pk _1 or rp_extract_customer_info_pk . Which are exactly same as extract_customer_info_pk and replace those new one with extract_customer_info_pk then it work fine in my java application
I think I make it clear the issue
Edited by: debashisora on Aug 3, 2012 5:31 AM
Edited by: debashisora on Aug 3, 2012 5:40 AM

Help plss Should a cursor be created in database or program unit in forms l

Where can i create a cursor should it be in database i.e isql plus using internet explorer or should i create the cursor in forms
forms can i create the cursor so that i can use the cursor in the post item trigger of the userid item of login page
Can i create the cursor in a package specification and how can i call that cursor into a post_text item trigger
details below
Iam working on a Online exam for students Dummy project using forms
The student 1st comes to a WELCOME page i.e form which asks him if he is a new student or registered stud
If he clicks registered pushbutton it takes him to a LOGIN page where there are two items userid and password.I am using a Validate_item OR Post_item trigger to fire after the student enters his userid.
I need to compare the entered userid with the userid stored in the database STUDENTS table which i created which consists of the registered students details.
Our project Guide suggested that we create a cursor and fetch each userid everytime into the cursor and compare the entered userid with the cursor.

hi Sqlstar,
Regarding to your all questions , i prefered that you search for a simple document or book in order to understand much more more about creating cursors.
however since this forum made to help people and to make a integerated community i would be glad to offer my help and going with you step bt step with your answers.
as for beginning
1) when you create the user_exists function in database , if you want to call it in the form level you would wirte a code like this
----WHEN-VALIDATE-ITEM------------user_id item---------
IF scheme_name.procedure_name(:block1.userid)!='TURE' then
   message('User Name is not correct');
   raise form_trigger_failure;
end if;
2) it's not a waste of recourse to make 2 validation of both userid and password
and as same you create a procedure for useris you should create a procedure for password where the user id is the outcomming of userid item in the form.
3)you have all choices to create the 2 procedures on database side or in the program unit at design time for the form it's up to you and as a small hint for you ,
when you create them in the program unit and want to call the procedures in the WHEN-VALIDATE-ITEM trigger you should denote the procedure name with the name of package first as following
-------[Package Spec Code]-------
PACKAGE user_validation IS
function user_exists (p_user_id number) return boolean;
end ;
--------------[Package Body Code]------
PACKAGE BODY user_validation IS
function user_exists (p_user_id number) return boolean
is
user_number number;
cursor c_user_id is
select user_id from <user_table>
where user_id=p_user_id;
begin
open c_user_id ;
loop
fetch user_id into user_number ;
return (true);
exit when c_user_id%NOTFOUND;
end loop;
execption when others then
return(false);
end user_exists;
end;
-----Calling at Validation level-----------
IF (user_validation.user_exists(:block1.userid))!=TURE then
   message('User Name is not correct');
   raise form_trigger_failure;
end if;
i hope this could be helpful engouh to start your application
Good Luck .
Regards
Omar

Program units (Package) as global variable

Hi all,
Report 10g, generate PDF on the web.
I need to manage some informations as rowtype.
So, I defined a program unit as Package Spec VAR and defined v1 tablename%rowtype. When fired the trigger After Parameter Form run a procedure that populate the VAR.v1 and so I can use this information inside the column formula or format trigger without read the table many times.
I try on client / server and all is ok.
I try on the web and the package spec not work good. Exist some rule or bug about it?
I try to move the package on the DB as Stored Procedure and so the report is ok.
Thank you in advance.

But in report builder is it possible to use global variable define as rowtype?
I have some doubts about it.
About my problem I want add an example to understand better the situation:
As program unit I defined:
PACKAGE VAR IS
vTab0001 tab0001%rowtype;
END;
FUNCTION TAB0001_GET (pCom number) RETURN tab0001%rowtype IS
vTab0001rec tab0001%rowtype;
BEGIN
Select *
into vTab0001rec
from tab0001
where t0001soc = pCom;
return (vTab0001rec);
Exception when others Then
return (null);
END;
About the After Parameter Form trigger:
var.vTab0001 := tab0001_get(:company_code);
With the srw.message(12345, var.vTab0001.t0001soc) check the value in all the report.
In client/server all it is ok.
In web I received the error
REP-0069: Internal error
REP-57054: In-process job terminated:Terminated with error:
REP-1418: 'cf_1formula': Passed null arguments to SRW.MESSAGE.
So, I have the evidence that the var.vTab0001.t0001soc is null.
Can you help me to find a way?
Is there someone that had this case in report builder?

Rep-771 There exist uncompiled program unit(s).

hi ,
i am using 10g when i run my reports , some reports giving this error message
rep-771 There exist uncompiled program unit(s).
REP-1247: Report contains uncompiled PL/SQL.
REP-1247: Report contains uncompiled PL/SQL.
i have compiled my reports number of times and also these are properly running when i run them from reports builder but when i try to run them from menu above errors occured.
please can someone help me
thanks
Najeeb

I got the problem resolved by myself. I looked at the "showjobs" and found that the blobdestination output type was actually recognized. All the error messages (when running the url) had nothing to deal with the new output type. Here is the trick.
In addition to specifying the DESNAME=http://username:password@host:port/sid for the output destination, you also need to specify the userid userid=username/password@database_name in the same url in order for the report to run.
Thanks.
Andy

Need help with understanding Skype Number please

Hi there,
Not sure if this is posted twice!
I live in the UK and am trying to offer online coaching through a company in America. I can only offer live chat sessions if I have a US or Canadian number. Is it a Skype Number that I need? Why would it matter which State I choose - will people only be able to contact me from that State?
Would be really grateful for some clarity.
Many thanks,
Solved!
Go to Solution.

Hi, Tracy255, and welcome to the Community,
Unfortunately, for several reasons, Skype Numbers are not available in Canada.
The concept of any virtual number is to provide a way for people who do not have accounts on the service to contact the subscriber, but using a fixed line or land line number. In the case of Skype Numbers in the United States, the best scenario would be to have a number set up where most of your customers would be able to call without incurring high toll charges or ideally no toll charges. Of note, not all states participate in the Skype Number program, again for any number of legitimate reasons.
Skype does not offer "toll-free" numbers.
Here is a link to the library of FAQ articles related to Skype Numbers seeing as I believe you will have more questions than I have provided information for!
https://support.skype.com/en/category/ONLINE_NUMBER_SKYPEIN/
Please pardon the naming convention confusion; today's Skype Numbers where formerly known as Online Numbers or Skype In.
Regards,
Elaine
Was your question answered? Please click on the Accept as a Solution link so everyone can quickly find what works! Like a post or want to say, "Thank You" - ?? Click on the Kudos button!
Trustworthy information: Brian Krebs: 3 Basic Rules for Online Safety and Consumer Reports: Guide to Internet Security Online Safety Tip: Change your passwords often!

Need help Creating a translation pattern that adds dial out digits to incoming calls

I came across an article yesterday and it showed the steps how to fix Missed Call/Received Call numbers so that you can dial them from the menu correctly (auto-add a 9, etc.)?
I tried it this morning and came up with this translation pattern:
voice translation-rule 6
rule 1 /^201\(.*\)/ /8\1/
rule 2 /\(..........\)/ /81\1/
voice translation-profile filter_Incoming
translate calling 6
This translation pattern rule 1 adds the dial out character 8 and strips 201 for local calls. Rule 2 adds dial out character 8 and adds 1 for long distance. The purpose of this translation rule is when the ephone receives the phone call the characters 8 and 1 are added so when you quickly need to redial you do not have to edit the number and add 8 for each call.
I tested the translation-rule:
ROUTER-2911#test voice translation-rule 6 9082121231
Matched with rule 2
Original number: 9082121231     Translated number: 819082121231
Original number type: none      Translated number type: none
Original number plan: none      Translated number plan: none
ROUTER-2911#test voice translation-rule 6 2019121231
Matched with rule 1
Original number: 2019121231     Translated number: 89121231
Original number type: none      Translated number type: none
Original number plan: none      Translated number plan: none
ROUTER-2911#
Issue is I am not sure with my inbound call leg if it can even work. We dial out through the SIP Trunk and the incoming is translated to the AutoAttendant on Cisco Unity Express.
voice translation-rule 1
rule 1 /2015552100/ /2003/
voice translation-profile CUE_Voicemail/AutoAttendant
translate called 1
dial-peer voice 9 voip
description **Incoming Call from SIP Trunk**
translation-profile incoming CUE_Voicemail/AutoAttendant
call-block translation-profile incoming BLOCKED-INCOMING
call-block disconnect-cause incoming call-reject
session protocol sipv2
session target dns:nd01-04.fs.SIPPROVIDER.net
incoming called-number .%
voice-class codec 1
voice-class sip dtmf-relay force rtp-nte
dtmf-relay rtp-nte
no vad
Can what I am trying to do be done with my current setup?

Hi patldmart012,
The dial-peer 9 that you have attached will not be affected by following config
voice translation-rule 6
rule 1 /^201\(.*\)/ /8\1/
rule 2 /\(..........\)/ /81\1/
voice translation-profile filter_Incoming
translate calling 6
Because you have not applied the translation profile "filter_incoming" on the dial-peer.
Could you please provide the exact call flow?
Along with that, If you are facing issue with calls on SIP Trunk, please collect following debugs in a logging buffer and attach the file. I will analyse it and will get back to you.
debug voip ccapi inout
debug ccsip message
debug voice translation
Debug h225 asn1 (If H323 involved)
Debug h245 asn1 (If H323 involved)
Debug MGCP Packets (If MGCP involved)
Also provide the running config of the GW.
These are verbose debugs, so please collect them in the following manner:
Router(config)# service sequence
Router(config)# service timestamps debug datetime msec
Router(config)# logging buffered 30000000 7
Router(config)# no logging con
Router(config)# no logging mon
Router# Clear log
Router# term no mon
<Enable debugs, then wait for issue to occur.>
Router# term len 0
<Enable session capture to txt file in terminal program.>
Router# Undebug all
Router# sh log
Once i have the logs, i will analyse it and will get back to you.
Regards,
Mudit Mathur

Getting Errors: could not find program unit being called ORA-0651

Hello,
I'm new to Oracle and I need your help. I'm using Oracle SQL Developer and I have a package that compiles without errors (only warnings) but it still shows a little red x in package's body icon. I get the following error message:
ORA-04063: package body "SAFETYUSER.SEL_INCIDENT_INFO" has errors ORA-06508: PL/SQL: could not find program unit being called ORA-06512: at line 1
Here is the body of the package. I would appreciate your help.:
create or replace PACKAGE BODY "SEL_INCIDENT_INFO" as
procedure sel_0022Info
in_ID0022 in number,
out_eName out t_varChar2,
out_mName out t_varChar2,
out_Work out t_varChar2,
out_Loc out t_varChar2,
out_Sign out t_varChar2,
out_obsDate out t_varChar2,
out_veh out t_varChar2,
out_vehType out t_varChar2,
out_vehTag out t_varChar2,
out_secSup out t_varChar2,
out_dlic out t_varChar2,
out_dlType out t_varChar2,
out_rc out t_varChar2,
out_JTitle out t_varChar2,
out_actTake out t_varChar2,
out_jobfunc out t_varchar2,
out_ecuid out t_varchar2,
out_mcuid out t_varchar2
is
-- cursor to get ecuid ID for entered employee cuid
CURSOR cur0022 IS
select o.ecuid,o.mcuid,o.workperf,o.loc,o.obsdate,o.sign,o.dlid,o.secid,o.vehid, o.action, o.eID (NMC 11/28/2006)
select o.euid,o.muid,o.workperf,o.loc,o.obsdate,o.sign,o.dlid,o.secid,o.vehid, o.action, o.eID
from TBL_0022 o
where o.id0022 = in_ID0022;
-- variables
out_eFN varchar2(50);
out_mFN varchar2(50);
out_eJF varchar2(4);
out_DL varchar2(100);
out_DLT varchar2(100);
out_Sec varchar2(100);
out_Vh varchar2(50);
out_VhT varchar2(50);
out_VhTg varchar2(50);
out_eID varchar2(7);
out_eRC varchar2(10);
out_signFull varchar2(50);
out_eJT varchar2(100);
-- rows for cursors
row0022 cur0022%rowtype;
begin
open cur0022;
fetch cur0022 into row0022;
sel_eFullName(row0022.ecuid,out_eFN, out_eJF,out_eID,out_eRC,out_eJT); (NMC 11/28/2006)
sel_eFullName(row0022.euid,out_eFN, out_eJF,out_eID,out_eRC,out_eJT); -- Changed ecuid to euid NMC 11/28/2006
--sel_mFullName(row0022.mcuid,out_mFN);
sel_DL(row0022.DLID,out_DL,out_DLT);
sel_Sec(row0022.secid,out_Sec);
sel_Veh(row0022.vehid,out_Vh,out_VhT,out_VhTg);
out_veh(1) := out_vh;
out_vehType(1) := out_vht;
out_vehTag(1) := out_vhtg;
out_secSup(1) := out_Sec;
out_dlic(1) := out_DL;
out_dlType(1) := out_DLT;
out_eName(1) := out_eFN;
out_mName(1) := out_mFN;
out_Work(1) := row0022.workperf;
out_Loc(1) := row0022.loc;
sel_mfullname(row0022.sign,out_signFull);
out_Sign(1) := row0022.sign;--out_signFull;
out_obsDate(1) :=row0022.obsdate;
out_actTake(1) :=row0022.action;
out_jobFunc(1) := out_eJF;
out_rc(1) := out_eRC;
out_ecuid(1) := row0022.ecuid; (NMC 11/28/2006)
out_ecuid(1) := row0022.euid; -- Changed ecuid to euid. (NMC 11/28/2006)
out_mcuid(1) := row0022.mcuid; (NMC 11/28/2006)
out_mcuid(1) := row0022.muid; -- Changed mcuid to muid. (NMC 11/28/2006)
out_JTitle(1) := out_eJT;
close cur0022;
end;
procedure sel_eFullName
in_0022EcuID in varchar2, --number,
out_eFN out varChar2,
out_eJF out varchar2,
out_eID out varchar2,
out_eRC out varchar2,
     out_eJT out varchar2
is
-- cursor to get ecuid ID for entered employee cuid
CURSOR curCUID IS
select e.efn, e.eln,e.jobfunc,ecuid,rc,e.eid, e.jTitle
from TBL_EINFO e
where e.ecuid = in_0022ecuid
order by e.eid desc;--eid = in_0022EID;
-- rows for cursors
rowCUID curCUID%rowtype;
begin
open curCUID;
fetch curCUID into rowCUID;
out_eFN := rowCUID.efn||' '||rowCUID.eln;
out_eJF := rowCUID.jobfunc;
out_eID := rowCUID.eid;--ecuid;
out_eRC := rowCUID.rc;
out_eJT := rowCUID.jTitle;
close curCUID;
end;
procedure sel_mFullName
in_mcuid in varchar2,
out_mFN out varChar2
is
-- cursor to get ecuid ID for entered employee cuid
CURSOR curCUID IS
select m.mname
from TBL_managers m
where m.mcuid = in_mcuid;
-- rows for cursors
rowCUID curCUID%rowtype;
begin
open curCUID;
fetch curCUID into rowCUID;
out_mFN := rowCUID.mname;
close curCUID;
end;
procedure sel_DL
in_DLID in number,
out_DL out varChar2,
out_DLT out varChar2
)is
-- get Last DL
CURSOR curDL(parDLID number)IS
SELECT D.DL, D.DLTYPE, D.DLID
FROM tbl_DL D
WHERE D.DLID = parDLID;
-- rows for cursors
rowDL curDL%rowtype;
begin
-- get DL if not 0
open curDL(in_DLID);
fetch curDL into rowDL;
if(rowDL.DL!='0')then
out_DL := rowDL.dl;
else
out_DL := '';
end if;
if(rowDL.DLType !='0')then
out_DLT := rowDL.dltype;
else
out_DLT := '';
end if;
close curDL;
end;
procedure sel_Sec
in_SecID in number,
out_Sec out varChar2
)is
-- get Last Second Supervisor
CURSOR curSec(parSecID number)IS
SELECT s.Super
FROM tbl_SecSup s
WHERE s.secsID = parSecID;
-- rows for cursors
rowSec curSec%rowtype;
begin
-- get Sec if not 0
open curSec(in_SecID);
fetch curSec into rowSec;
if(rowSec.Super!='0')then
out_Sec := rowSec.Super;
else
out_Sec := '';
end if;
close curSec;
end;
procedure sel_Veh
in_VehID in number,
out_Veh out varChar2,
out_VType out varChar2,
out_VTag out varChar2
)is
-- get Last Second Supervisor
CURSOR curVeh(parVehID number)IS
SELECT v.vehicle, v.vehtype, vehtagnumber
FROM tbl_Vehicle v
WHERE v.vehID = parVehID;
-- rows for cursors
rowVeh curVeh%rowtype;
begin
-- get vehicle if not 0
open curVeh(in_VehID);
fetch curVeh into rowVeh;
if(rowVeh.vehicle!='0')then
out_Veh := rowVeh.Vehicle;
else
out_Veh := '';
end if;
if(rowVeh.vehtype!='0')then
out_VType := rowVeh.vehtype;
else
out_VType := '';
end if;
if(rowVeh.vehtagnumber!='0')then
out_VTag := rowVeh.vehtagnumber;
else
out_VTag := '';
end if;
close curVeh;
end;
procedure sel_ObsIds(
in_IncID in number,
out_obsID out t_number
is
-- cursor
cursor curFindObsID is
select o.obsID from tbl_obs o where o.id0022 = in_incID;
-- variables
obsExist tbl_Obs.obsid%type;
pcount number default 1;
begin
FOR xLoop IN curFindObsID
LOOP
out_obsID(pcount) := xLoop.obsID;
pcount := pcount + 1;
END LOOP;
end;
procedure sel_ObsIdsWSitem(
in_IncID in number,
in_SitemID in number,
out_obsID out t_number
is
-- cursor
cursor curObsIDwSitemID is
select o.obsID from tbl_obs o where o.id0022 = in_incID and o.sitem_id = in_sitemID;
-- variables
pcount number default 1;
begin
FOR xLoop IN curObsIDwSitemID
LOOP
out_obsID(pcount) := xLoop.obsID;
pcount := pcount + 1;
END LOOP;
end;
procedure delObsId(
in_obsID in number
is
begin
DELETE FROM tbl_obs o WHERE (o.obsID=in_obsID);
end;
procedure sel_last0022(
in_ecuid in varchar2,
--in_mcuid in varchar2,
out_secSup out t_varChar2,
out_dlic out t_varChar2,
out_dlType out t_varChar2,
out_rc out t_varChar2,
out_veh out t_varChar2,
out_vehtag out t_varChar2,
out_vehtype out t_varChar2,
out_eName out t_varChar2,
out_mcuid out t_varChar2,
out_ecID out t_varchar2,
out_jobFunc out t_varChar2,
out_jTitle out t_varchar2
is
---cursor
cursor curGetLast0022 is
select o.vehid, o.dlid, o.secid, o.eid, o.mcuid (NMC 11/28/2006)
select o.vehid, o.dlid, o.secid, o.eid, o.muid
from tbl_0022 o
-- where o.ecuid = in_ecuid and o.mcuid = in_mcuid (NMC 11/28/2006)
where o.euid = in_ecuid and o.mcuid = in_mcuid Changed ecuid to euid (NMC 11/28/2006)
order by o.id0022 desc;
---variables
row0022 curGetLast0022%rowtype;
out_eFN varchar2(50);
out_mFN varchar2(50);
out_eJF varchar2(4);
out_DL varchar2(50);
out_DLT varchar2(50);
out_Sec varchar2(50);
out_Vh varchar2(50);
out_VhT varchar2(50);
out_VhTg varchar2(50);
out_eRC varchar2(10);
out_eID varchar2(7);
out_eJT varchar2(100);
pOut_mCuid varchar2(7);
begin
open curGetLast0022;
fetch curGetLast0022 into row0022;
sel_eFullName(in_ecuid,out_eFN, out_eJF,out_eID,out_eRC,out_eJT);
--sel_mFullName(in_mcuid,out_mFN);
sel_DL(row0022.DLID,out_DL,out_DLT);
sel_Sec(row0022.secid,out_Sec);
sel_Veh(row0022.vehid,out_Vh,out_VhT,out_VhTg);
out_veh(1) := out_vh;
out_vehType(1) := out_vht;
out_vehTag(1) := out_vhtg;
out_secSup(1) := out_Sec;
out_dlic(1) := out_DL;
out_dlType(1) := out_DLT;
out_eName(1) := out_eFN;
     if(row0022.mcuid IS NULL)then
          sel_EInfoMCuid(in_ecuid,pOut_mCuid);
          out_mcuid(1) := pOut_mCuid;
     else
          out_mcuid(1) := row0022.mcuid; (NMC 11/28/2006)
out_mcuid(1) := row0022.muid; -- Changed mcuid to muid. (NMC 11/28/2006)
     end if;
     --sel_EInfoMCUID(in_ecuid,pOut_mCuid);
     --out_mcuid(1) := pOut_mCuid;
out_rc(1) := out_eRC;
out_ecID(1) := out_eID;
out_jobfunc(1) := out_eJF;
     out_jTitle(1) := out_eJT;
close curGetLast0022;
end;
procedure sel_EInfoMCUID(
pIn_ecuid in varchar2,
out_mcuid out varchar2
is
-- cursor
cursor curEInfoMCuid is
select e.eid, e.mcuid from tbl_einfo e where e.ecuid = pIn_ecuid order by e.eid desc;
-- variables
rowMCuid curEInfoMCuid%rowtype;
begin
     open curEInfoMCuid;
     fetch curEInfoMCuid into rowMCuid;
     close curEInfoMcuid;
     out_mcuid := rowMCuid.mcuid;
end;
procedure sel_empInfo
in_0022EcuID in varchar2, --number,
out_eFN out t_varchar2,
out_eJF out t_varchar2,
out_eID out t_varchar2,
out_eRC out t_varchar2,
     out_eJT out t_varchar2,
     out_eStA out t_varchar2,
     out_eStaN out t_varchar2,
     out_eMcuid out t_varchar2
is
-- cursor to get ecuid ID for entered employee cuid
CURSOR curCUID IS
select e.efn, e.eln,e.jobfunc,ecuid,rc,e.eid, e.jTitle,e.stA, e.stacode,e.MCUID
from TBL_EINFO e
where e.ecuid = in_0022ecuid
order by e.eid desc;--eid = in_0022EID;
-- rows for cursors
rowCUID curCUID%rowtype;
begin
open curCUID;
fetch curCUID into rowCUID;
out_eFN(1) := rowCUID.efn||' '||rowCUID.eln;
out_eJF(1) := rowCUID.jobfunc;
out_eID(1) := rowCUID.eid;--ecuid;
out_eRC(1) := rowCUID.rc;
out_eJT(1) := rowCUID.jTitle;
out_eStA(1) := rowCUID.sta;
out_eStaN(1) := rowCUID.staCode;
out_eMcuid(1) := rowCUID.mcuid;
close curCUID;
end;
end;

This is the results of that query:
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
PLW-07203: Message 7203 not found; No message file for product=plsql, facility=PLW
40 rows selected

PL/SQL: Could not find program unit being called: mydb.pkg_alert (newbie)

This is my first attempt at a pretty in debt package. All the procedures and functions work successfully on their own. When i try and put them into a package and run the package, i get these errors?
ORA-04063: package body "mydb.PKG_ALERT" has errors
ORA-06508: PL/SQL: could not find program unit being called: "mydb.PKG_ALERT"
ORA-06512: at line 6
Here's my package:
create or replace PACKAGE pkg_alert AS
FUNCTION fcn_chck_dt(p_date date)
RETURN VARCHAR2;
FUNCTION fcn_chck_decline(p_date date)
RETURN NUMBER;
PROCEDURE sp_run_alert(p_date date);
END pkg_monitor;
Here's my package body code: Your assistance is greatly appreciated:
create or replace
PACKAGE BODY PKG_ALERT AS
FUNCTION fcn_chck_dt(p_date date) return VARCHAR2 is
--DECLARE
v_table_name VARCHAR2(35);
     v_string VARCHAR2(1024);
     v_result number;
     v_output VARCHAR2(1024);
v_date VARCHAR2(100);
v_dt VARCHAR2(100);
     CURSOR c_table is
          select table_name
          from user_tab_columns
          where COLUMN_NAME = 'date'
          and table_name NOT LIKE '%BIN%';
     BEGIN
OPEN c_table;
     loop
          FETCH c_table into v_table_name;
          exit when c_table%NOTFOUND;
          v_string:='select decode(to_date(max(date),''yyyymmdd''),'''||p_date||''',1,0)'|| ' from ' || v_table_name;
execute immediate v_string into v_result;
v_date:='select max(date)'|| ' from ' || v_table_name;
execute immediate v_date into v_dt;
if v_result=0 then
          v_output:=v_output||CRLF||v_table_name||': '||v_dt;
end if;
end loop;
close c_table;
return v_output;
END fcn_chck_dt;
FUNCTION fcn_chck_decline(p_date date) return NUMBER is
--DECLARE
     v_dt NUMBER;
     v_active NUMBER;
     v_delta NUMBER;
     v_perc_delta NUMBER;
     v_old_s varchar2(1024);
     v_old_dt number;
     v_string varchar2(1024);
     v_result NUMBER;
     CURSOR c_prev IS
          select date,daily_active,
          daily_active-lag(daily_active) over(order by date),
          trunc(((daily_active-lag(daily_active) over(order by date))/daily_active)*100,2)
          from pop_stats
          where to_date(date,'YYYYMMDD') between p_date-1 and p_date
          order by date desc;
---bringing back two rows and all records on purpose.
     BEGIN
          OPEN c_prev;
          FETCH c_prev INTO v_dt,v_active,v_delta,v_perc_delta;
     close c_prev;
     v_old_s := 'select max(date) from alert_stats';
     execute immediate v_old_s into v_old_dt;
     if v_dt!=v_old_dt then
     insert into ALERT_stats(date,
               daily_active,
               daily_delta,
               daily_delta_percent)
                    values(v_dt,
                    v_active,
                    v_delta,
                    v_perc_delta);
          end if;
     v_string:='select value from config_tbl where name=''decline''';
     execute immediate v_string into v_result;
     if v_perc_delta <= v_result then
     return v_perc_delta;
          end if;
     END fcn_chck_decline;
PROCEDURE sp_run_alert(p_date date) IS
--DECLARE
v_result varchar2(1024);
BEGIN
     insert into ALERT_stats(date)
values(p_date);
CRLF char(2) := chr(10)||chr(13);
v_result :='';
v_result := v_result||fcn_chck_dt(p_date);
v_result := v_result||fcn_chck_decline(p_date);
if v_result.length > 0 then
utl_mail.send('alerts@localhost','[email protected]',NULL,NULL,
'Alert','Alert Summary: '||v_result,'text/plain; charset=us-ascii',NULL);
end if;
END sp_run_alert;
END PKG_ALERT;

Take a look at the bolded sections of your code especialy the last line of your package spec
create or replace PACKAGE pkg_alert AS
FUNCTION fcn_chck_dt(p_date date)
RETURN VARCHAR2;
FUNCTION fcn_chck_decline(p_date date)
RETURN NUMBER;
PROCEDURE sp_run_alert(p_date date);
END pkg_monitor;

Error while compiling program unit

Hi All,
I am working on oracle forms 10g.
I am getting an error "wrong no or types of arguments in call to 'COUNTCDRSTODELETE' ", while trying to compile my program unit.
The extract of my program unit is as written below:
PROCEDURE CALL_PCK_BACKOUT IS
-- type bmpf_id_arr is varray(100) of bmp_files.bmpf_id%type;
type bmpf_id_arr is varray(100) of integer;
id_arr bmpf_id_arr := bmpf_id_arr();
file_cnt number := 0;
BEGIN
GO_BLOCK('B_FILE');
first_record;
LOOP
     --     EXIT WHEN :SYSTEM.RECORD_STATUS='NEW';
          IF UPPER(:B_FILE.FILE_ON_OFF_IND) = 'Y' THEN
     FOR I IN ( SELECT BMPF_ID FROM BMP_FILES
                         WHERE BMPF_FILENAME = :B_FILE.BMPF_FILENAME
                         AND BMPF_PROCESSING_STATE = 'P'
                         ORDER BY BMPF_ID ASC)
     LOOP
          if file_cnt < id_arr.limit then
               id_arr.extend;
               id_arr(id_arr.last) := i.bmpf_id;
               INSERT INTO bmp_files_to_backout (file_id, job_id) values (i.bmpf_id,pkg_constants.gt_bat_code_bckout_cdr);
               file_cnt := file_cnt + 1;
          else
               msg_alert('You can select maximum 100 files at a time','E',FALSE);
               RAISE FORM_TRIGGER_FAILURE;
          end if;
     END LOOP;
     END IF;
     EXIT WHEN :SYSTEM.LAST_RECORD='TRUE';
     NEXT_RECORD;
END LOOP;
if file_cnt = 0 then
     msg_alert('Please select at least one file in order to initiate the backout','E', FALSE);
     go_item('b_ctrl.file_name');
     RAISE FORM_TRIGGER_FAILURE;
end if;
if file_cnt > 0 then
commit;
end if;
-- check if the backout request has been accepted or not
if pck_backout.CountCDRStodelete(id_arr,file_cnt) = 0 and pck_backout.AreallCDRSOpen(id_arr,file_cnt) = 0 then
     msg_alert('Backout request can be scheduled for the selected input','E',FALSE);
elsif     pck_backout.CountCDRStodelete(id_arr,file_cnt) != 0 and pck_backout.AreallCDRSOpen(id_arr,file_cnt) != 0 then
     msg_alert('Backout request has been rejected due to maximum number of cdrs exceeded and not all cdrs belonging to open invoices','E',FALSE);
     RAISE FORM_TRIGGER_FAILURE;
elsif     pck_backout.CountCDRStodelete(id_arr,file_cnt) != 0 then
msg_alert('Backout request has been rejected due to maximum number of cdrs exceeded','E',FALSE);
RAISE FORM_TRIGGER_FAILURE;
elsif pck_backout.AreallCDRSOpen(id_arr,file_cnt) != 0 then
     msg_alert('Backout request has been rejected due to not all cdrs belonging to open invoices','E',FALSE);
     RAISE FORM_TRIGGER_FAILURE;
end if;
END;
pck_backout is a stored database package. The definition of two functions used above is as given below:
FUNCTION countcdrstodelete (
p_bmpf_id_array IN pkarray,
p_batch_size IN NUMBER
RETURN NUMBER;
FUNCTION areallcdrsopen (p_bmpf_id_array IN pkarray, p_batch_size IN NUMBER)
RETURN NUMBER;
where pkarray is defined as :
TYPE pkarray IS VARRAY (100) OF INTEGER;
Can anyone please tell me why i am getting wronf type or no of arguments error while calling the databse functions.
I guess, it has to do with the varray field. Can you please tell me if i am using any wrong syntax??
I request all the forms gurus to please help me with this.

Hi Fabrio,
I solved my problem.
I'd to actually define pkarray as sql type rather than PL/SQL type.
It's because oracle forms wasn't able to bind the varray defined locally in program unit with the varray defined in stored PL/SQL function.
Once i created pkarray as sql type and removed the declaration of varray in program unit and PL/SQL code, it worked.
Thanks for your reply though.
Regards,
Navnit

How to reference a user parameter in program unit

I tried to define a user parameter in Oracle Report 6i and I could reference it (&p_where_clause) in the main query but I failed to reference it in one of the program units. Here is the logic:
function CF_OTHER_COURSESFormula return Char is
cnt           number;
priority     number;
class_code     varchar2(8);
oc           varchar2(100) := null;
cursor oc_cur is
select class_code, branch_priority
from nominations n, employments e
where n.hkic_no = e.hkic_no
and e.staff_status_code = 'EMP'
and &p_where_clause --> contain "n.course_code in ('A','B','C')"
and n.hkic_no = :hkic_no
and n.class_code != :class_code;
begin
cnt := 1;
open oc_cur;
loop
fetch oc_cur into class_code, priority;
if oc_cur%notfound then
     exit;
end if;
if cnt = 1 then
oc := oc||class_code||'('||priority||')';
else
oc := oc||', '||class_code||'('||priority||')';
end if;
cnt := cnt + 1;
end loop;
close oc_cur;
return oc;
exception
when no_data_found then
return '';
end;
Does anyone tell me how to reference it in program unit? Does Oracle Reports 6i support this operation?

There hasn't been any changes to the way lexicals and bind variables work in Reports between 2.5 and 6i. There are different versions of PL/SQL and you might be hitting some problem here.
In your case, you shouldn't be using the query lexical "&p_where_clause" just the PL/SQL bind variable syntax ":p_where_clause". Since you're creating a PL/SQL cursor, you should probably use dynamic sql creation with a concatenation of the where clause to build up the SQL for the cursor. Check out the PL/SQL documentation for this.

Needed program unit to translate number as currency to string

Similar Messages

Maybe you are looking for