I am getting PLS-00410 error - duplicate fields in RECORD, TABLE or argumen
Here is what I am doing. I have a package header and a package body. The package header compiles successfully and the above error is displayed while compiling the package body only.
Package Header :
create or replace package pkg_pms_print is
type c_ref_printer_list is REF CURSOR;
PROCEDURE sp_get_printerlist
p_team_id IN NUMBER,
printer_list_refcur OUT pkg_pms_print.c_ref_printer_list
end pkg_pms_print;
Package Body:
create or replace package body pkg_pms_print is
PROCEDURE sp_get_printerlist (
p_team_id IN NUMBER,
printer_list_refcur OUT pkg_pms_print.c_ref_printer_list
IS
printer_list_refcur pkg_pms_print.c_ref_printer_list;
v_printer_id pms_test_team_printer.printer_id%TYPE;
v_printer_name pms_test_team_printer.printer_name%TYPE;
v_default_printer pms_test_team_printer.default_printer%TYPE;
BEGIN
OPEN printer_list_refcur FOR SELECT printer_id, printer_name,default_printer FROM pms_test_team_printer WHERE team_id = p_team_id;
--DBMS_OUTPUT.PUT_LINE('EMPNO ENAME');
DBMS_OUTPUT.PUT_LINE('--- -------');
LOOP
FETCH printer_list_refcur INTO v_printer_id, v_printer_name,v_default_printer;
EXIT WHEN printer_list_refcur%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(v_printer_id || '|'|| v_printer_name ||'|'|| v_default_printer);
END LOOP;
CLOSE printer_list_refcur;
END sp_get_printerlist;
END pkg_pms_print;
Apart from this error one error also shown as " PL/SQL: Item Ignored"
The compile points to the 3rd line in the package body for errors with the above mentioned error. There is no duplicate field name or argument name as the oracle error message says. It's a simple straight forward code. Can somebody help me if I am overlooking something?
Regards,
AgrawalV
this problem is solved but i am not getting output when i have tested this procedure in test window.
Program Continues upto 2nd DBMS call, means i am getting output upto 2nd DBMS call.
create or replace package body pkg_pms_print is
PROCEDURE sp_get_printerlist (
p_team_id IN NUMBER,
printer_list_refcur OUT pkg_pms_print.c_ref_printer_list
IS
-- printer_list_refcur pkg_pms_print.c_ref_printer_list;
v_printer_id pms_test_team_printer.printer_id%TYPE;
v_printer_name pms_test_team_printer.printer_name%TYPE;
v_default_printer pms_test_team_printer.default_printer%TYPE;
BEGIN
OPEN printer_list_refcur FOR SELECT printer_id, printer_name,default_printer FROM pms_test_team_printer WHERE team_id = p_team_id;
DBMS_OUTPUT.PUT_LINE('Printer ID Printer Name Default Printer');
DBMS_OUTPUT.PUT_LINE('----- ------- ------- ');
LOOP
FETCH printer_list_refcur INTO v_printer_id, v_printer_name,v_default_printer;
EXIT WHEN printer_list_refcur%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(v_printer_id || v_printer_name || v_default_printer);
END LOOP;
CLOSE printer_list_refcur;
END sp_get_printerlist;
END pkg_pms_print;
Similar Messages
-
Hi There,
In SAP GRC 10.0, our team had an issue where we could not add duplicate fields from separate table (see ERROR: Select Currency/UoM field for the selected analyzed fields). This was resolved by the SAP Note 1904313/ 1904314 (http://service.sap.com/sap/support/notes/1904313).
We upgraded our system to SAP GRC 10.1 SP05 and could now add the duplicate fields from separate tables. SAP Note 1904313/ 1904314 was part of SAP GRC 10.1 SP03 so it makes sense that we, in a higher version (SP05), would be able to do this.
The issue now is when we add the duplicate fields from different tables and run the Ad-hoc Query to test if the data source works correctly, the No Data Selected warning persists. This means that the data source provides no data for analysis, which is required to write our business rules.
Below is an example:
Basic data source with just one currency reference field EBAN-WAERS.
When you run the Ad-Hoc Query you receive data.
Basic data source with second currency reference field EKKO-WAERS.
When you run the Ad-Hoc Query no data is found.
Please also make reference to the following thread logged by my colleague (ERROR: Select Currency/UoM field for the selected analyzed fields)
Any assistance to receive data with duplicate fields from separate tables will be highly appreciated.
Thanking you in advance.
Regards
Gary KhanHi
following are the error messages from dump
hrtText
There is already a line with the same key.
hat happened?
Error in ABAP application program.
The current ABAP program "SAPLCKMS" had to be terminated because one of the
statements could not be executed.
This is probably due to an error in the ABAP program.
rror analysis
You wanted to add an entry to table "\FUNCTION-POOL=CKMS\DATA=T_DYN_CKMLCR",
which you declared
with a UNIQUE KEY. However, there was already an entry with the
same key.
This may have been in an INSERT or MOVE statement, or within a
SELECT ... INTO statement.
In particular, you cannot insert more than one initial line into a
table with a unique key using the INSERT INITIAL LINE... statement.
rigger Location of Runtime Error
Program SAPLCKMS
Include LCKMSF01
Row 226
Module type (FORM)
Module Name DYNAMIC_PERIOD_CLOSING
Source code where dump ocured
222
223 APPEND ht_ckmlpp TO t_add_ckmlpp.
224 APPEND LINES OF ht_ckmlcr TO t_add_ckmlcr.
225 INSERT ht_ckmlpp INTO TABLE t_dyn_ckmlpp.
>>>> INSERT LINES OF ht_ckmlcr INTO TABLE t_dyn_ckmlcr.
227 ENDWHILE.
Also I guess there is problem with material ledger in R/3 side
I have never worked on material ledger before so dont hav idea of Tcode and tables in SAP R/3 for material ledger.
Thanks
Navneet -
Getting pls-00428 error.
Hi all,
I'm trying to fix some invalid objects in our 11g database and i'm getting a pls-00428 error. Not sure where the issue is originating at (keep in mind, my IT team and I are not thoroughly experienced with 11g, so I apologize if this sounds a little too newbie-ish)
Here's the plsql:
create or replace
FUNCTION detail_cogs (
sSKU varchar2
--,dtFrom date := sysdate
return number
is
nRetval number;
begin
select *
--SUM(cost * ieqty) into nRetval
from (
select
ie.qty ieqty
,ie.part
,ic.validdate
,ic.cost
,LAG(validdate) OVER (partition by ic.part order by validdate desc) prev_entry_time
from
oracle2_partexplosion_mv ie
,oracle2_itemcogs_mv ic
where
ie.sku = sSKU
and ic.part = ie.part
and ic.validdate <= sysdate
order by part, validdate desc
where
prev_entry_time is null;
return nRetval;
exception
when others then
return null;
end;Welcome to the forum.
Reading the documentation will save you:
PLS-00428: an INTO clause is expected in this SELECT statement
Cause: The INTO clause of a SELECT INTO statement was omitted. For example, the code might look like SELECT deptno, dname, loc FROM dept WHERE ... instead of SELECT deptno, dname, loc INTO dept_rec FROM dept WHERE ... In PL/SQL, only a subquery is written without an INTO clause.
http://download.oracle.com/docs/cd/E11882_01/server.112/e10880/pcmus.htm#sthref17855
http://www.oracle.com/pls/db112/search?word=select+into&partno=e10472
Doc home: http://www.oracle.com/pls/db112/homepage
And please change or remove this part from your code anyway, since it's nothing but a bug:
exception
when others then
return null;11g compiler warned you already about that, I may hope... -
I need some help, I had one of my five Xserve RAID boxes fail. The upper controller card needed to be replaced and so we replaced it. But now only one of my volumes is loading and I am seeing the following error in my Console.
7/18/12 9:23:18.550 AM Xsan Admin: ERROR: duplicate LUN label RAID1-Left1
This raid box holds three LUNs. the left is split into two with one being the metadata / Journal for the main volume and the 2nd being the same for my secondary volume. The right side of this box is the second volume while the remaining 4 RAID boxes are my main volume. Here is the rub, the main volume is using the left1 LUN and the secondary is left2. The left2 is the one that is not working and when I go into the LUN info the WWN number does not match the actual id on the raid box.
HELP!!!!
Thanks,
Kevin RosenthalDid you try turning it off and on again? I mean, the full SAN shutdown/startup: http://support.apple.com/kb/HT4027
You're probably seeing "duplicate LUN labels" because the MDC has seen two LUNs with the same label but different serial numbers since it has been online. The serial number (which I think is based off the WWN) would have changed when the RAID controller changed. A reboot should fix that specific error message.
If the volume still doesn't start after rebooting, then you would want to check the cvlog for that volume. -
FM to get short description of the fields in standard table.
Hello all,
How to get the short description of the corresponding field name in the standard table using the field name and table name??
Thanks for your understanding..
Kindly help me..anyone..please...Use view DD03VT.
Use a select query to fetch the required description of the field from view DD03VT passing fields TABNAME, FIELDNAME, DDLANGUAGE in WHERE condition
Using this you can get any text ShortFieldLabel, Medium Fld Labl, Long Fld Label of a field -
create or replace TRIGGER MS_TRIGG_PRICE_CHANGE before INSERT
ON MS_OBIEE_PRICE_CHANGE
FOR EACH ROW
declare
L_xpricechghrdtl_tbl "RIB_XPriceChgHrDtl_TBL" := NULL;
L_xpricechghrdtl_rec_1 "RIB_XPriceChgHrDtl_REC" := NULL;
L_xpricechgdesc_rec_1 "RIB_XPriceChgDesc_REC" := NULL;
L_xpricechgexcst_tbl "RIB_XPriceChgExcSt_TBL" := NULL;
L_xpricechgexcst_rec_1 "RIB_XPriceChgExcSt_REC" := NULL;
O_STATUS_CODE VARCHAR2(255) := null;
O_ERROR_MESSAGE RTK_ERRORS.RTK_TEXT%TYPE := null;
L_message_type VARCHAR2(20) := 'XPRICECHGMOD';
O_rib_error_tbl RIB_ERROR_TBL := NULL;
program_error exception;
BEGIN
L_xpricechghrdtl_rec_1 := "RIB_XPriceChgHrDtl_REC"(50,:new.loc);
L_xpricechghrdtl_tbl := "RIB_XPriceChgHrDtl_TBL"();
L_xpricechghrdtl_tbl.extend();
L_xpricechghrdtl_tbl(1) := L_xpricechgdesc_rec_1;
It shows the error
SQL> show err
Errors for TRIGGER MS_TRIGG_PRICE_CHANGE:
LINE/COL ERROR
21/4 PL/SQL: Statement ignored
21/31 PLS-00382: expression is of wrong type
Please let me know the possible reasons behind the error.I created a trigger for a table that creates a recordtype for posting to a function that expects a recordtype as an input parameter.
THe full trigger code is as follows:
create or replace TRIGGER MS_TRIGG_PRICE_CHANGE before INSERT
ON MS_OBIEE_PRICE_CHANGE
FOR EACH ROW
declare
L_xpricechghrdtl_tbl "RIB_XPriceChgHrDtl_TBL" := NULL;
L_xpricechghrdtl_rec_1 "RIB_XPriceChgHrDtl_REC" := NULL;
L_xpricechgdesc_rec_1 "RIB_XPriceChgDesc_REC" := NULL;
L_xpricechgexcst_tbl "RIB_XPriceChgExcSt_TBL" := NULL;
L_xpricechgexcst_rec_1 "RIB_XPriceChgExcSt_REC" := NULL;
O_STATUS_CODE VARCHAR2(255) := null;
O_ERROR_MESSAGE RTK_ERRORS.RTK_TEXT%TYPE := null;
L_message_type VARCHAR2(20) := 'XPRICECHGMOD';
BEGIN
L_xpricechghrdtl_rec_1 := "RIB_XPriceChgHrDtl_REC"(50,:new.loc);
L_xpricechghrdtl_tbl := "RIB_XPriceChgHrDtl_TBL"();
L_xpricechghrdtl_tbl.extend();
L_xpricechghrdtl_tbl(1) := L_xpricechgdesc_rec_1;
L_xpricechgdesc_rec_1 := "RIB_XPriceChgDesc_REC"('MS_TRIGG_PRICE_CHANGE', -- namespace
:new.item, -- Item number
'', -- diff_id
:new.selling_unit_retail, --Selling Unit Retail
'EA', -- selling UOM
'', -- multi units
'', -- multi unit retail
'', -- multi selling uom
:new.currency_code, -- currency_code
'', -- country
'S', -- hier_level
L_xpricechghrdtl_tbl,
L_xpricechgexcst_tbl);
RMSSUB_XPRICECHG.CONSUME (O_status_code,
O_error_message,
L_xpricechgdesc_rec_1,
L_message_type);
if O_status_code <> 'S' and O_status_code is NOT NULL then
:new.status := 'Failed';
:new.error := O_error_message;
end if;
end;
The function called is RMSSUB_XPRICECHG.CONSUME. -
How can i get the object error in after create trigger???
To get the source code i use ora_sql_text funcion, but to compilation error i don't know...
Thanks,
Renato RodriguesIt too has some limitation. It cannot trap anonymous block's error.
Here is one way ->
satyaki>
satyaki>select * from v$version;
BANNER
Oracle Database 10g Enterprise Edition Release 10.2.0.3.0 - Prod
PL/SQL Release 10.2.0.3.0 - Production
CORE 10.2.0.3.0 Production
TNS for 32-bit Windows: Version 10.2.0.3.0 - Production
NLSRTL Version 10.2.0.3.0 - Production
Elapsed: 00:00:00.58
satyaki>
satyaki>
satyaki>select * from user_errors;
NAME TYPE SEQUENCE LINE POSITION TEXT
P PROCEDURE 1 1 1 PLS-00410: duplicate fields in RECORD,TABLE or argument list are not permitted
P PROCEDURE 2 0 0 PL/SQL: Compilation unit analysis terminated
NUM_ARRAY_REC TYPE 1 1 23 PLS-00355: use of pl/sql table not allowed in this context
NUM_ARRAY_REC TYPE 2 0 0 PL/SQL: Compilation unit analysis terminated
SPLIT FUNCTION 2 45 1 PLS-00103: Encountered the symbol "SELECT"
LOGID_TRIGGER TRIGGER 1 2 23 PLS-00357: Table,View Or Sequence reference 'LOGID.NEXTVAL' not allowed in this context
TEST_VV PROCEDURE 1 1 19 PLS-00230: OUT and IN OUT formal parameters may not have default expressions
CLOB_OBJ TYPE 1 3 18 PLS-00103: Encountered the symbol ";" when expecting one of the following:
:= . ( ) , @ % not null range default external character
The symbol ";" was ignored.
NAME TYPE SEQUENCE LINE POSITION TEXT
LOGID_TRIGGER TRIGGER 2 2 2 PL/SQL: Statement ignored
EMPLOYEE TYPE BODY 1 1 11 PLS-00201: identifier 'EMPLOYEE' must be declared
TEST_PRIVS PROCEDURE 1 6 10 PL/SQL: ORA-00942: table or view does not exist
EMPLOYEE TYPE BODY 2 1 11 PLS-00304: cannot compile body of 'EMPLOYEE' without its specification
EMPLOYEES_VIEW VIEW 1 0 0 ORA-01730: invalid number of column names specified
EMPLOYEE TYPE BODY 3 0 0 PL/SQL: Compilation unit analysis terminated
SPLIT FUNCTION 1 28 1 PLS-00103: Encountered the symbol "DECLARE"
TEST_PRIVS PROCEDURE 2 5 5 PL/SQL: SQL Statement ignored
TEST_PRIVS PROCEDURE 3 3 10 PLS-00341: declaration of cursor 'C1' is incomplete or malformed
TEST_PRIVS PROCEDURE 4 9 6 PL/SQL: Item ignored
NAME TYPE SEQUENCE LINE POSITION TEXT
TEST_PRIVS PROCEDURE 5 13 42 PLS-00364: loop index variable 'R1' use is invalid
TEST_PRIVS PROCEDURE 6 13 5 PL/SQL: Statement ignored
20 rows selected.
Elapsed: 00:00:00.30
satyaki>
satyaki>
satyaki>
satyaki>declare
2 str varchar2;
3 begin
4 nul;
5 end;
6 /
str varchar2;
ERROR at line 2:
ORA-06550: line 2, column 10:
PLS-00215: String length constraints must be in range (1 .. 32767)
ORA-06550: line 4, column 5:
PLS-00201: identifier 'NUL' must be declared
ORA-06550: line 4, column 5:
PL/SQL: Statement ignored
Elapsed: 00:00:00.42
satyaki>
satyaki>
satyaki>select * from user_errors;
NAME TYPE SEQUENCE LINE POSITION TEXT
P PROCEDURE 1 1 1 PLS-00410: duplicate fields in RECORD,TABLE or argument list are not permitted
P PROCEDURE 2 0 0 PL/SQL: Compilation unit analysis terminated
NUM_ARRAY_REC TYPE 1 1 23 PLS-00355: use of pl/sql table not allowed in this context
NUM_ARRAY_REC TYPE 2 0 0 PL/SQL: Compilation unit analysis terminated
SPLIT FUNCTION 2 45 1 PLS-00103: Encountered the symbol "SELECT"
LOGID_TRIGGER TRIGGER 1 2 23 PLS-00357: Table,View Or Sequence reference 'LOGID.NEXTVAL' not allowed in this context
TEST_VV PROCEDURE 1 1 19 PLS-00230: OUT and IN OUT formal parameters may not have default expressions
CLOB_OBJ TYPE 1 3 18 PLS-00103: Encountered the symbol ";" when expecting one of the following:
:= . ( ) , @ % not null range default external character
The symbol ";" was ignored.
NAME TYPE SEQUENCE LINE POSITION TEXT
LOGID_TRIGGER TRIGGER 2 2 2 PL/SQL: Statement ignored
EMPLOYEE TYPE BODY 1 1 11 PLS-00201: identifier 'EMPLOYEE' must be declared
TEST_PRIVS PROCEDURE 1 6 10 PL/SQL: ORA-00942: table or view does not exist
EMPLOYEE TYPE BODY 2 1 11 PLS-00304: cannot compile body of 'EMPLOYEE' without its specification
EMPLOYEES_VIEW VIEW 1 0 0 ORA-01730: invalid number of column names specified
EMPLOYEE TYPE BODY 3 0 0 PL/SQL: Compilation unit analysis terminated
SPLIT FUNCTION 1 28 1 PLS-00103: Encountered the symbol "DECLARE"
TEST_PRIVS PROCEDURE 2 5 5 PL/SQL: SQL Statement ignored
TEST_PRIVS PROCEDURE 3 3 10 PLS-00341: declaration of cursor 'C1' is incomplete or malformed
TEST_PRIVS PROCEDURE 4 9 6 PL/SQL: Item ignored
NAME TYPE SEQUENCE LINE POSITION TEXT
TEST_PRIVS PROCEDURE 5 13 42 PLS-00364: loop index variable 'R1' use is invalid
TEST_PRIVS PROCEDURE 6 13 5 PL/SQL: Statement ignored
20 rows selected.
Elapsed: 00:00:00.45
satyaki>Regards.
Satyaki De. -
Getting a runtime error in block alv that field symbol has been assigned
hi to all experts ,
im getting a runtime error that field symbol has not been assigned in functionmodule reuse_alv_block_list_display
i tried a lot to rectify the error ,im unable to do it thats i have posted here
*& Report ZHAI_ALV_BLOCK_LIST
REPORT ZHAI_ALV_BLOCK_LIST.
type-pools:slis.
tables:mara.
DATA:BEGIN OF IT_MARA OCCURS 0,
MATNR LIKE MARA-MATNR,
MBRSH LIKE MARA-MBRSH,
MATKL LIKE MARA-MATKL,
END OF IT_MARA.
data: begin of IT_DESC OCCURS 0,
MATNR like MAKT-MATNR,
MAKTX like MAKT-MAKTX,
end of IT_DESC.
data: begin of IT_MARD occurs 0,
MATNR like mard-matnr,
WERKS like mard-werks,
LGORT like mard-lgort,
LABST like mard-labst,
end of IT_MARD.
data: IT_FCAT TYPE SLIS_T_FIELDCAT_ALV ,
WA_FCAT LIKE LINE OF IT_FCAT,
IT_FCAT1 type slis_t_fieldcat_alv,
WA_FCAT1 LIKE LINE OF IT_FCAT1,
IT_FCAT2 TYPE SLIS_T_FIELDCAT_ALV,
WA_FCAT2 LIKE LINE OF IT_FCAT2,
wa_layout type SLIS_LAYOUT_ALV,
it_event type SLIS_T_EVENT,
wa_event like line of it_event,
wa_layout like line of it_layout,
V_REPID LIKE SY-REPID.
select-options:so_matnr for mara-matnr.
start-of-selection.
perform f_select_data.
DEFINE ADD_CATALOGUE1.
WA_FCAT-COL_POS = &1.
WA_FCAT-fieldname = &2.
WA_fcat-tabname = &3.
wa_fcat-emphasize = &4.
wa_fcat-ref_tabname = &5.
APPEND WA_FCAT TO IT_FCAT.
END-OF-DEFINITION.
DEFINE ADD_CATALOGUE2.
WA_FCAT1-COL_POS = &1.
WA_FCAT1-fieldname = &2.
WA_fcat1-tabname = &3.
wa_fcat1-emphasize = &4.
wa_fcat1-ref_tabname = &5.
APPEND WA_FCAT1 TO IT_FCAT1.
END-OF-DEFINITION.
DEFINE ADD_CATALOGUE3.
WA_FCAT2-COL_POS = &1.
WA_FCAT2-fieldname = &2.
WA_fcat2-tabname = &3.
wa_fcat2-emphasize = &4.
wa_fcat2-ref_tabname = &5.
APPEND WA_FCAT2 TO IT_FCAT2.
END-OF-DEFINITION.
perform f_build_fcat.
*perform f_build_fcat1.
perform f_build_fcat2.
PERFORM F_BUILD_LAYOUT.
PERFORM F_BUILD_EVENTS.
PERFORM F_BLOC_DISPLAY.
*& Form f_select_data
FORM f_select_data .
select matnr
mbrsh
matkl
from mara into table it_mara where matnr
in so_matnr.
if it_mara[] is not initial.
select matnr
maktx
from makt
into table it_desc
for all entries in it_mara
where matnr eq it_mara-matnr.
endif.
if it_desc[] is not initial.
select matnr
werks
lgort
labst
from mard
into table it_mard
for all entries in it_desc
where matnr eq it_desc-matnr.
endif.
ENDFORM. " f_select_data
*& Form f_build_fcat
FORM f_build_fcat .
ADD_CATALOGUE2:
'1' 'MATNR' 'IT_MARA' 'C500' 'MARA',
'2' 'MBRSH' 'IT_MARA' 'C600' 'MARA',
'3' 'MATKL' 'IT_MARA' 'C300' 'MARA'.
ENDFORM. " f_build_fcat
**& Form f_build_fcat1
FORM f_build_fcat1 .
ADD_CATALOGUE1:
'1' 'MATNR' 'IT_DESC' 'C500' 'MAKT',
'2' 'MAKTX' 'IT_DESC' 'C600' 'MAKT'.
ENDFORM. " f_build_fcat1
*& Form f_build_fcat2
FORM f_build_fcat2.
ADD_CATALOGUE3:
'1' 'MATNR' 'IT_MARD' 'C500' 'MARD',
'2' 'WERKS' 'IT_MARD' 'C600' 'MARD',
'3' 'LGORT' 'IT_MARD' 'C200' 'MARD',
'4' 'LABST' 'IT_MARD' 'C300' 'MARD'.
ENDFORM. " f_build_fcat2
*& Form F_BLOC_DISPLAY
text
--> p1 text
<-- p2 text
FORM F_BLOC_DISPLAY .
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
EXPORTING
I_CALLBACK_PROGRAM = SY-REPID.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
IS_LAYOUT = wa_layout
IT_FIELDCAT = it_fcat
I_TABNAME = 'IT_MARA'
IT_EVENTS = it_event
IT_SORT =
I_TEXT = ' '
TABLES
T_OUTTAB = IT_MARA
EXCEPTIONS
PROGRAM_ERROR = 1
MAXIMUM_OF_APPENDS_REACHED = 2
OTHERS = 3
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
IS_LAYOUT = wa_layout
IT_FIELDCAT = it_fcat1
I_TABNAME = 'IT_DESC'
IT_EVENTS = IT_EVENT
IT_SORT =
I_TEXT = ' '
TABLES
T_OUTTAB = IT_DESC
EXCEPTIONS
PROGRAM_ERROR = 1
MAXIMUM_OF_APPENDS_REACHED = 2
OTHERS = 3
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
IS_LAYOUT = wa_LAYOUT
IT_FIELDCAT = IT_FCAT2
I_TABNAME = 'IT_MARD'
IT_EVENTS = IT_EVENT
IT_SORT =
I_TEXT = ' '
TABLES
T_OUTTAB = IT_MARD
EXCEPTIONS
PROGRAM_ERROR = 1
MAXIMUM_OF_APPENDS_REACHED = 2
OTHERS = 3
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " F_BLOC_DISPLAY
*& Form F_BUILD_LAYOUT
text
--> p1 text
<-- p2 text
FORM F_BUILD_LAYOUT .
wa_layout-edit = 'X'.
wa_layout-window_titlebar = 'MOHAMMED ABDUL HAI'.
wa_layout-zebra = 'X'.
ENDFORM. " F_BUILD_LAYOUT
*& Form F_BUILD_EVENTS
text
--> p1 text
<-- p2 text
FORM F_BUILD_EVENTS .
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING
I_LIST_TYPE = 0
IMPORTING
ET_EVENTS = IT_EVENT
EXCEPTIONS
LIST_TYPE_WRONG = 1
OTHERS = 2
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
SORT IT_EVENT BY NAME.
READ TABLE it_event INTO wa_event WITH KEY NAME = 'TOP_OF_PAGE' bINARY
SEArch.
if sy-subrc eq 0.
wa_event-form = 'F_TOP_OF_PAGE'.
ENDIF.
MODIFY IT_EVENT FROM WA_EVENT INDEX SY-TABIX TRANSPORTING FORM.
READ TABLE IT_EVENT INTO WA_EVENT WITH KEY NAME = 'USER_COMMAND' BINARY SEARCH.
WA_EVENT-FORM = 'F_USER_COMMAND'.
MODIFY IT_EVENT FROM wa_event INDEX SY-TABIX TRANSPORTING FORM.
ENDFORM. " F_BUILD_EVENTSHi,
When does this runtime error occur? When displaying output (calling FM) or.....
I copied your coding and made a few minor changes and It's working fine for my now:
REPORT ZHAI_ALV_BLOCK_LIST.
TYPE-POOLS:slis.
TABLES:mara.
DATA:BEGIN OF it_mara OCCURS 0,
matnr LIKE mara-matnr,
mbrsh LIKE mara-mbrsh,
matkl LIKE mara-matkl,
END OF it_mara.
DATA: BEGIN OF it_desc OCCURS 0,
matnr LIKE makt-matnr,
maktx LIKE makt-maktx,
END OF it_desc.
DATA: BEGIN OF it_mard OCCURS 0,
matnr LIKE mard-matnr,
werks LIKE mard-werks,
lgort LIKE mard-lgort,
labst LIKE mard-labst,
END OF it_mard.
DATA: it_fcat TYPE slis_t_fieldcat_alv ,
wa_fcat LIKE LINE OF it_fcat,
it_fcat1 TYPE slis_t_fieldcat_alv,
wa_fcat1 LIKE LINE OF it_fcat1,
it_fcat2 TYPE slis_t_fieldcat_alv,
wa_fcat2 LIKE LINE OF it_fcat2,
wa_layout TYPE slis_layout_alv,
it_event TYPE slis_t_event,
wa_event LIKE LINE OF it_event,
* wa_layout like line of it_layout,
v_repid LIKE sy-repid.
SELECT-OPTIONS:so_matnr FOR mara-matnr.
START-OF-SELECTION.
PERFORM f_select_data.
DEFINE add_catalogue1.
wa_fcat-col_pos = &1.
wa_fcat-fieldname = &2.
wa_fcat-tabname = &3.
wa_fcat-emphasize = &4.
wa_fcat-ref_tabname = &5.
append wa_fcat to it_fcat.
END-OF-DEFINITION.
DEFINE add_catalogue2.
wa_fcat1-col_pos = &1.
wa_fcat1-fieldname = &2.
wa_fcat1-tabname = &3.
wa_fcat1-emphasize = &4.
wa_fcat1-ref_tabname = &5.
append wa_fcat1 to it_fcat1.
END-OF-DEFINITION.
DEFINE add_catalogue3.
wa_fcat2-col_pos = &1.
wa_fcat2-fieldname = &2.
wa_fcat2-tabname = &3.
wa_fcat2-emphasize = &4.
wa_fcat2-ref_tabname = &5.
append wa_fcat2 to it_fcat2.
END-OF-DEFINITION.
PERFORM f_build_fcat.
PERFORM f_build_fcat1.
PERFORM f_build_fcat2.
PERFORM f_build_layout.
PERFORM f_build_events.
PERFORM f_bloc_display.
*& Form f_select_data
FORM f_select_data .
SELECT matnr
mbrsh
matkl
FROM mara INTO TABLE it_mara WHERE matnr
IN so_matnr.
IF it_mara[] IS NOT INITIAL.
SELECT matnr
maktx
FROM makt
INTO TABLE it_desc
FOR ALL ENTRIES IN it_mara
WHERE matnr EQ it_mara-matnr.
ENDIF.
IF it_desc[] IS NOT INITIAL.
SELECT matnr
werks
lgort
labst
FROM mard
INTO TABLE it_mard
FOR ALL ENTRIES IN it_desc
WHERE matnr EQ it_desc-matnr.
ENDIF.
ENDFORM. " f_select_data
*& Form f_build_fcat
FORM f_build_fcat .
add_catalogue2:
'1' 'MATNR' 'IT_MARA' 'C500' 'MARA',
'2' 'MBRSH' 'IT_MARA' 'C600' 'MARA',
'3' 'MATKL' 'IT_MARA' 'C300' 'MARA'.
ENDFORM. " f_build_fcat
**& Form f_build_fcat1
FORM f_build_fcat1 .
add_catalogue1:
'1' 'MATNR' 'IT_DESC' 'C500' 'MAKT',
'2' 'MAKTX' 'IT_DESC' 'C600' 'MAKT'.
ENDFORM. " f_build_fcat1
*& Form f_build_fcat2
FORM f_build_fcat2.
add_catalogue3:
'1' 'MATNR' 'IT_MARD' 'C500' 'MARD',
'2' 'WERKS' 'IT_MARD' 'C600' 'MARD',
'3' 'LGORT' 'IT_MARD' 'C200' 'MARD',
'4' 'LABST' 'IT_MARD' 'C300' 'MARD'.
ENDFORM. " f_build_fcat2
*& Form F_BLOC_DISPLAY
* text
FORM f_bloc_display .
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
EXPORTING
i_callback_program = sy-repid.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
is_layout = wa_layout
it_fieldcat = it_fcat1
i_tabname = 'IT_MARA'
it_events = it_event
*IT_SORT =
*I_TEXT =
TABLES
t_outtab = it_mara
EXCEPTIONS
program_error = 1
maximum_of_appends_reached = 2
OTHERS = 3
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
is_layout = wa_layout
it_fieldcat = it_fcat1
i_tabname = 'IT_DESC'
it_events = it_event
*IT_SORT =
*I_TEXT =
TABLES
t_outtab = it_desc
EXCEPTIONS
program_error = 1
maximum_of_appends_reached = 2
OTHERS = 3
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
is_layout = wa_layout
it_fieldcat = it_fcat2
i_tabname = 'IT_MARD'
it_events = it_event
*IT_SORT =
*I_TEXT = ' '
TABLES
t_outtab = it_mard
EXCEPTIONS
program_error = 1
maximum_of_appends_reached = 2
OTHERS = 3
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM. " F_BLOC_DISPLAY
*& Form F_BUILD_LAYOUT
FORM f_build_layout .
wa_layout-edit = 'X'.
wa_layout-window_titlebar = 'MOHAMMED ABDUL HAI'.
wa_layout-zebra = 'X'.
ENDFORM. " F_BUILD_LAYOUT
*& Form F_BUILD_EVENTS
FORM f_build_events .
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING
i_list_type = 0
IMPORTING
et_events = it_event
EXCEPTIONS
list_type_wrong = 1
OTHERS = 2.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
SORT it_event BY name.
READ TABLE it_event INTO wa_event WITH KEY name = 'TOP_OF_PAGE' BINARY
SEARCH.
IF sy-subrc EQ 0.
wa_event-form = 'F_TOP_OF_PAGE'.
ENDIF.
MODIFY it_event FROM wa_event INDEX sy-tabix TRANSPORTING form.
READ TABLE it_event INTO wa_event WITH KEY name = 'USER_COMMAND' BINARY
SEARCH.
wa_event-form = 'F_USER_COMMAND'.
MODIFY it_event FROM wa_event INDEX sy-tabix TRANSPORTING form.
ENDFORM. " F_BUILD_EVENTS -
Error while linking user defined table to user defined field using vb6.0
Hi,
I am creating a userdefined field on a SAPB1 table(PDN1) using vb 6.0
I am trying to link this field to a user defined table.
When i do that i get the following error:
"The field 'Related table' should consist of 8 alphanumeric chracters with no valid or default values"
When i try to do the same thing from SAPB1(not using code) there is no such problem.
My vb code is as follows:
Set oUserFieldsMD = oCmp.GetBusinessObject(oUserFields)
oUserFieldsMD.TableName = "PDN1"
oUserFieldsMD.Name = "OB_Locn"
oUserFieldsMD.Description = "WH Location"
oUserFieldsMD.Type = db_Alpha
oUserFieldsMD.EditSize = 30
lRetCode = oUserFieldsMD.Add
If lRetCode <> 0 Then
oCmp.GetLastError lErrCode, sErrMsg
MsgBox sErrMsg
GoTo Err_
End If
If Not oUserFieldsMD.GetByKey("PDN1", 0) Then
MsgBox "Error"
GoTo Err_
End If
oUserFieldsMD.LinkedTable = "OB_TEST"
lRetCode = oUserFieldsMD.Update
Your help will be much appreciated.
Thanks.Great Sébastien!
Looks like we could not survive here one day without your contribution
Best regards,
Frank
PS: For readers of this thread who don't understand why
EditSize
must be "8":
This is the size of the
Code
field in the user-defined table to which the new field OB_Locn (in the DB it will be U_OB_Locn) is linked to...
So, it should be preferrably of the same size. -
IE07 and error 'Maintain field selection for Fleet data in Equipment List'
Hi all,
When running transaction IE07 (multi-level equipment list) , I get the following error: 'Maintain field selection for Fleet data in Equipment List (Multilevel)'
I can't see where is the missing configuration point.
We have activated business function LOG_EAM_CI_3.
Have anyone encountered this error before?
Thanks,
P.Hi Narasimhan
Could you give more details ? where is located this setting?
Thanks,
P. -
Please help getting invalid number error.
Hi Experts,
My requirement is
If DT_ID value of xmlmsg existed in the DT_ID of PART_ID_COLLES table then that record should be processd else should be skipped.
And xmlmsg of PART_ID should start with "A" and followed only by the number then that record should be processed else should be skipped.
And xmlmsg of DD_DAYS should contain only the number and grater than or equal to 0 ,then that record should be processed else should be skipped.
For that I have written this code.
But if I pass dt_id as string value in xmlmsg I am getting invalid number error.
DT_ID of PART_ID_COLLES table is number data type.
SELECT xmlmsg.part_id part_id,xmlmsg.dd_days dd_days,xmlmsg.dt_id dt_id
FROM XMLTABLE(
XMLNAMESPACES(
'urn:schemas-microsoft-com:rowset' as "rs"
, '#RowsetSchema' as "z"
'/z:row[not(@dt_id=following-sibling::z:row/@dt_id and @part_id=following-sibling::z:row/@part_id)]'
PASSING p_dd_days_vals
COLUMNS
ITEM_NO for ordinality
, dt_id VARCHAR2 (20) path '@dt_id'
, part_id VARCHAR2 (25) path '@part_id'
, dd_days VARCHAR2 (20) path '@dd_days'
) xmlmsg,
part_id_colles pic
WHERE REGEXP_REPLACE(TRIM(xmlmsg.dt_id),'^([0-9]+)$|.','\1') = pic.dt_id
AND REGEXP_LIKE (UPPER(TRIM(xmlmsg.part_id)),'^[A][0-9]+$')
AND (TO_NUMBER(REGEXP_REPLACE(TRIM(xmlmsg.dd_days),'^([0-9]+)$|.','\1')) >=0
AND REGEXP_LIKE(TRIM(xmlmsg.dd_days), '^-?[[:digit:],.]*$') ;
Sample message is
<MESSAGES>
<MESSAGE ID="12345">
<MSG_ID>3026900</MSG_ID>
<DT_POSTED>6/20/2013 08:15:48</DT_POSTED>
<POSTED_BY>GPD_MSG_EXTRACTOR</POSTED_BY>
<DT_LAST_QUEUED />
<MSG>
<WORK_SET TRANSACTION_ID="@TRANS_ID" TRANSACTION_TYPE="Batch" IS_ACID="@IS_ACID">
<WORK_UNIT GROUP="dd_days" ACTION="ADD" AFFECTED="dd_days">
<RECORDSET TABLE_NAME="dd_days">
<xml xmlns:s="uuid:BDC6E3F0-6DA3-11d1-A2A3-00AA00C14882" xmlns:dt="uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" xmlns:rs="urn:schemas-microsoft-com:rowset" xmlns:z="#RowsetSchema">
<rs:data>
<z:row dt_id="430" part_id="A5556689" dd_days="10"/>
<z:row dt_id="550A" part_id="A8889965" dd_days="20"/>
</rs:data>
</xml>
</RECORDSET>
</WORK_UNIT>
</WORK_SET>
</MSG>
</MESSAGE>
</MESSAGES>
Please help me.
Thanks.Your code has ton of errors. Anyway:
with part_id_colles as (
select 430 dt_id,xmltype('<MESSAGES>
<MESSAGE ID="12345">
<MSG_ID>3026900</MSG_ID>
<DT_POSTED>6/20/2013 08:15:48</DT_POSTED>
<POSTED_BY>GPD_MSG_EXTRACTOR</POSTED_BY>
<DT_LAST_QUEUED />
<MSG>
<WORK_SET TRANSACTION_ID="@TRANS_ID" TRANSACTION_TYPE="Batch" IS_ACID="@IS_ACID">
<WORK_UNIT GROUP="dd_days" ACTION="ADD" AFFECTED="dd_days">
<RECORDSET TABLE_NAME="dd_days">
<xml xmlns:s="uuid:BDC6E3F0-6DA3-11d1-A2A3-00AA00C14882" xmlns:dt="uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" xmlns:rs="urn:schemas-microsoft-com:rowset" xmlns:z="#RowsetSchema">
<rs:data>
<z:row dt_id="430" part_id="A5556689" dd_days="10"/>
<z:row dt_id="550A" part_id="A8889965" dd_days="20"/>
</rs:data>
</xml>
</RECORDSET>
</WORK_UNIT>
</WORK_SET>
</MSG>
</MESSAGE>
</MESSAGES>') p_dd_days_vals from dual)
SELECT xmlmsg.part_id part_id,
xmlmsg.dd_days dd_days,
xmlmsg.dt_id dt_id
FROM part_id_colles pic,
XMLTABLE(
XMLNAMESPACES(
'urn:schemas-microsoft-com:rowset' as "rs",
'#RowsetSchema' as "z"
'/MESSAGES/MESSAGE/MSG/WORK_SET/WORK_UNIT/RECORDSET/xml/rs:data/z:row[not(@dt_id=following-sibling::z:row/@dt_id and @part_id=following-sibling::z:row/@part_id)]'
PASSING p_dd_days_vals
COLUMNS
ITEM_NO for ordinality,
dt_id VARCHAR2 (20) path '@dt_id',
part_id VARCHAR2 (25) path '@part_id',
dd_days VARCHAR2 (20) path '@dd_days'
) xmlmsg
WHERE REGEXP_REPLACE(TRIM(xmlmsg.dt_id),'^([0-9]+)$|.','\1') = pic.dt_id
AND REGEXP_LIKE(UPPER(TRIM(xmlmsg.part_id)),'^[A][0-9]+$')
AND TO_NUMBER(REGEXP_REPLACE(TRIM(xmlmsg.dd_days),'^([0-9]+)$|.','\1')) >=0
AND REGEXP_LIKE(TRIM(xmlmsg.dd_days), '^-?[[:digit:],.]*$')
PART_ID DD_DAYS DT_ID
A5556689 10 430
SQL>
SY. -
Update Error: No access permission as table is already locked
Hi All,
I am trying to reload work order master data but keepp getting the update error "No access permission as table is already locked". I have looked at sm12 but no lock entries found.
Pls advice.Hi Ola,
Have you checked RS12 tcode for master data locks?
Best regards,
Eugene -
Error: None of the fact tables are compatible with the query request
Hi experts,
I have one confirm dimension D1 and other two fact table F1 and F2 (F1 and F2 are connected to D1)
when i create a report from D1 and F1 the report is running fine. But pull the column from F2 also in this report i am getting the following error
None of the fact tables are compatible with the query request Code Combinations
please suggest on the same.
Regards,
SHi
i have done the content level setting in each of the table, D1,F1 and F2(LTS), now i am getting the following error..
State: HY000. Code: 10058. [NQODBC] [SQL_STATE: HY000] [nQSError: 10058] A general error has occurred. [nQSError: 15018] Incorrectly defined logical table source (for fact table Gl Sets Of Books) does not contain mapping for [Code Combinations.Code Combinations.Affiliate, GL Balances.GL Balances.Currency Code, GL Balances.GL Balances.PTD_Balance, Gl Sets Of Books.Gl Sets Of Books .SoB Name]. (HY000)
Gl Balances : D1
Code Commbination: F1
Gl Sets Of Books : F2
I have checked the joins in physical and BMM layer..all are fine.. -
Runtime Error "Cannot find system in table file"
I need assistance!
I have a Blackberry Curve 8310 and have recently installed Version 4.5
I am trying to setup my synchronization. I have followed the steps to setup my calendar to Outlook 2007. It tells me Congratulations! You have successfully configured the product. However, when I press Finish, I get a Runtime Error "Cannot find system in table file"
I have uninstalled the program and reinstalled it - the same error appears.
Any help would be appreciated!
Solved!
Go to Solution.FIGURED IT OUT!!!
The following steps, which are posted on the RIM Support will work; however, I had to do it a different way. In Step 1, it states that the ilxolkCompanion.fil is located in C:\Program Files\Research In Motion\BlackBerry\Connectors\MS Outlook Connector path...however, when I searched for this file, it was actually located in C:\Program Files\Blackberry\Connectors\MS Outlook Connector. (This could be because I upgraded from 4.2.2 to 4.5 w/o completing a clean uninstall...not too sure why)
Once I located the file through the command prompt, I unregistered as per the instructions in Step 1. I then followed step 2 exactly word for word...and VOILA!!! I now have Version 4.5 working with MS Outlook 2007
ResolutionIf the Connectors folder is still present in C\Program Files\Research In Motion\BlackBerry\Connectors\MS Outlook Connector, follow these steps:
Unregister the old Microsoft Outlook connector ilxolkCompanion.fil.
Open the command prompt.
Navigate to C:\Program Files\Research In Motion\BlackBerry\Connectors\MS Outlook Connector.
Type in the command regsvr32 -u ilxolkCompanion.fil.
In Desktop Manager, Microsoft Outlook will no longer be listed as an available desktop application.
Register the most current Microsoft Outlook connector.
Navigate to C:\Program Files\Research In Motion\BlackBerry\IS71 Connectors\MS Outlook Connector.
Type in the command regsvr32 msoutlookconnector.fil.
In Desktop Manager, Microsoft Outlook will now be registered as an available desktop application.
Once these steps have been completed, configure synchronization again. -
Description for field process_type in table crmc_proc_type
Hi All,
In which table can i get the description for the field process_type in table crmc_proc_type.I need to fetch the description.
Thanks in advancehi anindya,
the description of transaction type you can get it from table CRMC_PROC_TYPE_T
just query to this table by the transaction type
hopes it helps
cheers
Maybe you are looking for
-
Hi brother, What is te menaing below msg from v$sql_workarea_active ? Is a problem in SQL statement or index? SQL_HASH_VALUE SQL_ID WORKAREA_ADDRESS OPERATION_TYPE OPERATION_ID POLICY SID QCINST_ID QCSID ACTIVE_TIME WORK_AREA_SIZE EXPECTED_SIZE ACTUA
-
Can't find print window to set my printer when I click on the printer add on icon
My Epson printer is set as default printer. I am unable to find the print window to add my printer to firefox when trying to print from the add on icon.
-
Changing date format from yyyy/mm/dd to mm/dd/yyyy
I use the following statment: MAX(case when A.[NGT_KYC_QUES_PROPERTY]='ResolvedDate' then CAST(SUBSTRING([NGT_KYC_QUES_ANSWER],5,2) + '-' + SUBSTRING([NGT_KYC_QUES_ANSWER],7,2) + '-' + SUBSTRING([NGT_KYC_QUES_ANSWER],1,4) AS DATE) ELSE '' END)AS Reso
-
Can I publish for no charge on Ibooks, and also create a pdf copy
I plan to publish a short book on a travel experience on Ibooks for no charge. Can I also create and distribute a PDF copy to friends without access to ibooks?
-
ICloud & Numbers, wanting to remove numbers from iCloud..
Apparently, if you have iCloud set up on your mac (in my case mac mini), Numbers automatically saves the spreadsheets by default to iCloud. I do not want all of my spreadsheets in iCloud. I do not want ANY of them in iCloud now, especially as it si