Dynamic Move statement

DATA: t184 LIKE TABLE OF t184 WITH HEADER LINE.
DATA: BEGIN OF pstyd OCCURS 0,
pstyd TYPE pstyd,
END OF pstyd.
LOOP AT t184.
pstyd-pstyd = t184-psty1. APPEND pstyd.
pstyd-pstyd = t184-psty2. APPEND pstyd.
pstyd-pstyd = t184-psty3. APPEND pstyd.
pstyd-pstyd = t184-psty4. APPEND pstyd.
pstyd-pstyd = t184-psty5. APPEND pstyd.
pstyd-pstyd = t184-psty6. APPEND pstyd.
pstyd-pstyd = t184-psty7. APPEND pstyd.
pstyd-pstyd = t184-psty8. APPEND pstyd.
pstyd-pstyd = t184-psty9. APPEND pstyd.
pstyd-pstyd = t184-psty10. APPEND pstyd.
pstyd-pstyd = t184-psty11. APPEND pstyd.
pstyd-pstyd = t184-pstyv. APPEND pstyd.
ENDLOOP.
How can I shorten the code. Somthing to this effect:
DATA name TYPE string.
FIELD-SYMBOLS <char> LIKE pstyd-pstyd.
LOOP AT t184.
DO 12 TIMES.
    name = sy-index.
    IF name = '12'. name = ''. ENDIF.
    CONCATENATE 't184-pstyv' name INTO name.
    ASSIGN (name) TO <char>.
    Write <char> to pstyd-pstyd.
    APPEND pstyd.
ENDDO.
ENDLOOP.
The above code is, of course, not working. I have posted it just to give an idea of what I want.

Hi Flora,
1. Such kind of problems are known as REPEAT STRUCTURE.
   To achieve such looping thru REPEAT STRUCTURE
   there is a abap statment
   VARYING
   which will achieve such thing.
JUST NOTE HOW VARYING STATEMENT WORKS BELOW:
IT CAN BE USED FOR OTHER REPEAT STRCUTURES ALSO.
2. Please see the code below :
   Just paste and check.
REPORT abc.
DATA: t184 LIKE TABLE OF t184 WITH HEADER LINE.
DATA: BEGIN OF pstyd OCCURS 0,
pstyd TYPE pstyd,
END OF pstyd.
Start-Of-Selection
START-OF-SELECTION.
BREAK-POINT.
SELECT * FROM t184 INTO TABLE t184
WHERE mtpos = 'NORM'
AND auart = 'AG'.
Loop and Fetch [IMPORTANT IMPORTANT]
LOOP AT t184.
    CLEAR pstyd.
    DO 11 TIMES
      VARYING pstyd-pstyd FROM t184-psty1 NEXT t184-psty2.
      APPEND pstyd.
    ENDDO.
    pstyd-pstyd = t184-pstyv.
    APPEND pstyd.
ENDLOOP.
Done
BREAK-POINT.
HOPE THE ABOVE HELPS.
Regards,
Amit M.

Similar Messages

Dynamic IF statement in PL/SQL on-insert trigger in Forms 6.0

I would like to build a dynamic IF statement for the on-insert trigger in a form... Users are restricted to which "projects" they are allowed to enter into the database. These restrictions are based on a security table. The same restrictions are used to build the dynamic where clause that limits which previously inserted records the users can see when they are in the form. Since the restrictions are identical, I want to use the same logic that I use to build a where clause to build a dynamic If statement instead... If the statement is true, the user can insert the record. If its false, they can't.
I'm trying to this as follows:
declare
big_if varchar2(10000) :=' ';
begin
if :global.admin='YES'
then
insert_record;
else
declare
cursor cur1 is
select paren1, field, comparison_operator, value, paren2, and_or
from rcdb.user_project_assign2
where user_id = user;
c1_rec cur1%ROWTYPE;
begin
for c1_rec in cur1 loop
big_if:= big_if | | c1_rec.paren1 | | ':tbl_main_data.' | |c1_rec.field | |c1_rec.comparison_operator | | '''' | | c1_rec.value | | '''' | | c1_rec.paren2 | | ' '| | c1_rec.and_or | | ' ';
end loop;
end;
if big_if
then
insert_record;
else message('You are not allowed to insert this record');
end if;
end if;
end;
The problem is in the line
IF big_if
big_if is the variable that holds the text to my if statement (hense dynamic If statement) but I can't get the code to allow me to use that variable.
Can anyone do this?
null

That code was great, but forms isn't allowing me to use the dbms_sql so I have to make a procedure out of forms and call it from the form. Both my form code and the procedure are compiling, but I"m still getting an error when the result is coming back to the form...
the code in the form is:
declare
big_if varchar2(10000) :=' ';
result varchar2(5) :=' ';
check_state varchar2(2):=:tbl_main_data.state_abr;
check_region varchar2(3):=:tbl_main_data.region_abr;
check_program varchar2(25):=:tbl_main_data.program;
begin
if :global.admin='YES'
then
insert_record;
else
declare
cursor cur1 is
select paren1, field, comparison_operator, value, paren2, and_or
from rcdb.user_project_assign2
where user_id = user;
c1_rec cur1%ROWTYPE;
begin
for c1_rec in cur1 loop
big_if:= big_if | | c1_rec.paren1;
if c1_rec.field = 'state_abr' then
big_if:=big_if | | 'check_state' | |c1_rec.comparison_operator | | '''' | | c1_rec.value | | '''' | | c1_rec.paren2 | | ' '| | c1_rec.and_or | | ' ';
elsif c1_rec.field = 'region_abr' then
big_if:=big_if | | 'check_region' | |c1_rec.comparison_operator | | '''' | | c1_rec.value | | '''' | | c1_rec.paren2 | | ' '| | c1_rec.and_or | | ' ';
elsif c1_rec.field = 'program' then
big_if:=big_if | | 'check_program' | |c1_rec.comparison_operator | | '''' | | c1_rec.value | | '''' | | c1_rec.paren2 | | ' '| | c1_rec.and_or | | ' ';
end if;
end loop;
end;
message(big_if); pause;
message(check_state); pause;
message(check_region); pause;
message(check_program); pause;
rcdb.check_if(big_if,result,check_state,check_region,check_program);
message('resulte = | |result| |');
if result = 'TRUE' then insert_record;
else
message ('you cant enter');
end if;
end if;
end;
AND THE CODE IN THE PROCEDURE IS....
create or replace procedure check_if (
big_if in varchar2,
result out varchar2,
check_state in varchar2,
check_region in varchar2,
check_program in varchar2
IS
v_indx binary_integer := 0;
v_sql_syntax varchar2(32767);
root_cursor number;
ignore integer;
your_if_statement VARCHAR2(32767);
v_check VARCHAR2(5);
BEGIN
your_if_statement := ' if '| |big_if| |' then :v_check := ''TRUE''; end if;';
v_sql_syntax := 'begin '| |your_if_statement| |' end;';
root_cursor := dbms_sql.open_cursor;
v_sql_syntax := replace(replace(REPLACE(v_sql_syntax,chr(10),' '),chr(13),' '),chr(9),' ');
dbms_sql.parse(root_cursor,v_sql_syntax,dbms_sql.v7);
dbms_sql.bind_variable( root_cursor, ':v_check',v_check,5);
ignore := dbms_sql.execute(root_cursor);
dbms_sql.variable_value(root_cursor, ':v_check', v_check);
if v_check = 'TRUE' then result:='TRUE';
else
result:='FALSE';
end if;
dbms_sql.close_cursor(root_cursor);
END check_if;
DO YOU KNOW WHATS WRONG?

PROBLEM IN MOVE STATEMENT IN ECC 6.0

hi EXPERTS,
THE FOLLOWING CODE WORKS FINE IN 4.6C BUT IN ECC 6.0 THE MOVE STATEMENT AT THE END THROWS ERROR.
""INNNN" and "I0008" are not mutually convertible. In Unicode systems, "INNNN" must have the same structure layout (fragment view) as"I0008", regardless of the length of the Unicode character."
DATA: i0001 LIKE p0001 OCCURS 0 WITH HEADER LINE,
      i0008 LIKE p0008 ,
      innnn like PRELP.
SELECT * INTO CORRESPONDING FIELDS OF TABLE i0001
      FROM pa0001
      WHERE begda <= 20061201
      AND endda >= 20061201
      AND pernr = 00014442 .
READ TABLE i0001 INDEX 1.
      i0008-trfgr = i0001-persk.
      CASE i0001-persg.
        WHEN '4'.
          i0008-trfst = i0001-persg.
        WHEN '7'.
          i0008-trfst = i0001-persg.
        WHEN '8'.
          i0008-trfst = i0001-persg.
        WHEN OTHERS.
          i0008-trfst = '1' .
      ENDCASE.
      MOVE i0008 TO innnn.
I'VE ALSO CHECKED THE SAME PROGRAM IN DEBUGGER IN 4.6C.
I'VE FOUND THAT THE VALUES FOR i0008-trfgr i0008-trfst ARE TOGETHER STORED IN THE FIELD DATA1 OF INNNN. BUT THIS DOES NOT HAPPEN IN ECC 6.0.
PLEASE HELP.
ITS URGENT.

Hi priya,
DATA: i0001 LIKE p0001 OCCURS 0 WITH HEADER LINE,
i0008 LIKE p0008 ,
declare innnn like this and check
innnn like p008.
regards,
Nagaraj

About move statement in abap.

move-corresponding is only for structure or also for internal table?
if you know please some details.

Hi,
To move values between the components of structures, use the statement
MOVE-CORRESPONDING <struct1> TO <struct2>.
This statement moves the contents of the components of structure <struct1> to the components of <struct2> that have identical names.
When it is executed, it is broken down into a set of MOVE statements, one for each pair of fields with identical names, as follows:
MOVE STRUCT1-<ci> TO STRUCT2-<c i>.
Regards
Sudheer

Dynamic SELECT statement causing CX_SY_DYNAMIC_OSQL_SEMANTICS error.

Hello Gurus,
We have a dynamic SELECT statement in our BW Update Rules where the the Selection Fields are populated at run-time and so are the look-up target and also the WHERE clause. The code basically looks like below:
          SELECT (lt_select_flds)
            FROM (lf_tab_name)
            INTO CORRESPONDING FIELDS OF TABLE <lt_data_tab>
            FOR ALL ENTRIES IN <lt_source_data>
            WHERE (lf_where).
In this instance, we are selecting 5 fields from Customer Master Data and the WHERE condition for this instance of the run is as below:
WHERE: DIVISION = <lt_source_data>-DIVISION AND DISTR_CHAN = <lt_source_data>-DISTR_CHAN AND SALESORG = <lt_source_data>-SALESORG AND CUST_SALES = <lt_source_data>-SOLD_TO AND OBJVERS = 'A'
This code was working fine till yesterday when we encountered serious performance problems and the Basis team had to do some changes at the DB level [Oracle]. Ever since, when we execute our data load, we get the CX_SY_DYNAMIC_OSQL_SEMANTICS.
Is setting changes at the Oracle level cause issues with how the data is being read at the DB. If yes, can you suggest what can we do to this code to get is working correctly [in case Basis can't revert back their changes]?
Would appreciate any help we can get here.

You don't understand - this error comes up when we run specific BEx queries. It was working yesterday, but today it is not. Our support package did not change from yesterday. We did not apply any OSSnotes.
We are however doing pre-prepare on our Prod system.
The temporary table is used to store SIDs for use in the join. the table exists in the dictionary, but not at an Oracle level.

DYnamic select statement in JDBC adapter?

Hi guys,
Is it possible so send dynamic select statement in jdbc adapter?
XIer

Aamir,
The poster did not specify whether this was sender or receiver channel, but it would only make sense that a "dynamic query" must be on the receiver communication channel since if it was on the sender channel, the channel would have to intelligently determine how to do dynamic queries.
Also, the poster asked if there was a way to "send a dynamic query" to the channel. This seems to imply that the channel is receiving information from somewhere to determine the query, which could only mean it is a receiver channel.
If you would like more information on the JDBC sender communication channel, please open a new thread.

Dynamic UPDATE statement with parameters for column names.

Hello,
On this* website I read "The SQL string can contain placeholders for bind arguments, but bind values cannot be used to pass in the names of schema objects (table or column names). You may pass in numeric, date, and string expressions, but not a BOOLEAN or NULL literal value"
On the other hand, in this Re: execute immediate with dynamic column name update and many other
posts people use EXECUTE IMMEDIATE to create a dynamic UPDATE statement.
dynSQL:='UPDATE CO_STAT2 CO SET CO.'||P_ENT_B_G_NAME||' = '||P_ENT_E_G_WE||'
WHERE ST IN
(SELECT ST FROM STG_CO_STAT2_TEST CO WHERE
'||P_ST||' = CO.ST AND
CO.'||P_ENT_E_G_NAME||' > '||P_ENT_E_G_WE||' AND
CO.'||P_ENT_B_G_NAME||' < '||P_ENT_E_G_WE||');';
EXECUTE IMMEDIATE dynSQL ;
Since this statement is part of a Stored Procedure, I wont see the exact error but just get a ORA-06512.
The compiling works fine and I use Oracle 11g.
http://psoug.org/definition/EXECUTE_IMMEDIATE.htm

OK I extracted from all of your posts so far that I have to use "bind-variables with :"
From all the other tuorials and forums posts, I assume using the pipe is correct so I added those as well into the script:
set serveroutput on format wraped;
DECLARE
dynSQL VARCHAR2(5000);
P_ENT_E_G_NAME VARCHAR2 (100) :='test1'; P_ENT_E_G_WE VARCHAR2 (100) :='01.02.2012'; P_ENT_B_G_NAME VARCHAR2 (100) :='01.01.2012';
P_ST                VARCHAR2 (100) :='32132';
BEGIN
dynSQL:= 'UPDATE CO_STAT2 CO SET CO.'||:P_ENT_B_G_NAME||' = '||:P_ENT_E_G_WE||'
              WHERE ST IN (SELECT ST FROM STG_CO_STAT2_TEST CO WHERE
              '||:P_ST||'                           = CO.ST                  AND
              CO.'||:P_ENT_E_G_NAME||'     > '||:P_ENT_E_G_WE||' AND
              CO.'||:P_ENT_B_G_NAME||'
< '||:P_ENT_E_G_WE||')';
--this is somehow missing after the last < '||:P_ENT_E_G_WE||')';
dbms_output.enable;
dbms_output.put(dynSQL);
--EXECUTE IMMEDIATE dynSQL;
END;Problem:I think I figured it out, the dates that I parse into the query need additional '

MOVE statement

Hi all,
I added one more extra word to move statement and it is not cming in the final report .
when i put it in the second line it is giving error like two lines not permitted.
I am using this in a Report where page width is fixed..
Thanks in advance..
Regards
Rao

Hi PT Rao,
Try in this way...
DATA : a(9) type c, b(80) type C. " 80 is the length for b (ur string which u want to move)
a = w_faxtn-fax_line+0(9).
b = 'A fronte delle fatture sotto elencate, abbiamo provvveduto a (f22) bonificarVi' TO b.
concatenate a b into w_faxtn-fax_line.
APPEND w_faxtn.
CLEAR w_faxtn.
Hope it will solve ur problem
<b>Reward points if useful</b>
Thanks & Regards
ilesh 24x7

Dynamic TSQL Statement with Dynamic Parameters

I'm trying to utilize a dynamic TSQL Statement where I can have various parameters passed of differing kinds, e.g. In some cases parameter 1 would be an int, other cases it may be a datetime, or varchar, etc.
I'm going to keep a table of with certain key SQL Statements, and then parameters in another column so this can be resusable.
Here is my code:
Case 1
Declare @FromDate as DATE='2013-10-01'
Declare @ToDate as DATE='2013-10-31'
Declare @FamilyMember as nvarchar(2)='20'
DECLARE @retval int
DECLARE @sSQL nvarchar(500);
DECLARE @ParmDefinition nvarchar(500);
DECLARE @tablename nvarchar(50)
--Select Convert(nvarchar(15), @FromDate,126)
SELECT @sSQL = N'select count(distinct id) as AggregateCount from [Table] where familyMember = @FamilyMember
and DateStamp between @FromDate and @ToDate';
SET @ParmDefinition = N'@retvalOUT int OUTPUT';
EXEC sp_executesql @sSQL, @ParmDefinition, @retvalOUT=@retval OUTPUT;
Case 2
Declare @FromDate as DATE='2013-10-01'
Declare @ToDate as DATE='2013-10-31'
Declare @Id as int=3510021
DECLARE @retval int
DECLARE @sSQL nvarchar(500);
DECLARE @ParmDefinition nvarchar(500);
DECLARE @tablename nvarchar(50)
--Select Convert(nvarchar(15), @FromDate,126)
SELECT @sSQL = N'select count(distinct id) as AggregateCount from [Table] where Id=@Id
and DateStamp between @FromDate and @ToDate';
SET @ParmDefinition = N'@retvalOUT int OUTPUT';
EXEC sp_executesql @sSQL, @ParmDefinition, @retvalOUT=@retval OUTPUT;
John

The following is an example I found, but I am receiving a Message "Must declare the scalar variable @StudentNumber"
Alter Procedure [dbo].[spInsertStudentDoc2]
@StudentNumber integer
AS
Begin
DECLARE @P_StudentNumber integer
DECLARE @ParameterList nvarchar(max)
DECLARE @SQLSnippit as nvarchar(max)
SET @ParameterList = N'@P_StudentNumber integer'
SET @SQLSnippit = N'Select Count(*) from dbo.student where patid=@StudentNumber'
PRINT @SqlSnippit -- debug & test
Exec SP_EXECUTESQL @SqlSnippit, @ParameterList, @P_StudentNumber=@StudentNumber
End
John

Getting result of dynamic select statement into variable

I have a function that builds a dynamic sql statement. I then want to take the result of that statement and insert it into a variable. I have tried this
execute immediate strSQL USING OUT intCounter;but that is giving me an error on that line of code. The SQL is a select count(*) and works fine. It is just how to get it into the variable that is tripping me up.
Thanks,
Eva

Sure. Version 11g. The complete procedure reads as follows:
CREATE OR REPLACE FUNCTION VALIDATIONQUESTIONRESULT
    p_ShortName VARCHAR2,
    p_SiteID    VARCHAR2
RETURN NUMBER IS
    strSQL VARCHAR2(5000);
    strTableName VARCHAR2(200);
    strPatIDFieldName VARCHAR2(200);
    intCounter NUMBER;
BEGIN
    select VALIDATIONSQL into strSQL from vwvalidationquestions where upper(shortname) = upper(p_ShortName);
    select
            case UPPER(DBTABLENAME)
                when 'CPTICODES' then 'CPTIPATID'
                when 'CPTIICODES' then 'CPTIIPATID'
                when 'DEMOGRAPHICS' then 'PATID'
                when 'FAMILYHISTORY' then 'FHPATID'
                when 'GCODES' then 'GCODEPATID'
                when 'HOSPITALIZATION' then 'HPATID'
                when 'MEDICALHISTORY' then 'MHPATID'
                when 'MEDICATIONS' then 'MPATID'
                when 'PROCEDURES' then 'PPATID'
                when 'VISITS' then 'VPATID' end into strPatIDFieldName
    from DATASPECIFICATIONS where UPPER(SHORTNAME) = UPPER(p_ShortName);
    strSQL := strSQL||' and '||strPatIDFieldName||' in (select PATID from DEMOGRAPHICS where PARTICID = '||p_SiteID||');';
    execute immediate strSQL into intCounter;
    return intCounter;
END VALIDATIONQUESTIONRESULT; strSQL when checked builds perfectly. I get 100% what I expect from it. An example of what I am getting from strSQL is:
select count(*) from Procedures where TO_CHAR(ProcdDt, 'MM') = TO_CHAR(ADD_MONTHS(SYSDATE, -1), 'MM') and TO_CHAR(ProcdDt, 'YYYY') = TO_CHAR(ADD_MONTHS(SYSDATE, -12), 'YYYY') and PPATID in (select PATID from DEMOGRAPHICS where PARTICID = 12);I am getting the number I would expect from this. I just need to put that number into intCounter. I tried altering strSQL so it looked like this:
select count(*) into intCounter from Procedures where TO_CHAR(ProcdDt, 'MM') = TO_CHAR(ADD_MONTHS(SYSDATE, -1), 'MM') and TO_CHAR(ProcdDt, 'YYYY') = TO_CHAR(ADD_MONTHS(SYSDATE, -12), 'YYYY') and PPATID in (select PATID from DEMOGRAPHICS where PARTICID = 12);but that gave me an error on the execute immediate line as well.
Sorry, I thought it would be simple so that was why I only put that bit of info. I guess it is more complicated than it at first appeared!
Eva

Help With SUBSTR in dynamic SQL statement

Following is the dynamic SQL statement.
EXECUTE IMMEDIATE 'UPDATE table_name pml
SET pml.'|| con_fields.field ||' = SUBSTR(pml.'||con_fields.field||' ||'' ''||
(SELECT pml1.'||con_fields.field||'
FROM table_name pml1
WHERE pml1.grp_id = '||los_concats.grp_id ||'
AND pml1.row_id = '||los_concats.row_id||'
AND pml1.loser_flg = ''Y''),1, '||con_fields.max_length||')
WHERE pml.grp_id = '||los_concats.grp_id ||'
AND pml.loser_flg IS NULL ';
what it does is that it updates a particular field. This field is concatenated by a field of a similar record.
My problem is with SUBSTR function. Since I am concatenating fields I do not want the field to be updated greater than max_length on that field, the reason why I use SUBSTR. the select query inside SUBSTR works alright with one of the AND condition in a WHERE clause not present. When I add that additional condition it gives me this error.
ORA-00907: missing right parenthesis.
Is there any way to get around this problem. Does SQL has other than SUBSTR function which can limit the character length.
Appreciate it.

The other alternative I thought about was to do this first
EXECUTE IMMEDIATE 'SELECT pml.'||con_fields.field||'
FROM table_name pml
WHERE pml.grp_id = '||los_concats.grp_id||'
AND pml.row_id = '||los_concats.row_id||'
AND pml.loser_flg = ''Y''
' INTO v_concat_field;
write into the variable v_concat_field and then use it into the previous script.
But on this I get SQL Command not properly terminated, I don't get it Why?
Donald I tried with your suggested script. It works fine with one of the conditions eliminated. I don't understand what the error trying to say?
Thanks

Preparing Dynamic SQL statement for inserting in Pro*C

Hi Friends,
From quite some time i am struggling writing Dynamic SQL statement for dynamic insert and update in Pro*C.
Can somebody go through my code and suggest me the rigth way of doing.
Right now it throws an error saying " Error while updating ORA-00904: invalid column name "
Please help me.
Girish.
int main()
EXEC SQL BEGIN DECLARE SECTION;
char *uid ="scott/tiger";
static char sqlstmt[129];
struct /* DEPT record */
int dept_num;
char dept_name[15];
char location[14];
} dept_rec;
EXEC SQL END DECLARE SECTION;
EXEC SQL WHENEVER SQLERROR DO sql_error();
EXEC SQL CONNECT :uid;
dept_rec.dept_num = 50;
strcpy(dept_rec.dept_name,"ADMIN");
strcpy(dept_rec.location,"IN");
strcpy(sqlstmt,"UPDATE dept set DNAME = dept_rec.dept_name where DEPTNO = dept_rec.dept_num");
EXEC SQL EXECUTE IMMEDIATE:sqlstmt;
EXEC SQL COMMIT;
exit(0);
void sql_error()
printf("\nError while updating %s",sqlca.sqlerrm.sqlerrmc);
EXEC SQL ROLLBACK;
}

A bit rusty here but this is how I see it.
Think of it this way ..
all Oracle is going to see is:
UPDATE dept set DNAME = dept_rec.dept_name where DEPTNO = dept_rec.dept_num
Its NOT going to know what dept_rec.dept_name is or dept_rec.dept_num is ..
it doesnt go back and fill in those values.
You need something like
strcpy(sqlstmt,"UPDATE dept set DNAME = \"");
strcat(sqlstmt,dept_rec.dept_name);
strcat(sqlstmt,"\" where DEPTNO = ");
strcat(sqlstmt,dept_rec.dept_num);
printf(sqlsmt); # Just to be sure the update statement look right during testing.

How can I execute Dynamic SQL statement in Forms?

Hi All,
I have to execute dynamic SQL statement from Forms
Below statement I have to execute
"EXECUTE IMMEDIATE v_stmt INTO v_return;".
Googled for the same got results saying, Better use Database function or procedures to execute these Dynamic Statements but We want to execute in forms only.
Can any one help me..
Thanks,
Madhu

So in short you are trading code obfuscation for maintainability and the ability to share code between tools? If from somewhere else you need a procedure already implemented in database PL/SQL (and now ported to forms) this would mean you'd need to implement it in every other tool. In times where you might want to integrate your forms with $other_technology and putting stuff on the database is the first step to share functionality you just go the opposite way? And all that because someone is afraid that somebody might steal your source code? I am sorry to be blunt, but this is just plain stupid.
Leaving aside that some things like Analytic Functions, Bulk processing or execute immediate are not even available in forms your software consists of how many LOC? How long does it take to bring a new developer up to speed with your source code? Imagine how long that would take for a developer who doesn't have coleagues who know their way around.
And just so you know: I work for a ISV selling a closed-source product as well. We have 200+ customers all over the planet. We are well aware that wrapped packages can be reverse engineered. The premise is: stored procedures can be reused in every tool we have, if it makes sense to put stuff on the database by all means do it. If someone would want to reverse engineer our software I'd wish him good luck as some parts are implemented in such a hilarious complicated way I have troubles understanding them (and quite frankly I refuse to understand certain parts, but that's another story). I do work for almost 10 years for that ISV.
In any case the possible solutions have already been mentioned: you have exec_sql, create_group_from_query and forms_ddl to execute dynamic SQL in forms whereas forms_ddl is a one way street and most certainly not the thing you need or want. Take a look at the documentation for the other 2 things.
cheers

Creating a Dynamic Update Statement based on Select

hi,
i'm trying to create a dynamic update statement based on select statement
my requirment is to query a joint tables and get the results then based on the results i need to copy all the data and create an update statement for each row
for ex
the update statement should look like this
update iadvyy set SO_SWEEP_CNT = '1' where inst_no = '003' and memb_cust_no = 'aaaaaaaaaaaaaaaa';
and the select statement like the following
select substr(key_1,11,9) account_no,sord_mast SO_SWEEP_CNT from
select acct_no,count(*) sord_mast from
(select from_acct_no acct_no,update_mast
from sord where FROM_SYS in ('DEP','INV') and TERM_DATE > 40460
union all
select to_acct_no acct_no,update_mast
from sord where TO_SYS in ('DEP','INV') and TERM_DATE > 40460)
group by Acct_no)
right outer join
invm
on
key_1 = '003'||acct_no
where sord_mast > 0;
so taking the above two columns from the above select statement and substitue the values as separate update statement.
is that doable , please share your knowledge with me if poosible
thanks in advanced

is that doable , please share your knowledge with me if poosibleyes
The standard advice when (ab)using EXECUTE IMMEDIATE is to compose the SQL statement in a single VARCHAR2 variable
Then print the SQL before passing it to EXECUTE IMMEDIATE.
COPY the statement & PASTE into sqlplus to validate its correctness.

Change "MOVE-CORRESPONDING" statement to MOVE statement in FM

Hello Guys,
I have created a datasource based on FM standard template RSAX_BIW_GET_DATA. In the source code in this template, there is a LOOP statement and below that there is a "MOVE-CORRESPONDING" statement.
LOOP AT g_t_select INTO l_s_select WHERE fieldnm = 'PGMID'.
MOVE-CORRESPONDING l_s_select TO l_r_pgmid.
APPEND l_r_pgmid.
ENDLOOP.
My customer does not allow MOVE-CORRESPONDING statement for performance reasons. Hence I need to change it to MOVE statement. But I do not know the structure of l_s_select and I am not well at ABAP. So How do I write MOVE statement here.
Can anybody help on this?
Regards
Utpal

Hi Tibollo,
Thanks for your prompt reply. Your suggestion has solved my problem. One input to this from my side. It will not accept FIELDNM because it is not present in l_r_pgmid. Remind you l_r_pgmid is declard as a range and ranges does not have FIELDNM.
Anyway, that portion I have modified and it worked. Thanks a lot. I am rewarding u points.
Regards
Utpal

Dynamic Move statement

Similar Messages

Maybe you are looking for