Pass substitution variable to a region source

Hi, I am trying to show an oracle report in a region. I was able to display it using javascript popupurl , in a seperate window. But, now I need to display it in the region. I want to pass the &Reports_url to region source, instead of writing the whole url as 'https://host.portname.....' IS it possible? Can anyone please give me some help?
Thanks in advance,
Regards,
Suma.

Check the header you create in the download procedure. Here's my download procedure:
PROCEDURE download_file
 ( p_docid IN NUMBER,
 p_sessionid IN NUMBER,
 p_personsystemid IN NUMBER,
 p_pageid IN NUMBER,
 p_attachment IN VARCHAR2 DEFAULT 'Y' )
IS
 session_expired EXCEPTION;
 invalid_session EXCEPTION;
 PRAGMA EXCEPTION_INIT( session_expired, -20101 );
 PRAGMA EXCEPTION_INIT( invalid_session, -20100 );
 l_mime VARCHAR2(48);
 l_length NUMBER;
 l_filename VARCHAR2(400);
 l_doc BLOB;
 l_attachment VARCHAR2(1) := p_attachment;
BEGIN
 p_login.validate_session( p_sessionid );
 IF p_security.check_page_access( p_personsystemid, p_pageid ) = FALSE THEN
 htp.p( 'You do not have access to this document' );
 ELSE
 SELECT mime_type, doc_size, doc_name, doc_blob
 INTO l_mime, l_length, l_filename, l_doc
 FROM doc_tab
 WHERE docid = p_docid;
 owa_util.mime_header( NVL( l_mime, 'application/octet' ), FALSE );
 htp.p( 'Content-length: ' || l_length );
 IF p_attachment = 'Y' THEN
 htp.p( 'Content-Disposition: attachment; filename="' || SUBSTR( l_filename, INSTR( l_filename, '/' ) + 1 ) || '"' );
 ELSE
 htp.p( 'Content-Disposition: filename="' || SUBSTR( l_filename, INSTR( l_filename, '/' ) + 1 ) || '"' );
 END IF;
 owa_util.http_header_close;
 wpg_docload.download_file( l_doc );
 END IF;
EXCEPTION
 WHEN no_data_found THEN
 htp.p( 'Document Not Found' );
 WHEN session_expired THEN
 htp.p( 'Your session has expired' );
 WHEN invalid_session THEN
 htp.p( 'Invalid Session ID' );
END download_file;Look at the part starting with IF p_attachement = 'Y' THEN
chet

Similar Messages

Using bind variables in HTML Region source

<nl>
http://apex.oracle.com/pls/apex/f?p=49417:1 workspace: SVK demo/demo
I am having problems incorporating an item variable into a string of embedded html that should popup a modal video when the button is pressed.
Item 1 works fine and that is what I want to accomplish with item 2, but when I pass :p1_url, it does not work even though the contents of the two items text areas equivalent.

svk1965 wrote:
If you look at my app, you'll see what I am attempting. Click on the button "Pass Hardcoded URLs in Variable to HTML Region" and a modal video will pop up. The goal is to display video in a modal window. The first example in my app works just fine. It is the second one that is causing me problems. BTW - Sequence 18 in the second DA does the same thing as Sequence 10 in the first - and it does work there so I am not sure that removing it is the right thing to do. I am not trying to set a region value per se, but populate the region source and sequence 10 does just that. So I don't think it is "useless" as you say.I can't see anything in the documentation or any previous posts here that indicates that DAs are supposed to work that way. If you can point me to some I'd like to see it. Which is not to say I like the idea. Plays too fast and loose with terms and concepts.
Rather than trying to use a "Set Value" DA, my understanding would be to manipulate the region content via an "Execute JavaScript Code" DA, which works exactly as intended.
I'll have to investigate this DA behaviour with a simpler example that doesn't involve hidden regions and Dynamic Acrion plugins.

Passing Substitution Variable

Hi Everyone,
I'm trying to pass a substitution variable that contains a where clause from TEST2_PROC to TEST1_PROC, but all records are selected by TEST1_PROC as though the variable is ignored even though it contains the correct syntax.
Code below.
Any suggestions?
Thank You in Advance for Your Help,
Lou
create or replace
PROCEDURE TEST2_PROC
AS
my_refcur SYS_REFCURSOR;
my_id ci_summrpt_report_codes.id% TYPE;
my_descr ci_summrpt_report_codes.descr% TYPE;
my_valid_flag ci_summrpt_report_codes.valid_flag% TYPE;
my_success VARCHAR2(100);
my_where VARCHAR2(50) := ' WHERE ID = 1';
BEGIN
TEST1_PROC(my_refcur,my_where) ;
DBMS_OUTPUT.PUT_LINE('ID DESCR VALID_FLAG');
DBMS_OUTPUT.PUT_LINE('----- ------- ---------');
LOOP
FETCH my_refcur INTO my_id, my_descr, my_valid_flag;
EXIT
WHEN my_refcur%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(my_id || CHR(9) || RPAD(my_descr,25) || CHR(9) || my_valid_flag);
END LOOP;
CLOSE my_refcur;
END TEST2_PROC;
create or replace
PROCEDURE TEST1_PROC (
p_refcur OUT SYS_REFCURSOR,
p_where in VARCHAR2
IS
v_id ci_summrpt_report_codes.id% TYPE;
v_descr ci_summrpt_report_codes.descr% TYPE;
v_valid_flag ci_summrpt_report_codes.valid_flag% TYPE;
BEGIN
DBMS_OUTPUT.PUT_LINE(p_where);
OPEN p_refcur FOR SELECT id, descr, valid_flag FROM
(SELECT 1 AS "ID", 'ONE' AS "DESCR", 'Y' AS "VALID_FLAG" FROM DUAL
UNION ALL
SELECT 2, 'TWO', 'Y' FROM DUAL
UNION ALL
SELECT 3, 'THREE','Y' FROM DUAL
UNION ALL
SELECT 4, 'FOUR','Y' FROM DUAL)
p_where;
END TEST1_PROC;

In TEST1_PROC you need to open ref cursor with dynamic SQL:
create or replace
PROCEDURE TEST1_PROC (
p_refcur OUT SYS_REFCURSOR,
p_where in VARCHAR2
IS
v_id ci_summrpt_report_codes.id% TYPE;
v_descr ci_summrpt_report_codes.descr% TYPE;
v_valid_flag ci_summrpt_report_codes.valid_flag% TYPE;
BEGIN
DBMS_OUTPUT.PUT_LINE(p_where);
OPEN p_refcur FOR 'SELECT id, descr, valid_flag FROM ' ||
'(SELECT 1 AS "ID", ''ONE'' AS "DESCR", ''Y'' AS "VALID_FLAG" FROM DUAL ' ||
'UNION ALL ' ||
'SELECT 2, ''TWO'', ''Y'' FROM DUAL ' ||
'UNION ALL ' ||
'SELECT 3, ''THREE'',''Y'' FROM DUAL ' ||
'UNION ALL ' ||
' SELECT 4, ''FOUR'',''Y'' FROM DUAL) ' ||
p_where;
END TEST1_PROC;SY.

Application Item Not Working as Bind Variable in Region Source

I've created an application variable - APP_AC_CODE - a value for which - PA1 - I set as part of the column link on page A that branches to page B.
I use APP_AC_CODE as part of a region title on page B - &APP_AC_CODE. Parameters - which evaluates successfully to 'PA1 Parameters'.
However when I try to use APP_AC_CODE on the same page as part of the SQL query that drives the report for that region it fails to retrieve any records.
If I set the region source to:
SELECT idi FROM v_parameters WHERE aircraft_code = :APP_AC_CODE ;
then it fails but if I explicitly state the where clause:
SELECT idi FROM v_parameters WHERE aircraft_code = 'PA1' ;
then it works just fine and retrieves the records as expected.
If I check the session state then the right value is assigned to APP_AC_CODE; if I check debug then it shows the right value - binding: ":APP_AC_CODE"="APP_AC_CODE" value="PA1". Also, it displays fine as a substitution string.
I'm very confused. I'll be very grateful if someone can shed a little light. I expect I'm doing something stupid - new user and all that - but I haven't got a clue what that is.

Thanks for the reply Scott, but unfortunately I can't upload the app for business reasons. I appreciate that might make it impossible for you to diagnose the problem.
I don't know if I'm making progress with the problem but I've tried adding a hidden page item, setting that value from page A and using it from page B with the same results. Check the session state, the debug messages, or use it as a substitution variable and the right value is there.
I then tried setting the value of the page item with the value of the application item and (according to session and debug) the right value ends up in the page item. Still didn't work though.
I then created a new page (using the sql report wizard in case I was doing something wrong manually) and tried using the application item in the same way with the same problem.
Given that no records are being returned I assume that the database server doesn't care for the SQL query it sees. Is there a way of seeing what this is? When I look at the debug messages, all I see is 'parse query' and 'binding' messages. Any way I can see what the database server eventually sees?
Matt

How to pass a variable for a SQL query in OLEDB source?

Hi All,
I am new to SSIS and working on it past few days. Can anyone please help me getting through a scenario where I need to pass a variable in the SQL statement in OLEDB source connection. Please find below for the details.
eg:
1) I have a SQL table with the columns SerialNumber, Name, IsValid, FileName with multiple rows.
2) I have the file Name in a variable called Variable1.
3) I want to read the data from my SQL table filtering based on the FileName (Variable1) within a data flow task and pull that data to the destination table.
Question: In the data flow task, added source and destination DB connection with a script component in between to perform my validations. When trying to retrieve the data from source using the variable (i.e. SQL Query with variable), I am not able to add
the query as the SQL statement box is disabled. How to filter the data based on the variable in the source DB ?
Any help/suggestions would be of great help.
Thanks,
Sri

Just to add with Vaibhav comment .
SQL Command : SQL query either with SQL variable or any condition or simple Sql statement
Like ;
Select * from dimcustomer
SQL Command using Varible :
Sometimes we design our dynamic query in variable and directly use that variable name in oledb source.
If you Sql query needs a condition based on SSIS variable .
you can find a Example here :
http://www.toadworld.com/platforms/sql-server/b/weblog/archive/2013/01/17/ssis-replace-dynamic-sql-with-variables.aspx
http://www.select-sql.com/mssql/how-to-use-a-variable-inside-sql-in-ssis-data-flow-tasks.html
Thanks
Please Mark This As Answer or vote for Helpful Post if this helps you to solve your question/problem. http://techequation.com

How to pass parameter [bind variable or substitution variable] to a view?

How can I pass a parameter [bind variable or substitution variable] to a view in Oracle?
Some will tell me that this is not necessary, that I can only pass the parameter when I query the view, but I found some case where this cause performance issue. In long view where I use subquery factoring [WITH], it's necessary to pass the parameter many time through different subqueries and not only to the resulting view.
In other database (SQL Server, Access), we can pass parameters through query. I can't find how to do that in Oracle. Can some one tell me what is the approach suggest by Oracle on that subject?
Thank you in advance,
MB
What I can do:
CREATE VIEW "HR"."EMP_NAME" ("FIRST_NAME", "LAST_NAME")
AS
SELECT FIRST_NAME, LAST_NAME FROM EMPLOYEES;
What I want to do:
CREATE VIEW "HR"."EMP_NAME" ("FIRST_NAME", "LAST_NAME")(prmEMP_ID)
AS
SELECT FIRST_NAME, LAST_NAME FROM EMPLOYEES WHERE EMPLOYEE_ID IN (:prmEMP_ID);

Blais wrote:
How can I pass a parameter [bind variable or substitution variable] to a view in Oracle?
Some will tell me that this is not necessary, that I can only pass the parameter when I query the view, but I found some case where this cause performance issue. In long view where I use subquery factoring [WITH], it's necessary to pass the parameter many time through different subqueries and not only to the resulting view.Yes, there can be performance issues. Views are a form of dynamic SQL and it is hard to predict how they will perform later.
You can't pass parameters to a view. They are not functions. The mechanism to put the values in is what you mentioned, passing the parameter when you query the view.
In other database (SQL Server, Access), we can pass parameters through query. I can't find how to do that in Oracle. Can some one tell me what is the approach suggest by Oracle on that subject? This functionality is not supported.
What I can do:
CREATE VIEW "HR"."EMP_NAME" ("FIRST_NAME", "LAST_NAME")
AS
SELECT FIRST_NAME, LAST_NAME FROM EMPLOYEES;
What I want to do:
CREATE VIEW "HR"."EMP_NAME" ("FIRST_NAME", "LAST_NAME")(prmEMP_ID)
AS
SELECT FIRST_NAME, LAST_NAME FROM EMPLOYEES WHERE EMPLOYEE_ID IN (:prmEMP_ID);Include the bind value when you use the view in a SELECT. The value will be applied to the view at run-time, somthing like
CREATE VIEW "HR"."EMP_NAME_VW" ("FIRST_NAME", "LAST_NAME","EMPLOYEE_ID")(prmEMP_ID)
AS SELECT FIRST_NAME, LAST_NAME FROM EMPLOYEES;
select *
from emp_name_vw
WHERE EMPLOYEE_ID IN (:prmEMP_ID);To use EMPLOYEE_ID I added it to your list of columns in the view so it can be referenced in the WHERE clause. If you don't want to see that value don't select it from the view.

A method for passing in the system date to either a substitution variable or directly into a calc script for use on the fix statement

Does anyone have an idea of how to pass in the server system date into a calc script or into a substitution variable so that I can fully automate my calc script to only calculate the current day? Thanks very much for any assistance on this.

unsure why cannot att bat below is raw code meant to insert into .bat file ================================================ code starts below this line ================================================ :: :: pls ensure essbase server up and running :: batch file to upd subs var :: insert correct values below :: :: substitution variables set up in cube: curryr, lastyr :: substitution variables set up in cube: currmth, prevmth ... :: :: setting of local env vars setlocal :: :: setting of job control vars set svr=<< insert value here >> set uid=<< insert value here >> set pwd=<< insert value here >> :: :: setting of date and time vars for /F "tokens=1-4 delims=/ " %%i in ('date /t') do ( set dayofweek=%%i set day=%%k set month=%%j set year=%%l set datestamp=%%l_%%j_%%k ) for /F "tokens=1-2 delims=: " %%i in ('time /t') do ( set hour=%%i set minute=%%j set timestamp=%%i_%%j ) :: :: setting year vars set /a curryr=%year% set /a lastyr=(%year% - 1) :: :: setting paths and files set destpath=<< insert path here >> set errpath=<< insert path here >> set errfiles=%errpath%\*.err set errfiledir=%errpath%\%datestamp%_%timestamp%_err.dir set errfile=%destpath%\%datestamp%_%timestamp%_err.err set logfile=%destpath%\%datestamp%_%timeStamp%_log.log set upd_var_file=%destpath%\upd_var.txt :: :: initial housekeeping if exist %errfile% del %errfile% if exist %logfile% del %logfile% if exist %upd_var_file% del %upd_var_file% if exist %errfiledir% del %errfiledir% :: :: start all echo. >> %logfile% echo rem &0 >> %logfile% echo. >> %logfile% echo rem --- start all --- >> %logfile% date/t >> %logfile% time/t >> %logfile% :: dates echo rem --- dates --- >> %logfile% echo Curr Year = %curryr% >> %logfile% echo Last Year = %lastyr% >> %logfile% :: gen temp txt to upd subs vars echo rem --- upd subs vars start --- >> %logfile% echo. >> %upd_var_file% echo. >> %upd_var_file% echo login "%svr%" "%uid%" "%pwd%"; >> %upd_var_file% if %month% == 01 ( echo updatevariable "CurrMth" "%svr%" "" "" "Dec"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "Nov"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q4"; >> %upd_var_file% ) if %month% == 02 ( echo updatevariable "CurrMth" "%svr%" "" "" "Jan"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q1"; >> %upd_var_file% echo updatevariable "CurrYr" "%svr%" "" "" "FY%curryr%"; >> %upd_var_file% echo updatevariable "NextYr" "%svr%" "" "" "FY%nextyr%"; >> %upd_var_file% echo updatevariable "NextY2" "%svr%" "" "" "FY%nexty2%"; >> %upd_var_file% echo updatevariable "LastYr" "%svr%" "" "" "FY%lastyr%"; >> %upd_var_file% echo updatevariable "LastY2" "%svr%" "" "" "FY%lasty2%"; >> %upd_var_file% echo updatevariable "LastY3" "%svr%" "" "" "FY%lasty3%"; >> %upd_var_file% echo updatevariable "PrevYr" "%svr%" "" "" "FY%lastyr%"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "Dec"; >> %upd_var_file% ) if %month% == 03 ( echo updatevariable "CurrMth" "%svr%" "" "" "Feb"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "Jan"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q1"; >> %upd_var_file% echo updatevariable "PrevYr" "%svr%" "" "" "FY%curryr%"; >> %upd_var_file% ) if %month% == 04 ( echo updatevariable "CurrMth" "%svr%" "" "" "Mar"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "Feb"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q1"; >> %upd_var_file% ) if %month% == 05 ( echo updatevariable "CurrMth" "%svr%" "" "" "Apr"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "Mar"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q2"; >> %upd_var_file% ) if %month% == 06 ( echo updatevariable "CurrMth" "%svr%" "" "" "May"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "Apr"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q2"; >> %upd_var_file% ) if %month% == 07 ( echo updatevariable "CurrMth" "%svr%" "" "" "Jun"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "May"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q2"; >> %upd_var_file% ) if %month% == 08 ( echo updatevariable "CurrMth" "%svr%" "" "" "Jul"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "Jun"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q3"; >> %upd_var_file% ) if %month% == 09 ( echo updatevariable "CurrMth" "%svr%" "" "" "Aug"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "Jul"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q3"; >> %upd_var_file% ) if %month% == 10 ( echo updatevariable "CurrMth" "%svr%" "" "" "Sep"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "Aug"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q3"; >> %upd_var_file% ) if %month% == 11 ( echo updatevariable "CurrMth" "%svr%" "" "" "Oct"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "Sep"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q4"; >> %upd_var_file% ) if %month% == 12 ( echo updatevariable "CurrMth" "%svr%" "" "" "Nov"; >> %upd_var_file% echo updatevariable "PrevMth" "%svr%" "" "" "Oct"; >> %upd_var_file% echo updatevariable "CurrQtr" "%svr%" "" "" "Q4"; >> %upd_var_file% ) echo. >> %upd_var_file% echo exit; >> %upd_var_file% :: run temp txt to upd subs vars esscmd %upd_var_file% echo rem --- update subs vars end --- >> %logfile% date/t >> %logfile% time/t >> %logfile% :: end all echo rem --- end all --- >> %logfile% date/t >> %logfile% time/t >> %logfile% : end_all endlocal ===============================

MaxL Pass parameter zu create substitution variable

Hi everybody,I'm trying to pass a parameter from a DOS batch file to a MaxL script to create a substitution variable with that parameter.DOS batch file:...set var_version = "Final Version"essmsh Test.msh %var_version%MaxL file:....alter application TEST set variable SUBST_VERSION $1=> the substitution variable should be "Final Version" (incl. double-quotes because of the whitespace in the variable's value), but in fact, the substitution variable will be "Final" (without any double-quotes; they have been stripped by MaxL!?)=> if I don't use a parameter it works:alter application TEST set variable SUBST_VERSION '"Final Version"'=> I tried the following statement to keep my double-quotes, but the parameter won't be expanded then:alter application TEST set variable SUBST_VERSION '"$1"'So, does anybody know how to pass a parameter containing whitespaces to create a substitution variable within a MaxL script?Thanks for your hints!Marc

Hi,Try this one:1. Create batch file which will produse you a whole MAXL statement. This can be done with > or >> statement at the end of the commanad.E.g.: whole_command_with_"Final" >> to file.txt2. Execute maxl with above generated file.Hope this helps,Grofaty

Essbase server - automatic change of substitution variable from SQL

Hi,I would like to automaticaly change the substitution variable in Essbase Server. Is it posible to change the substitition variable from external source e.g. SQL statement?Simple sample:I would like to assign value "2003" to "CurYear" substitution variable. But value "2003" I would like to get from SQL:"select year(current date) from table".There are commands in Esscmd and MaxL Shell, see bellow.Esscmd command:CREATEVARIABLE "CurYear" "localhost" "" "" "2003";MaxL Shell:alter system set variable CurYear '2003';Is it possible to get the value '2003' from SQL and pass this value to Esscmd command or MaxL Shell?My system:Windows 2000 Professional Service pack 4Essbase at 6.5.3 levelThanks,Grofaty

You can create a text file from the SQL server that writes the command like"CREATEVARIABLE "CurrYear" "Servername" "AppName" "DBName" "2005";then you can create a schedule job that would run this script which can update the variable. CREATEVARIABLE creates/replaces the current variable.

Get SQL Query from the Region Source

Hi,
The below query gives me the region source code,
SELECT region_source into p_sql_stmt
FROM apex_application_page_regions
WHERE region_id = 01129836282 AND
page_id = 54 AND
application_id = 215;
Initially I use to have only the SQL region source code as mentioned below , So using the above query i use to pass the sql code to p_sql_stmt
SELECT PROJECT_ID,EMPLOYEE_ID,EFFECTIVE_DATE FROM AR_V_ADDRESS_HISTORY WHERE PROJECT_ID = :P51_PROJECT_ID
Now the changes what i did in the page region source is i am using a PLSQL return query which is mentioned below
declare
qry varchar2(32000);
begin
qry := ' SELECT PROJECT_ID,EMPLOYEE_ID,EFFECTIVE_DATE';
for c1 in ( SELECT * FROM AR_ADDRESS_TYPE)
loop
qry := qry ||
' , GET_ADDRESS_LINE_1(PROJECT_ID,EMPLOYEE_ID,' || c1.address_type_id || ' ,TO_DATE(EFFECTIVE_DATE)) "' || c1.name ||'_ADDRESS_TYPE_1"';
qry := qry ||
' , GET_ADDRESS_LINE_1(PROJECT_ID,EMPLOYEE_ID,' || c1.address_type_id || ' ,TO_DATE(EFFECTIVE_DATE)) "' || c1.name ||'_ADDRESS_TYPE_2"';
end loop;
qry := qry || ' FROM AR_V_ADDRESS_HISTORY
WHERE
PROJECT_ID = :P51_PROJECT_ID ';
return(qry);
end;
If i execute the above code in the with dbms_output.put_line in the SQL developer or TOAD it prints the sql query which i wanted, Since i am using this in a apex page i need to get the SQL code from the apex page.
Can any one please suggest me how to get this sql code using the above plsql code.
Please suggest me in this issue
Thanks
Sudhir

One way to get the sql statement is
Create a global variable in the package spec where your function returns sql statement and assign the final sql statement to the package spec variable before the return.
Write a wrapper function to return the stored sql statement value.
Example code below:
create or replace package xx_test_pkg as
g_sql_stmt CLOB;
function get_sql() return clob;
function get_stored_val() return clob;
end;
create or replace body package xx_test_pkg as
function get_sql return clob ..
v_sqlstmt clob;
begin
v_sqlstmt := 'select * from emp';
-- assign to global variable before returning the value
g_sql_stmt := v_sqlstmt;
return v_sqlstmt;
end;
function get_stored_val() ....
begin
return g_sql_stmnt;
end;
end;

How to modify substitution variables such as #REGION_POSITION_02#,etc.

Hi,
I'm working with an APEX page template - 'One Level Tabs' in my application.
I have copied and extended this template to meet the requirements specified by the client by adding a background image on the page.Also I have added 5 regions on the page,each one with a backgroung image each.These images are all png format and are supposed to be transaparent revealing the background image of the page.However,when I ran the page I noticed that these region images appeared on a white background and did not show the image below.
Is there a way to modify the substitution variables such as #REGION_POSITION_02#,#REGION_POSITION_04#,#REGION_POSITION_05# ,etc. such that the images placed here appear transparent and reveal the back drop underneath?
Would appreciate it very much if anybody could throw some light on the matter.
Regards,
Priya Jetley

So this is the kind of thing?
changed the html code in the body of that page template and specified and image as a background to the main html tablePlease post the HTML code (wrap in tags to format properly in the forum).
in the source of the region specified the '<img src' tag
This wouldn't give a background image, but place the image in the region content?
Png format I believe has the ability to be transparent by default.Correct me if I am mistaken.
PNGs can have full transparency set using binary transparency, or full or partial transparency set using an alpha channel. Do you know which has been used? Is transparency apparent when the images are viewed on their own?
Again you are recommended to upload a simple example of what you have done to apex.oracle.com. This is the fastest and most reliable way to troubleshoot this type of issue.

SQL data Load rule with Substitution variable

Hi,
I have a data load rule with MySQL as a data source. I have requirement where user does not want to see Current day data in cube and they keep changing days not to be loaded.
I have setup the substitution variable SUBv as '2009-11-04' and have scripts to update it daily.
Data Load rule in where condition contains
brand = 'HP' and region = 'east' and date <> &SUBv
Now, above where condition does not work for date <> &SUBv but if I set substitution variable SUBv as "brand = 'HP' and region = 'east' and date <> '2009-11-04' " and set load rule where condition with just &SUBv it would just work fine. I dont know whats wrong in 1st place.
I dont want to create multiple where condition in substitution variable (Don't we have limit on them?). I have 40+ load rules which might use this SUBv substitution variable if I find a way to define it so that it work as "brand = 'HP' and region = 'east' and date <> &SUBv"
Thanks,
Vikram

I did some research and came to know when using substitution variable in Load rule need to keep substitution variable first in string..
It worked out magically.

Can we use Substitution variables in MAXL?

Hi,
Can we use substitution variables in MAXL script?
I have to run this MAXL command for clearing a slice of ASO cube on V11.1.1.3.
alter database Apname.DBname clear data in region 'CrossJoin({[2009]},{[Dec]})';
I am planning to use Current_year & Current_month variables instead of hardcoding 2009 & Dec as I have to use this everymonth to clear the current months data.
If it is allowed, what is the syntax?
Is there any alternative apart from substitution variables?
Appreciate your thoughts.
Thanks,
-Ethan.

You would just use ampersand and the variable name instead of the hard coding e.g. &yearVar &periodVar.
Not tried it on aso clears but in theory it should work as ...'CrossJoin({&yearVar},{&periodVar})';
just change yearVar and periodVar for your substitution variable names.
Cheers
John
http://john-goodwin.blogspot.com/

How do i pass a variable in flex

i've been looking all over google for how to pass a variable yet
i've come up empty handed
i have a C code and as3
i've never been able to get a C program to compile on my own, this is from a tutorial im trying to understand about raycasting
from what i can gather i think that the variables are passed threw this
#######raycaster.c##########
AS3_Val loop( void* self, AS3_Val args )
 AS3_ArrayValue(args,"IntType,IntType,IntType,IntType",&K_UP,&K_DOWN,&K_LEFT,&K_RIGHT);
 CastRay();
 int opos,j,i,jpos;
 for(j=0; j < resY; j++ ){
 jpos = resX*j;
 for(i=0; i < resX; i++ ){
 opos = (jpos+i);
 tBuffer[opos] = buffer[i][j];
 }//end of for
 }//end of for
 return 0;
}//end of loop
however not one of the values inside of AS3_ArrayValue is to be found on the Main.as
this is the only function that comunicates with the C code, but i could be wrong
####Main.as######
 private function enterFrame(event:Event):void {
 alcRCLib.loop(upKey,downKey,leftKey,rightKey);
 alchemyMemory.position=alcScreenBufferPointer;
 screenBitmapData.setPixels(screenBitmapData.rect,alchemyMemory);
the reason i want to do this, other than to know how, because that would be useful above all else, i've already written a as3 that comunicates with php
to get a array of images for a topdown game, and i wouldn't know how to load these variables to C from a HTTP request but if i can get flash to tell c what they are then every thing worked out
heres both codes in full
#####Main.as####
*Alchemy Ray Caster
*April 6, 2010
*Bruce Jawn
*http://bruce-lab.blogspot.com
*Copyright (c) <2010> <Bruce Jawn>
*This software is released under the MIT License
*<http://www.opensource.org/licenses/mit-license.php>
package {
// import cmodule.Ray_Caster._worldMap;
// import cmodule.Ray_Caster._worldMap;
 import cmodule.Ray_Caster.CLibInit;
// import cmodule.Ray_Caster.TextFieldI;
 import flash.display.*;
 import flash.text.*;
 import flash.events.*;
 import flash.geom.*;
 import flash.text.engine.TextBlock;
 import flash.text.engine.TextLine;
 import flash.text.TextField;
 import flash.utils.*;
 import flash.ui.*;
 [SWF(width="840", height="880")]
 public class Main extends Sprite {
 [Embed(source="../wolftex/barrel.png")]
 public static var barrelClass:Class;
 [Embed(source="../wolftex/bluestone.png")]
 public static var bluestoneClass:Class;
 [Embed(source="../wolftex/colorstone.png")]
 public static var colorstoneClass:Class;
 [Embed(source="../wolftex/eagle.png")]
 public static var eagleClass:Class;
 [Embed(source="../wolftex/greenlight.png")]
 public static var greenlightClass:Class;
 [Embed(source="../wolftex/greystone.png")]
 public static var greystoneClass:Class;
 [Embed(source="../wolftex/mossy.png")]
 public static var mossyClass:Class;
 [Embed(source="../wolftex/pillar.png")]
 public static var pillarClass:Class;
 [Embed(source="../wolftex/purplestone.png")]
 public static var purplestoneClass:Class;
 [Embed(source="../wolftex/redbrick.png")]
 public static var redbrickClass:Class;
 [Embed(source="../wolftex/wood.png")]
 public static var woodClass:Class;
 //Array to hold all the textures
 private var texs:Array=[];
 private var worldMap:Array = [];
 //private var worldMap[1]:Array=[];
 private static const SCREEN_WIDTH:int=640;
 private static const SCREEN_HEIGHT:int=480;
 private var screenBitmapData:BitmapData;
 private var screenBitmap:Bitmap;
 private var alchemyMemory:ByteArray;
 private var alcRCLib:Object;
 private var cLibInit:CLibInit;
 private var alcScreenBufferPointer:uint;
 private var alcTexPointer:uint;
 private var upKey:int=0;
 private var downKey:int=0;
 private var leftKey:int=0;
 private var rightKey:int=0;
 private var a:flash.text.TextField;
 public function Main() {
 stage.frameRate=60;
 stage.align=StageAlign.TOP_LEFT;
 stage.scaleMode=StageScaleMode.NO_SCALE;
 stage.fullScreenSourceRect=new Rectangle(0,0,SCREEN_WIDTH,SCREEN_HEIGHT);
 init();
 }//end of function Main
 private function init():void {
 initBitmaps();
 initAlchemy();
 initRendering();
 }//end of function init
 private function initBitmaps():void {
 texs.push(prepareBitmapData(new eagleClass().bitmapData ));
 texs.push(prepareBitmapData(new redbrickClass().bitmapData ));
 texs.push(prepareBitmapData(new purplestoneClass().bitmapData ));
 texs.push(prepareBitmapData(new greystoneClass().bitmapData ));
 texs.push(prepareBitmapData(new bluestoneClass().bitmapData ));
 texs.push(prepareBitmapData(new mossyClass().bitmapData ));
 texs.push(prepareBitmapData(new woodClass().bitmapData ));
 texs.push(prepareBitmapData(new colorstoneClass().bitmapData ));
 texs.push(prepareBitmapData(new barrelClass().bitmapData ));
 texs.push(prepareBitmapData(new pillarClass().bitmapData ));
 texs.push(prepareBitmapData(new greenlightClass().bitmapData ));
 screenBitmapData=new BitmapData(SCREEN_WIDTH,SCREEN_HEIGHT,false,0);
 screenBitmap=new Bitmap(screenBitmapData);
 addChild(screenBitmap);
 worldMap[1] = (1,2,3,4);
 worldMap[2] = (1,2,3,4);
 worldMap[3] = (1,2,3,4);
 worldMap[4] = (1,2,3,4);
 worldMap[5] = (1,2,3,4);
 worldMap[6] = (1,2,3,4);
 worldMap[7] = (1,2,3,4);
 }//end of function initBitmaps
 //Prepare the bitmap once to take into account the lower-endianess of the alchemy code.
 private function prepareBitmapData(sourceMap:BitmapData):BitmapData {
 var outBitmapData:BitmapData=sourceMap.clone();
 outBitmapData=new BitmapData(outBitmapData.width,outBitmapData.height,true,0xFF000000);
 outBitmapData.copyChannel(sourceMap,outBitmapData.rect,outBitmapData.rect.topLeft,BitmapD ataChannel.ALPHA,BitmapDataChannel.BLUE);
 outBitmapData.copyChannel(sourceMap,outBitmapData.rect,outBitmapData.rect.topLeft,BitmapD ataChannel.RED,BitmapDataChannel.GREEN);
 outBitmapData.copyChannel(sourceMap,outBitmapData.rect,outBitmapData.rect.topLeft,BitmapD ataChannel.GREEN,BitmapDataChannel.RED);
 outBitmapData.copyChannel(sourceMap,outBitmapData.rect,outBitmapData.rect.topLeft,BitmapD ataChannel.BLUE,BitmapDataChannel.ALPHA);
 return outBitmapData;
 }//end of function prepareBitmapData
 private function initAlchemy():void {
 cLibInit=new CLibInit ;
 alcRCLib=cLibInit.init();
 //Retrieve the "Alchemy Memory".
 var ns:Namespace=new Namespace("cmodule.Ray_Caster");
 alchemyMemory=ns::gstate.ds;
 //Allocate the buffers in Alchemy.
 alcScreenBufferPointer=alcRCLib.initializeScreenBuffer(SCREEN_WIDTH,SCREEN_HEIGHT);//Setu p a screenbuffer of size x,y;
 //Copy the textures to alchemy memory.
 for (var i:int=0; i<11; i++) {
 var ba:ByteArray=texs[i].getPixels(texs[i].rect);
 alcTexPointer=alcRCLib.initializeTexBuffer(i);
 alchemyMemory.position=alcTexPointer;
 alchemyMemory.writeBytes(ba,0,ba.length);
 }//end of for
 }//end of function initAlchemy
 private function initRendering():void {
 stage.addEventListener(KeyboardEvent.KEY_DOWN,key_pressed);
 stage.addEventListener(KeyboardEvent.KEY_UP,key_released);
 addEventListener(Event.ENTER_FRAME,enterFrame);
 }//end of function initRendering
 private function enterFrame(event:Event):void {
 alcRCLib.loop(upKey,downKey,leftKey,rightKey);
 alchemyMemory.position=alcScreenBufferPointer;
 screenBitmapData.setPixels(screenBitmapData.rect,alchemyMemory);
 }//end of function enterFrame
 private function key_pressed(e:KeyboardEvent):void {
 switch (e.keyCode) {
 case Keyboard.UP :
 upKey=1;
 break;
 case Keyboard.DOWN :
 downKey=1;
 break;
 case Keyboard.LEFT :
 leftKey=1;
 break;
 case Keyboard.RIGHT :
 rightKey=1;
 break;
 }//end of switch
 }//end of function key_pressed
 private function key_released(e:KeyboardEvent):void {
 switch (e.keyCode) {
 case Keyboard.UP :
 upKey=0;
 break;
 case Keyboard.DOWN :
 downKey=0;
 break;
 case Keyboard.LEFT :
 leftKey=0;
 break;
 case Keyboard.RIGHT :
 rightKey=0;
 break;
 }//end of switch
 }//end of function key_released
 }//end of class
}//end of package
###raycaster####
//Raycasting Engine from Lode's Computer Graphics Tutorial
//http://www.student.kuleuven.be/~m0216922/CG/raycasting.html
//Modified for Alchemy by Bruce Jawn
//http://bruce-lab.blogspot.com
#include "AS3.h"
#include <math.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
//============================================================
//============================================================
enum bool {false=0,true=!false};
#define screenWidth 1640
#define screenHeight 1480
#define texWidth 64
#define texHeight 64
#define mapWidth 24
#define mapHeight 24
//1D Screen Buffer
int* tBuffer;
int resX = 0;
int resY = 0;
//2D Screen Buffer
int buffer[screenWidth][screenHeight];
//1D Zbuffer
double ZBuffer[screenWidth];
//============================================================
//============================================================
//textures
int texture[11][texWidth*texHeight];
#define numSprites 19
//arrays used to sort the sprites
int spriteOrder[numSprites];
double spriteDistance[numSprites];
struct SSprite
double x;
double y;
int texture;
struct SSprite sprite[numSprites]=
//green light in front of playerstart
{20.5, 11.5, 10},
//green lights in every room
{18.5,4.5, 10},
{10.0,4.5, 10},
{10.0,12.5,10},
{3.5, 6.5, 10},
{3.5, 20.5,10},
{3.5, 14.5,10},
{14.5,20.5,10},
//row of pillars in front of wall: fisheye test
{18.5, 10.5, 9},
{18.5, 11.5, 9},
{18.5, 12.5, 9},
//some barrels around the map
{21.5, 1.5, 8},
{15.5, 1.5, 8},
{16.0, 1.8, 8},
{16.2, 1.2, 8},
{3.5, 2.5, 8},
{9.5, 15.5, 8},
{10.0, 15.1,8},
{10.5, 15.8,8},
//============================================================
//============================================================
//map
int worldMap[mapWidth][mapHeight] =
{8,8,8,8,8,8,8,8,8,8,8,4,4,6,4,4,6,4,6,4,4,4,6,4},
{8,0,0,0,0,0,0,0,0,0,8,4,0,0,0,0,0,0,0,0,0,0,0,4},
{8,0,3,3,0,0,0,0,0,8,8,4,0,0,0,0,0,0,0,0,0,0,0,6},
{8,0,0,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,6},
{8,0,3,3,0,0,0,0,0,8,8,4,0,0,0,0,0,0,0,0,0,0,0,4},
{8,0,0,0,0,0,0,0,0,0,8,4,0,0,0,0,0,6,6,6,0,6,4,6},
{8,8,8,8,0,8,8,8,8,8,8,4,4,4,4,4,4,6,0,0,0,0,0,6},
{7,7,7,7,0,7,7,7,7,0,8,0,8,0,8,0,8,4,0,4,0,6,0,6},
{7,7,0,0,0,0,0,0,7,8,0,8,0,8,0,8,8,6,0,0,0,0,0,6},
{7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,8,6,0,0,0,0,0,4},
{7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,8,6,0,6,0,6,0,6},
{7,7,0,0,0,0,0,0,7,8,0,8,0,8,0,8,8,6,4,6,0,6,6,6},
{7,7,7,7,0,7,7,7,7,8,8,4,0,6,8,4,8,3,3,3,0,3,3,3},
{2,2,2,2,0,2,2,2,2,4,6,4,0,0,6,0,6,3,0,0,0,0,0,3},
{2,2,0,0,0,0,0,2,2,4,0,0,0,0,0,0,4,3,0,0,0,0,0,3},
{2,0,0,0,0,0,0,0,2,4,0,0,0,0,0,0,4,3,0,0,0,0,0,3},
{1,0,0,0,0,0,0,0,1,4,4,4,4,4,6,0,6,3,3,0,0,0,3,3},
{2,0,0,0,0,0,0,0,2,2,2,1,2,2,2,6,6,0,0,5,0,5,0,5},
{2,2,0,0,0,0,0,2,2,2,0,0,0,2,2,0,5,0,5,0,0,0,5,5},
{2,0,0,0,0,0,0,0,2,0,0,0,0,0,2,5,0,5,0,5,0,5,0,5},
{1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,5},
{2,0,0,0,0,0,0,0,2,0,0,0,0,0,2,5,0,5,0,5,0,5,0,5},
{2,2,0,0,0,0,0,2,2,2,0,0,0,2,2,0,5,0,5,0,0,0,5,5},
{2,2,2,2,1,2,2,2,2,2,2,1,2,2,2,5,5,5,5,5,5,5,5,5}
//============================================================
//============================================================
double posX = 22.0, posY = 11.5; //x and y start position
double dirX = -1.0, dirY = 0.0; //initial direction vector
double planeX = 0.0, planeY = 0.66; //the 2d raycaster version of camera plane
int K_LEFT=0;
int K_RIGHT=0;
int K_UP=0;
int K_DOWN=0;
//speed modifiers
double moveSpeed = .30; //the constant value is in squares/second
double rotSpeed = .20; //the constant value is in radians/second
//============================================================
//============================================================
AS3_Val initializeScreenBuffer(void* self, AS3_Val args)
 AS3_ArrayValue(args, "IntType, IntType", &resX, &resY);
 tBuffer = malloc( resX * resY * sizeof(int) );
 return AS3_Ptr( tBuffer );
}//end of initializeScreenBuffer
//used to load some textures & sprite textures
AS3_Val initializeTexBuffer(void* self, AS3_Val args)
 int index;
 AS3_ArrayValue(args, "IntType", &index);
 return AS3_Ptr( texture[index] );
}//end of initializeTexBuffer
//start the main loop
AS3_Val loop( void* self, AS3_Val args )
 AS3_ArrayValue(args,"IntType,IntType,IntType,IntType",&K_UP,&K_DOWN,&K_LEFT,&K_RIGHT);
 CastRay();
 int opos,j,i,jpos;
 for(j=0; j < resY; j++ ){
 jpos = resX*j;
 for(i=0; i < resX; i++ ){
 opos = (jpos+i);
 tBuffer[opos] = buffer[i][j];
 }//end of for
 }//end of for
 return 0;
}//end of loop
int main()
 AS3_Val initializeScreenBufferMethod = AS3_Function( NULL,initializeScreenBuffer );
 AS3_Val loopMethod = AS3_Function( NULL,loop );
 AS3_Val initializeTexBufferMethod = AS3_Function( NULL,initializeTexBuffer );
 AS3_Val result = AS3_Object("initializeScreenBuffer:AS3ValType,loop:AS3ValType,initializeTexBuffer:AS3ValT ype"
 ,initializeScreenBufferMethod,loopMethod,initializeTexBufferMethod);
 AS3_Release( initializeScreenBufferMethod );
 AS3_Release( loopMethod );
 AS3_Release( initializeTexBufferMethod );
 AS3_LibInit( result );
 return 0;
}//end of main
//================================================================
//================================================================
void CastRay()
 printf ("Hello World!\n");
 int x;
 int y;
 int w=screenWidth;
 int h=screenHeight;
 for( x = 0; x < screenWidth; x++) for( y = 0; y < screenHeight; y++) {buffer[x][y] = 0;} //clear the buffer instead of cls()
 for(x = 0; x < w; x++)
 //calculate ray position and direction
 double cameraX = 2 * x / (double)(w) - 1; //x-coordinate in camera space
 double rayPosX = posX;
 double rayPosY = posY;
 double rayDirX = dirX + planeX * cameraX;
 double rayDirY = dirY + planeY * cameraX;
 //which box of the map we're in
 int mapX = (int)(rayPosX);
 int mapY = (int)(rayPosY);
 //length of ray from current position to next x or y-side
 double sideDistX;
 double sideDistY;
 //length of ray from one x or y-side to next x or y-side
 double deltaDistX = sqrt(1 + (rayDirY * rayDirY) / (rayDirX * rayDirX));
 double deltaDistY = sqrt(1 + (rayDirX * rayDirX) / (rayDirY * rayDirY));
 double perpWallDist;
 //what direction to step in x or y-direction (either +1 or -1)
 int stepX;
 int stepY;
 int hit = 0; //was there a wall hit?
 int side; //was a NS or a EW wall hit?
 //calculate step and initial sideDist
 if (rayDirX < 0)
 stepX = -1;
 sideDistX = (rayPosX - mapX) * deltaDistX;
 }//end of if (rayDirX < 0)
 else
 stepX = 1;
 sideDistX = (mapX + 1.0 - rayPosX) * deltaDistX;
 }//end of else
 if (rayDirY < 0)
 stepY = -1;
 sideDistY = (rayPosY - mapY) * deltaDistY;
 }//end of if (rayDirY < 0)
 else
 stepY = 1;
 sideDistY = (mapY + 1.0 - rayPosY) * deltaDistY;
 }//end of else
 //perform DDA
 while (hit == 0)
 //jump to next map square, OR in x-direction, OR in y-direction
 if (sideDistX < sideDistY)
 sideDistX += deltaDistX;
 mapX += stepX;
 side = 0;
 }//end of if (sideDistX < sideDistY)
 else
 sideDistY += deltaDistY;
 mapY += stepY;
 side = 1;
 }//end of else
 //Check if ray has hit a wall
 if (worldMap[mapX][mapY] > 0) hit = 1;
 }//end of while (hit == 0)
 //Calculate distance of perpendicular ray (oblique distance will give fisheye effect!)
 if (side == 0) perpWallDist = fabs((mapX - rayPosX + (1 - stepX) / 2) / rayDirX);
 else perpWallDist = fabs((mapY - rayPosY + (1 - stepY) / 2) / rayDirY);
 //Calculate height of line to draw on screen
 int lineHeight = abs((int)(h / perpWallDist));
 //calculate lowest and highest pixel to fill in current stripe
 int drawStart = -lineHeight / 2 + h / 2;
 if(drawStart < 0) drawStart = 0;
 int drawEnd = lineHeight / 2 + h / 2;
 if(drawEnd >= h) drawEnd = h - 1;
 //texturing calculations
 int texNum = worldMap[mapX][mapY] - 1; //1 subtracted from it so that texture 0 can be used!
 //calculate value of wallX
 double wallX; //where exactly the wall was hit
 if (side == 1) wallX = rayPosX + ((mapY - rayPosY + (1 - stepY) / 2) / rayDirY) * rayDirX;
 else wallX = rayPosY + ((mapX - rayPosX + (1 - stepX) / 2) / rayDirX) * rayDirY;
 wallX -= floor((wallX));
 //x coordinate on the texture
 int texX = (int)(wallX * (double)(texWidth));
 if(side == 0 && rayDirX > 0) texX = texWidth - texX - 1;
 if(side == 1 && rayDirY < 0) texX = texWidth - texX - 1;
 int y;
 for(y = drawStart; y < drawEnd; y++)
 int d = y * 256 - h * 128 + lineHeight * 128; //256 and 128 factors to avoid floats
 int texY = ((d * texHeight) / lineHeight) / 256;
 int color = texture[texNum][texWidth * texY + texX];
 //make color darker for y-sides: R, G and B byte each divided through two with a "shift" and an "and"
 if(side == 1) color = (color >> 1) & 8355711;
 buffer[x][y] = color;
 }//end of for(y = drawStart; y < drawEnd; y++)
 //SET THE ZBUFFER FOR THE SPRITE CASTING
 ZBuffer[x] = perpWallDist; //perpendicular distance is used
 //FLOOR CASTING
 double floorXWall, floorYWall; //x, y position of the floor texel at the bottom of the wall
 //4 different wall directions possible
 if(side == 0 && rayDirX > 0)
 floorXWall = mapX;
 floorYWall = mapY + wallX;
 }//end of if(side == 0 && rayDirX > 0)
 else if(side == 0 && rayDirX < 0)
 floorXWall = mapX + 1.0;
 floorYWall = mapY + wallX;
 }//end of else if(side == 0 && rayDirX < 0)
 else if(side == 1 && rayDirY > 0)
 floorXWall = mapX + wallX;
 floorYWall = mapY;
 }//end of else if(side == 1 && rayDirY > 0)
 else
 floorXWall = mapX + wallX;
 floorYWall = mapY + 1.0;
 }//end of else
 double distWall, distPlayer, currentDist;
 distWall = perpWallDist;
 distPlayer = 0.0;
 if (drawEnd < 0) drawEnd = h; //becomes < 0 when the integer overflows
 //draw the floor from drawEnd to the bottom of the screen
 for(y = drawEnd + 1; y < h; y++)
 currentDist = h / (2.0 * y - h); //you could make a small lookup table for this instead
 double weight = (currentDist - distPlayer) / (distWall - distPlayer);
 double currentFloorX = weight * floorXWall + (1.0 - weight) * posX;
 double currentFloorY = weight * floorYWall + (1.0 - weight) * posY;
 int floorTexX, floorTexY;
 floorTexX = (int)(currentFloorX * texWidth) % texWidth;
 floorTexY = (int)(currentFloorY * texHeight) % texHeight;
 //floor
 buffer[x][y] = (texture[3][texWidth * floorTexY + floorTexX] >> 1) & 8355711;
 //ceiling (symmetrical!)
 buffer[x][h - y] = texture[6][texWidth * floorTexY + floorTexX];
 }//end of for(y = drawEnd + 1; y < h; y++)
 }//end of for(x = 0; x < w; x++)
 //SPRITE CASTING
 //sort sprites from far to close
 int i;
 for(i = 0; i < numSprites; i++)
 spriteOrder[i] = i;
 spriteDistance[i] = ((posX - sprite[i].x) * (posX - sprite[i].x) + (posY - sprite[i].y) * (posY - sprite[i].y)); //sqrt not taken, unneeded
 }//end of for(i = 0; i < numSprites; i++)
 combSort(spriteOrder, spriteDistance, numSprites);
 //after sorting the sprites, do the projection and draw them
 for(i = 0; i < numSprites; i++)
 //translate sprite position to relative to camera
 double spriteX = sprite[spriteOrder[i]].x - posX;
 double spriteY = sprite[spriteOrder[i]].y - posY;
 //transform sprite with the inverse camera matrix
 // [ planeX dirX ] -1 [ dirY -dirX ]
 // [ ] = 1/(planeX*dirY-dirX*planeY) * [ ]
 // [ planeY dirY ] [ -planeY planeX ]
 double invDet = 1.0 / (planeX * dirY - dirX * planeY); //required for correct matrix multiplication
 double transformX = invDet * (dirY * spriteX - dirX * spriteY);
 double transformY = invDet * (-planeY * spriteX + planeX * spriteY); //this is actually the depth inside the screen, that what Z is in 3D
 int spriteScreenX = (int)((w / 2) * (1 + transformX / transformY));
 //parameters for scaling and moving the sprites
 #define uDiv 1
 #define vDiv 1
 #define vMove 0.0
 int vMoveScreen = (int)(vMove / transformY);
 //calculate height of the sprite on screen
 int spriteHeight = abs((int)(h / (transformY))) / vDiv; //using "transformY" instead of the real distance prevents fisheye
 //calculate lowest and highest pixel to fill in current stripe
 int drawStartY = -spriteHeight / 2 + h / 2 + vMoveScreen;
 if(drawStartY < 0) drawStartY = 0;
 int drawEndY = spriteHeight / 2 + h / 2 + vMoveScreen;
 if(drawEndY >= h) drawEndY = h - 1;
 //calculate width of the sprite
 int spriteWidth = abs( (int) (h / (transformY))) / uDiv;
 int drawStartX = -spriteWidth / 2 + spriteScreenX;
 if(drawStartX < 0) drawStartX = 0;
 int drawEndX = spriteWidth / 2 + spriteScreenX;
 if(drawEndX >= w) drawEndX = w - 1;
 //loop through every vertical stripe of the sprite on screen
 int stripe;
 for(stripe = drawStartX; stripe < drawEndX; stripe++)
 int texX = (int)(256 * (stripe - (-spriteWidth / 2 + spriteScreenX)) * texWidth / spriteWidth) / 256;
 //the conditions in the if are:
 //1) it's in front of camera plane so you don't see things behind you
 //2) it's on the screen (left)
 //3) it's on the screen (right)
 //4) ZBuffer, with perpendicular distance
 int y;
 if(transformY > 0 && stripe > 0 && stripe < w && transformY < ZBuffer[stripe])
 for(y = drawStartY; y < drawEndY; y++) //for every pixel of the current stripe
 int d = (y-vMoveScreen) * 256 - h * 128 + spriteHeight * 128; //256 and 128 factors to avoid floats
 int texY = ((d * texHeight) / spriteHeight) / 256;
 unsigned int color = texture[sprite[spriteOrder[i]].texture][texWidth * texY + texX]; //get current color from the texture//??????????????????
 if((color & 0x00FFFFFF) != 0) buffer[stripe][y] = color; //paint pixel if it isn't black, black is the invisible color
 }//end of for(y = drawStartY; y < drawEndY; y++)
 }//end of for(stripe = drawStartX; stripe < drawEndX; stripe++)
 }//end of for(i = 0; i < numSprites; i++)
 //readKeys
 //move forward if no wall in front of you
 if (K_UP)
 if(worldMap[(int)(posX + dirX * moveSpeed)][(int)(posY)] == false) posX += dirX * moveSpeed;
 if(worldMap[(int)(posX)][(int)(posY + dirY * moveSpeed)] == false) posY += dirY * moveSpeed;
 }//end of if (K_UP)
 //move backwards if no wall behind you
 if (K_DOWN)
 if(worldMap[(int)(posX - dirX * moveSpeed)][(int)(posY)] == false) posX -= dirX * moveSpeed;
 if(worldMap[(int)(posX)][(int)(posY - dirY * moveSpeed)] == false) posY -= dirY * moveSpeed;
 }//end of if (K_DOWN)
 //rotate to the right
 if (K_RIGHT)
 //both camera direction and camera plane must be rotated
 double oldDirX = dirX;
 dirX = dirX * cos(-rotSpeed) - dirY * sin(-rotSpeed);
 dirY = oldDirX * sin(-rotSpeed) + dirY * cos(-rotSpeed);
 double oldPlaneX = planeX;
 planeX = planeX * cos(-rotSpeed) - planeY * sin(-rotSpeed);
 planeY = oldPlaneX * sin(-rotSpeed) + planeY * cos(-rotSpeed);
 }//end of if (K_RIGHT)
 //rotate to the left
 if (K_LEFT)
 //both camera direction and camera plane must be rotated
 double oldDirX = dirX;
 dirX = dirX * cos(rotSpeed) - dirY * sin(rotSpeed);
 dirY = oldDirX * sin(rotSpeed) + dirY * cos(rotSpeed);
 double oldPlaneX = planeX;
 planeX = planeX * cos(rotSpeed) - planeY * sin(rotSpeed);
 planeY = oldPlaneX * sin(rotSpeed) + planeY * cos(rotSpeed);
 }//end of if (K_LEFT)
}//end of CastRay
//sort algorithm
void combSort(int* order, double* dist, int amount)
int gap = amount;
enum bool swapped = false;
while(gap > 1 || swapped)
 //shrink factor 1.3
 gap = (gap * 10) / 13;
 if(gap == 9 || gap == 10) gap = 11;
 if (gap < 1) gap = 1;
 swapped = false;
 int i;
 for (i = 0; i < amount - gap; i++)
 int j = i + gap;
 if (dist[i] < dist[j])
 double disttemp=dist[i];
 dist[i]=dist[j];
 dist[j]=disttemp;
 int ordertemp=order[i];
 order[i]=order[j];
 order[j]=ordertemp;
 swapped = true;
 }//end of if (dist[i] < dist[j])
 }//end of for (i = 0; i < amount - gap; i++)
}//end of while(gap > 1 || swapped)
}//end of combSort
the sorce file can be found here http://bruce-lab.blogspot.com/2010/04/alchemy-ray-casting-engine-source-code.html

RadioactiveLizard, you need adobe alchemy (http://labs.adobe.com/technologies/alchemy/) to compile the C code to a swc,
not pass variables to C directly.

Region source (PL/SQL function body returning SQL query)

Hi, guys.
Here is what i try to do:
Create a region of type SQL Query (PL/SQL function body returning SQL query). In the source area i tried to put this:
DECLARE
v_new VARCHAR2(10);
v_SQL varchar2(32000);
BEGIN
v_new := :P102_HDN_NEW;
-- htp.p(v_new);
IF v_new = 'N-Set' THEN
v_SQL := 'select ' ||
ELSIF v_new = 'Y-Set' THEN
v_SQL := 'select ' ||
END IF;
RETURN v_SQL;
END;
And here is the reply from APEX:
1 error has occurred
Query cannot be parsed within the Builder. If you believe your query is syntactically correct, check the ''generic columns'' checkbox below the region source to proceed without parsing. The query can not be parsed, the cursor is not yet open or a function returning a SQL query returned without a value.
Now.
1. Variable is set with the right value.
2. Each statement (separately) returns SQL that works with no problems
3. Problem occures if i try to put IF statement around the SQL creation.
4. If i select "Use Generic Column Names (parse query at runtime only)" instead of "Use Query-Specific Column Names and Validate Query" then the script returns SQL properly, however report's column names are set to Col1, Col2,Col3 ......
Thnks in advence
Mike

OK. Here is enire statement:
DECLARE
v_new VARCHAR2(10);
v_SQL varchar2(32000);
BEGIN
v_new := :P102_HDN_NEW;
htp.p(v_new);
IF v_new = 'N-Set' THEN
v_SQL := 'select ' ||
'APEX_ITEM.DISPLAY_AND_SAVE(10,c.sdescr) descr, ' ||
'APEX_ITEM.DISPLAY_AND_SAVE(12,DECODE(ld.level,''All'', ''All Categories'',ld.level)) level, ' ||
'apex_item.checkbox(1, ld.opt_in_auto_flag, decode(ld.opt_in_auto_flag,NULL,''disabled'',''Y'',''checked'')) auto_in, ' ||
'apex_item.checkbox(2, ld.opt_in_manual_flag, decode(ld.opt_in_manual_flag,NULL,''disabled'',''Y'',''checked'')) manual_in, ' ||
'apex_item.checkbox(3, ld.opt_out_auto_flag, decode(ld.opt_out_auto_flag,NULL,''disabled'',''Y'',''checked'')) auto_out, ' ||
'apex_item.checkbox(4, ld.opt_out_manual_flag, decode(ld.opt_out_manual_flag,NULL,''disabled'',''Y'',''checked'')) manual_out, ' ||
'DECODE(c.code, ''NMBR'', NULL,''Change to '' || DECODE(ld.level,''All'',''Categories'',''All Categories'')) link_change, ' ||
'APEX_ITEM.DISPLAY_AND_SAVE(11,c.code) code ' ||
'from ' ||
'tbl1 c, ' ||
'tbl2 ld ' ||
'where c.code = ld.code ' ||
'and c.type = ''TYPE1'' ' ||
'and c.active = ''Y'' ' ||
'order by c.sorting ';
ELSIF v_new = 'Y-Set' THEN
v_SQL := 'select ' ||
'APEX_ITEM.DISPLAY_AND_SAVE(10,c.sdescr) descr, ' ||
'APEX_ITEM.DISPLAY_AND_SAVE(12,''All Categories'') level, ' ||
'apex_item.checkbox(1, c.option_1, decode(c.option_1,NULL,''disabled'',''Y'',''checked'')) auto_in, ' ||
'apex_item.checkbox(2, c.option_3, decode(c.option_3,NULL,''disabled'',''Y'',''checked'')) manual_in, ' ||
'apex_item.checkbox(3, c.option_2, decode(c.option_2,NULL,''disabled'',''Y'',''checked'')) auto_out, ' ||
'apex_item.checkbox(4, c.option_4, decode(c.option_4,NULL,''disabled'',''Y'',''checked'')) manual_out, ' ||
'DECODE(c.code, ''AAA'', NULL,''Options by AAA'') link_change, ' ||
'APEX_ITEM.DISPLAY_AND_SAVE(11,c.code) code ' ||
'from ' ||
'tbl1 c ' ||
'where 1 = 1 ' ||
'and c.type = ''TYPE1'' ' ||
'and c.active = ''Y'' ' ||
'order by c.sorting ';
END IF;
RETURN v_SQL;
END;
If i put just this
DECLARE
v_new VARCHAR2(10);
v_SQL varchar2(32000);
BEGIN
v_new := :P102_HDN_NEW;
htp.p(v_new);
v_SQL := 'select ' ||
'APEX_ITEM.DISPLAY_AND_SAVE(10,c.sdescr) descr, ' ||
'APEX_ITEM.DISPLAY_AND_SAVE(12,DECODE(ld.level,''All'', ''All Categories'',ld.level)) level, ' ||
'apex_item.checkbox(1, ld.opt_in_auto_flag, decode(ld.opt_in_auto_flag,NULL,''disabled'',''Y'',''checked'')) auto_in, ' ||
'apex_item.checkbox(2, ld.opt_in_manual_flag, decode(ld.opt_in_manual_flag,NULL,''disabled'',''Y'',''checked'')) manual_in, ' ||
'apex_item.checkbox(3, ld.opt_out_auto_flag, decode(ld.opt_out_auto_flag,NULL,''disabled'',''Y'',''checked'')) auto_out, ' ||
'apex_item.checkbox(4, ld.opt_out_manual_flag, decode(ld.opt_out_manual_flag,NULL,''disabled'',''Y'',''checked'')) manual_out, ' ||
'DECODE(c.code, ''NMBR'', NULL,''Change to '' || DECODE(ld.level,''All'',''Categories'',''All Categories'')) link_change, ' ||
'APEX_ITEM.DISPLAY_AND_SAVE(11,c.code) code ' ||
'from ' ||
'tbl1 c, ' ||
'tbl2 ld ' ||
'where c.code = ld.code ' ||
'and c.type = ''TYPE1'' ' ||
'and c.active = ''Y'' ' ||
'order by c.sorting ';
RETURN v_SQL;
END;
it works fune...

Pass substitution variable to a region source

Similar Messages

Maybe you are looking for