Runtime error in sorted itab
Q2]] A runtime error occurs if you violate the sort order of a sorted table by appending to it -
WHY?
Hi,
First of all you should try and understand the meaning of Append and Insert.
Append always adds a new line to the end of the internal table.If the table is empty,then it would add it as the first line.
Insert always inserts the row according to the sorting or if you have given any condition then accordingly.
Modify can play the role of either the Append or Insert depending on the type of the table.
Hence,if you try to use Append in a sorted table, it adds a new row at the end of the table and disturbs the sorting.Insert on the other hand includes the row at a place according to the sorting.
In case you have any further clarifications,do let me know.
Regards,
Puneet Jhari.
Similar Messages
-
"Runtime error
R6034
An application has made an attempt to load the C runtime library incorrectly. Please contact the application's support team for more information"
Can't contact Apple iTunes support as they want a serial number (I assume from my iPhone where I can't find it, let alone read it as all the printing is so small). Any help appreciated.Go to Control Panel > Add or Remove Programs (Win XP) or Programs and Features (later)
Remove all of these items in the following order:
iTunes
Apple Software Update
Apple Mobile Device Support (if this won't uninstall move on to the next item)
Bonjour
Apple Application Support
Reboot, download iTunes, then reinstall, either using an account with administrative rights, or right-clicking the downloaded installer and selecting Run as Administrator.
The uninstall and reinstall process will preserve your iTunes library and settings, but ideally you would back up the library and your other important personal documents and data on a regular basis. See this user tip for a suggested technique.
Please note:
Some users may need to follow all the steps in whichever of the following support documents applies to their system. These include some additional manual file and folder deletions not mentioned above.
HT1925: Removing and Reinstalling iTunes for Windows XP
HT1923: Removing and reinstalling iTunes for Windows Vista, Windows 7, or Windows 8
tt2 -
RUNTIME ERROR - Trying to INSERT dbtab FROM dynamic itab
Hi guys,
I'm trying to do this
INSERT (l_nametab) FROM TABLE <dynamic_table>.
where:
DATA: l_nametab TYPE TABNAME VALUE 'PA0002'.
FIELD-SYMBOLS: <dynamic_table> TYPE STANDARD TABLE.
DATA: dy_table2 type ref to data.
CREATE DATA dy_table2 TYPE STANDARD TABLE OF (l_nametab).
ASSIGN dy_table2->* TO <dynamic_table>
... but I received this runtime error:
DBIF_RSQL_INTERNAL_ERROR
Internal error when accessing a table.
The current ABAP/4 program terminated due to
an internal error in the database interface.
An internal error in the database interface occurred during access to
the data of table "PA0002 ".
The situation points to an internal error in the SAP software
or to an incorrect status of the respective work process.
For further analysis the SAP system log should be examined
(transaction SM21).
For a precise analysis of the error, you should supply
documents with as many details as possible.
Does anybody know how can it be solved?
I'll really apreciate it.
Thanks and Regards.Hi Max,
How can I upload this data if I'm reading the info from an Input File.
The FM HR_INFOTYPE_OPERATION is useless because the UNAME fild doesn't remain into the record. They really need these field.
The main idea of these program is to read the Input File Line, wich can belong to any infotype.
I'm already reading the Infotype data from the input file and I need to transfer it to the PAXXXX table.
Next, a little explanation of it:
This program is to INSERT DATA INTO HR TABLES...
The FM HR_INFOTYPE_OPERATION is useless in this process...
Only with INSERT dbtab it has to be done!!!
1.- Read HR data from an input file. The data type of the file lines is PRELP.
2.- Get the input file data into an internal table (TYPE PRELP) using the ABAP Method CL_GUI_FRONTEND_SERVICES=>GUI_UPLOAD.
3.- Get the DDic. Table Name using CONCATENATE 'PA' wa_file-infty INTO l_nametab.
4.- Get the DDic.Struct.Name using CONCATENATE 'P' wa_file-infty INTO l_nametype.
5.- Assign values with the same code:
FIELD-SYMBOLS: <dyn_table> type standard table,
<dyn_wa>,
<dyn_field>.
FIELD-SYMBOLS: <dyn_table2> type standard table,
<dyn_wa2>,
<dyn_field2>.
DATA: dy_table2 type ref to data,
dy_line2 type ref to data.
DATA: dy_table type ref to data,
dy_line type ref to data,
CREATE DATA dy_table TYPE STANDARD TABLE OF (l_nametype).
ASSIGN dy_table->* TO <dyn_table>.
" Create dynamic work area and assign to FS
CREATE DATA dy_line LIKE LINE OF <dyn_table>.
ASSIGN dy_line->* TO <dyn_wa>.
CREATE DATA dy_table2 TYPE STANDARD TABLE OF (l_nametab).
ASSIGN dy_table2->* TO <dyn_table2>.
" Create dynamic work area and assign to FS
CREATE DATA dy_line2 LIKE LINE OF <dyn_table2>.
ASSIGN dy_line2->* TO <dyn_wa2>.
6.- Convert the Input File Line from PRELP type to PNNNN type with the ABAP method
CL_HR_PNNNN_TYPE_CAST=>PRELP_TO_PNNNN EXPORTING PRELP = wa_file
IMPORTING PNNNN = <dyn_wa>.
7.- As <dyn_wa2> and <dyn_table2> are of PANNNN Data Type, there is an structure with the MANDT field to be assigned to it:
" Type Definition
TYPES: BEGIN OF type_mandt,
mandt TYPE MANDT,
END OF type_mandt.
" Structure Definition
DATA: wa_mandt TYPE type_mandt.
" Structure value assignation
wa_mandt-mandt = sy-mandt.
8.- Assign corresponding values and INSERT INTO dbtab
MOVE-CORRESPONDING <dyn_wa> TO <dyn_wa2>. "XXXX
MOVE-CORRESPONDING wa_mandt TO <dyn_wa2>.
APPEND <dyn_wa2> TO <dyn_table2>.
INSERT (l_nametab) FROM TABLE <dyn_table2> ACCEPTING DUPLICATE KEYS.
9.- In these code line, the menctioned runtime error appears.
I hope it can be solved...
Thanks and regards... -
Hi,
Following code is working fine in Development system and in Production system I am getting a runtime error. Only difference I am finding is in r_lifnr value. In development system I have few lifnr and in Production system it's not so... am I getting error because of it? Is there any restriction to no. of items populated in a range? Or Basis person need to change any parameter? Enclosed the detail dump below the code...
Advance thanks.
Regards,
Balaji Viswanath.
Code:
SELECT bukrs
lifnr
augdt
augbl
zuonr
gjahr
belnr
buzei
waers
dmbtr
wrbtr
zlsch
shkzg
blart
gsber
sgtxt
INTO TABLE t_bsak_tmp
FROM bsak CLIENT SPECIFIED
WHERE mandt = sy-mandt AND
lifnr IN r_lifnr AND
bukrs IN s_bukrs AND
augdt IN s_augdt AND
blart IN s_blart.
IF sy-subrc <> 0.
No data found for selection criteria
MESSAGE i018.
LEAVE LIST-PROCESSING.
ENDIF.
Dump:
Runtime Errors DBIF_RSQL_INVALID_RSQL
Exception CX_SY_OPEN_SQL_DB
Occurred on 14.11.2005 at 14:35:22
Error in the module RSQL accessing the database interface.
What happened?
Error in ABAP application program.
The current ABAP program "/DS1/FI_CR_REPT_PGSR802_VEND_P" had to be terminated
because one of the
statements could not be executed.
This is probably due to an error in the ABAP program.
What can you do?
Print out the error message (using the "Print" function)
and make a note of the actions and input that caused the
error.
To resolve the problem, contact your SAP system administrator.
You can use transaction ST22 (ABAP Dump Analysis) to view and administer
termination messages, especially those beyond their normal deletion
date.
Error analysis
An exception occurred. This exception is dealt with in more detail below
. The exception, which is assigned to the class 'CX_SY_OPEN_SQL_DB', was
neither
caught nor passed along using a RAISING clause, in the procedure
"GET_CLRD_VEN_DATA" "(FORM)"
Since the caller of the procedure could not have expected this exception
to occur, the running program was terminated.
The reason for the exception is:
The SQL statement generated from the SAP Open SQL Statement violates a
restriction imposed by the database system used in R/3.
Possible errors:
o The maximum size of an SQL statement has been exceeded.
o The statement contains too many input variables.
o The space needed for the input data exceeds the available memory.
o ...
You can usually find details in the system log (SM21) and in the
developer trace of the work process (ST11).
If an error occurs the developer trace often informs you about the
current restrictions.
How to correct the error
The exception must either be prevented, caught within the procedure
"GET_CLRD_VEN_DATA"
"(FORM)", or declared in the procedure's RAISING clause.
To prevent the exception, note the following:
The SAP Open SQL statement must be divided into several smaller units.
If the problem occurred due to the use of an excessively large table
in an IN itab construct, you can use the addition FOR ALL ENTRIES
instead.
When you use this addition, the statement is split into smaller units
according to the restrictions of the database system used.
You may able to find an interim solution to the problem
in the SAP note system. If you have access to the note system yourself,
use the following search criteria:
"DBIF_RSQL_INVALID_RSQL" CX_SY_OPEN_SQL_DBC
"/DS1/FI_CR_REPT_PGSR802_VEND_P" or "/DS1/FI_CR_REPT_PGSR802_VEND_P"
"GET_CLRD_VEN_DATA"
If you cannot solve the problem yourself, please send the
following documents to SAP:
1. A hard copy print describing the problem.
To obtain this, select the "Print" function on the current screen.
2. A suitable hardcopy prinout of the system log.
To obtain this, call the system log with Transaction SM21
and select the "Print" function to print out the relevant
part.
3. If the programs are your own programs or modified SAP programs,
supply the source code.
To do this, you can either use the "PRINT" command in the editor or
print the programs using the report RSINCL00.
4. Details regarding the conditions under which the error occurred
or which actions and input led to the error.
System environment
SAP Release.............. "620"
Application server....... "ztm1003"
Network address.......... "145.26.160.103"
Operating system......... "AIX"
Release.................. "5.3"
Hardware type............ "00C004DC4C00"
Character length......... 16 Bits
Pointer length........... 64 Bits
Work process number...... 6
Short dump setting....... "full"
Database server.......... "ztm1003"
Database type............ "ORACLE"
Database name............ "A94"
Database owner........... "SAPR3K"
Character set............ "C"
SAP kernel............... "640"
Created on............... "Aug 7 2005 20:44:35"
Created in............... "AIX 1 5 00538A4A4C00"
Database version......... "OCI_920 "
Patch level.............. "85"
Patch text............... " "
Supported environment....
Database................. "ORACLE 8.1.7.., ORACLE 9.2.0.., ORACLE
10.1.0.."
SAP database version..... "640"
Operating system......... "AIX 1 5, AIX 2 5, AIX 3 5"
User, transaction...
Client.............. 110
User................ "INBVI0"
Language key........ "E"
Transaction......... "SE38 "
Program............. "/DS1/FI_CR_REPT_PGSR802_VEND_P"
Screen.............. "SAPMSSY0 1000"
Screen line......... 6
Information on where terminated
The termination occurred in the ABAP program "/DS1/FI_CR_REPT_PGSR802_VEND_P"
in "GET_CLRD_VEN_DATA".
The main program was "/DS1/FI_CR_REPT_PGSR802_VEND_P ".
The termination occurred in line 503 of the source code of the (Include)
program "/DS1/FI_CR_REPT_PGSR802_VEND_P"
of the source code of program "/DS1/FI_CR_REPT_PGSR802_VEND_P" (when calling
the editor 5030).
Processing was terminated because the exception "CX_SY_OPEN_SQL_DB" occurred in
the
procedure "GET_CLRD_VEN_DATA" "(FORM)" but was not handled locally, not
declared in the
RAISING clause of the procedure.
The procedure is in the program "/DS1/FI_CR_REPT_PGSR802_VEND_P ". Its source
code starts in line 501
of the (Include) program "/DS1/FI_CR_REPT_PGSR802_VEND_P ".
Source code extract
004730 &----
004740 * get country names from t005t
004750 ----
004760 FORM get_country_names.
004770
004780 t_lfa1_land[] = t_lfa1[].
004790 SORT t_lfa1_land BY land1.
004800 DELETE ADJACENT DUPLICATES FROM t_lfa1_land COMPARING land1.
004810
004820 IF NOT t_lfa1_land[] IS INITIAL.
004830 SELECT land1
004840 landx
004850 INTO TABLE t_t005t
004860 FROM t005t
004870 FOR ALL ENTRIES IN t_lfa1_land
004880 WHERE spras = sy-langu AND
004890 land1 = t_lfa1_land-land1.
004900 REFRESH t_lfa1_land.
004910 SORT t_t005t BY land1.
004920 ELSE.
004930 MESSAGE i014 WITH 'No vendor data fetched'(001).
004940 ENDIF.
004950 ENDFORM. " get_country_names
004960 &----
004970 *& Form get_clrd_ven_data
004980 &----
004990 * Cleared vendor data
005000 ----
005010 FORM get_clrd_ven_data .
005020
> SELECT bukrs
005040 lifnr
005050 augdt
005060 augbl
005070 zuonr
005080 gjahr
005090 belnr
005100 buzei
005110 waers
005120 dmbtr
005130 wrbtr
005140 zlsch
005150 shkzg
005160 blart
005170 gsber
005180 sgtxt
005190 INTO TABLE t_bsak_tmp
005200 FROM bsak CLIENT SPECIFIED
005210 * the order of the fields are as in the secondary Index.
005220 WHERE mandt = sy-mandt AND
Contents of system fields
SY field contents..................... SY field contents.....................
SY-SUBRC 0 SY-INDEX 0
SY-TABIX 1 SY-DBCNT 59
SY-FDPOS 0 SY-LSIND 0
SY-PAGNO 0 SY-LINNO 1
SY-COLNO 1 SY-PFKEY
SY-UCOMM
SY-TITLE Vendor Payment Details for IRD
SY-MSGTY I SY-MSGID SF
SY-MSGNO 616 SY-MSGV1 /DS1/FI_CR_REPT_PGSR802_VEND_P
SY-MSGV2 RE SY-MSGV3 EN
SY-MSGV4
Active calls / events
No.... Type........ Name..........................
Program
Include Line
Class
2 FORM GET_CLRD_VEN_DATA
/DS1/FI_CR_REPT_PGSR802_VEND_P
/DS1/FI_CR_REPT_PGSR802_VEND_P 503
1 EVENT START-OF-SELECTION
/DS1/FI_CR_REPT_PGSR802_VEND_P
/DS1/FI_CR_REPT_PGSR802_VEND_P 135Hi Balaji,
Here is what the dump said and my answers are right below them.
<i>Possible errors:</i>
o The maximum size of an SQL statement has been exceeded.</i>
This may not be the reason in your case. This usually happens when you use the option FOR ALL ENTRIES
<i>o The statement contains too many input variables.</i>
Most likely this is your issue. I think your r_lifnr is filled with all the vendors in your system and filled as single values. In that case you may be exceeding a limit set on the system. Instead of trying to remove this setting, what I would suggest is to do the following.
Define a select-option for LIFNR on your selection screen. This way users can have the flexibility of specifying certain vendors. If they don't enter anything, it is still ok. Don't fill it with single values.
Use this select-option in your select statement. After the select statement, do a delete from itab where the vendors are not in your r_lifnr as below.
DELETE t_bsak_tmp WHERE NOT lifnr IN r_lifnr.
Also, avoid using client. You don't need that unless you really want to select from a different client other than your logon client. Your select statement is using logon client anyway, so you don't need to specify that.
<i>o The space needed for the input data exceeds the available memory.</i>
If the above changes are made and the problem is still there, then this is the next thing to look at.
Srinivas -
HI,
Runtime error in the below report as internal table IT_FIELDCAT is empty after the execution of FM
REUSE_ALV_FIELDCATALOG_MERGE.
Please tell me how do i rectify this error.
REPORT ZMY_ALV_COLORING_CELLS.
TYPE-POOLS SLIS.
DATA: BEGIN OF itab OCCURS 0,
BUKRS LIKE T001-BUKRS,
BUTXT LIKE T001-BUTXT,
END OF itab.
PARAMETERS: P_BUKRS TYPE TBUKRS.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_BUKRS.
PERFORM F4_FOR_BUKRS.
*& Form F4_FOR_BUKRS
FORM F4_FOR_BUKRS.
DATA: IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV ,
ES_SELFIELD TYPE SLIS_SELFIELD. " Get data
SELECT BUKRS
BUTXT
FROM T001
INTO TABLE itab
up to 10 rows .
Get field
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
EXPORTING
I_PROGRAM_NAME = SY-REPID
I_INTERNAL_TABNAME = 'ITAB'
CHANGING
CT_FIELDCAT = IT_FIELDCAT[].
LOOP AT IT_FIELDCAT.
IT_FIELDCAT-KEY = SPACE.
IF IT_FIELDCAT-FIELDNAME = 'BUTXT'.
IT_FIELDCAT-EMPHASIZE = 'C710'.
ENDIF.
IF IT_FIELDCAT-FIELDNAME = 'BUKRS'.
IT_FIELDCAT-EMPHASIZE = 'C610'.
ENDIF.
MODIFY IT_FIELDCAT.
ENDLOOP.
CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT'
EXPORTING
I_TITLE = 'THIS IS FOR F4 IN COLOR'
I_TABNAME = 'ITAB'
IT_FIELDCAT = IT_FIELDCAT[]
IMPORTING
ES_SELFIELD = ES_SELFIELD
TABLES
T_OUTTAB = ITAB .
Thanks,
Ahmed.Change like this
>
ahmed shaik wrote:
> HI,
>
> Runtime error in the below report as internal table IT_FIELDCAT is empty after the execution of FM
> REUSE_ALV_FIELDCATALOG_MERGE.
>
> Please tell me how do i rectify this error.
>
>
>
> REPORT ZMY_ALV_COLORING_CELLS.
> TYPE-POOLS SLIS.
>
> DATA: BEGIN OF itab OCCURS 0,
> BUKRS LIKE T001-BUKRS,
> BUTXT LIKE T001-BUTXT,
> END OF itab.
>
> PARAMETERS: P_BUKRS TYPE TBUKRS.
>
> AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_BUKRS.
>
>
> PERFORM F4_FOR_BUKRS.
> &----
> *& Form F4_FOR_BUKRS
> ----
> FORM F4_FOR_BUKRS.
>
> DATA: IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV ,
> ES_SELFIELD TYPE SLIS_SELFIELD. " Get data
>
> SELECT BUKRS
> BUTXT
> FROM T001
> INTO TABLE itab
> up to 10 rows .
> * Get field
>
> CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
> EXPORTING
> I_PROGRAM_NAME = SY-REPID
>* I_INTERNAL_TABNAME = 'ITAB'
> I_STRUCTURE_NAME = 'ITAB'
> CHANGING
> CT_FIELDCAT = IT_FIELDCAT[].
>
> LOOP AT IT_FIELDCAT.
> IT_FIELDCAT-KEY = SPACE.
> IF IT_FIELDCAT-FIELDNAME = 'BUTXT'.
> IT_FIELDCAT-EMPHASIZE = 'C710'.
> ENDIF.
> IF IT_FIELDCAT-FIELDNAME = 'BUKRS'.
> IT_FIELDCAT-EMPHASIZE = 'C610'.
> ENDIF.
>
> MODIFY IT_FIELDCAT.
> ENDLOOP.
>
> CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT'
> EXPORTING
> I_TITLE = 'THIS IS FOR F4 IN COLOR'
> I_TABNAME = 'ITAB'
> IT_FIELDCAT = IT_FIELDCAT[]
> IMPORTING
> ES_SELFIELD = ES_SELFIELD
> TABLES
> T_OUTTAB = ITAB .
>
>
>
>
>
> Thanks,
> Ahmed.
Rhea -
hi,
i HAD MADE A REPORET IN which i havce to display the bolck stock ,it is giving runtime error as i had added 1 more table,plzz help me out as it is really urgent to me. here is d code:-
*& Report ZDEMO_SMARTFORM_COPY
REPORT ZDEMO_SMARTFORM_COPY.
TABLES: MCHB,MARA,T001W.
DATA: BEGIN OF ITAB OCCURS 0,
ITEMID LIKE MARD-MATNR,
SPEME LIKE MARD-SPEME,
WERKS LIKE MARD-SPEME,
LGORT LIKE MARD-LGORT,
NTGEW LIKE MARA-NTGEW,
MEINS LIKE MARA-MEINS,
GEWEI LIKE MARA-GEWEI,
CHARG LIKE MCHB-CHARG,
WTKG LIKE MARA-NTGEW,
STOCK TYPE P LENGTH 10 DECIMALS 3,
DESC LIKE MAKT-MAKTX,
TOTWT LIKE MARD-SPEME,
WT TYPE P LENGTH 12 DECIMALS 3,
END OF ITAB.
ITEMID LIKE MCHB-MATNR,
CSPEM LIKE MCHB-CSPEM,
CHARG LIKE MCHB-CHARG,
WERKS LIKE MCHB-WERKS,
*PARAMETERS : PLANT LIKE MCHB-WERKS OBLIGATORY.
PARAMETERS : PLANT LIKE MARD-WERKS OBLIGATORY.
DATA : DESC LIKE MAKT-MAKTX.
SELECT AMATNR ASPEME AWERKS ALGORT BNTGEW BMEINS BGEWEI CCHARG FROM MARD AS A
INNER JOIN MARA AS B ON BMATNR = AMATNR
INNER JOIN MCHB AS C ON CMATNR = AMATNR
INTO TABLE ITAB WHERE AWERKS = PLANT AND ASPEME > 0.
SELECT AMATNR ACSPEM ACHARG AWERKS BNTGEW BMEINS B~GEWEI FROM MCHB AS A
INNER JOIN MARA AS B ON BMATNR = AMATNR
INTO TABLE ITAB WHERE AWERKS = PLANT AND ACSPEM > 0.
WRITE: / 'ITEMID DESCRIPTION STOCK.QTY BATCH NO. NETWT TOTAL.WEIGHT '.
ULINE.
LOOP AT ITAB.
IF ITAB-NTGEW <> 0 .
CALL FUNCTION 'ZGET_ITEM_WEIGHT'
EXPORTING
P_BUID = ITAB-WERKS
P_ITEMID = ITAB-ITEMID
P_QTY = ITAB-NTGEW
P_UOM = ITAB-GEWEI
P_UOM1 = 'KG'
IMPORTING
P_RETVAL = ITAB-WTKG.
ENDIF.
CONVERTING ITEM QTY IN KG
ITAB-WT = ITAB-STOCK.
IF ITAB-MEINS = 'G'.
ITAB-WT = ITAB-STOCK / 1000000.
ELSEIF ITAB-MEINS = 'KG'.
ITAB-WT = ITAB-STOCK / 1000.
ELSEIF ITAB-MEINS = 'TO'.
ITAB-WT = ITAB-STOCK * ITAB-WTKG / 1000.
ENDIF.
ITAB-TOTWT = ITAB-WTKG * ITAB-CSPEM.
ITAB-TOTWT = ITAB-WTKG * ITAB-SPEME.
SELECT SINGLE MAKTX FROM MAKT INTO DESC WHERE MATNR = ITAB-ITEMID.
WRITE:/ ITAB-ITEMID,15 DESC,50 ITAB-SPEME,ITAB-CHARG,ITAB-WTKG,ITAB-TOTWT.
MODIFY ITAB.
ENDLOOP.HI,
i had tried to ftech data from mard and it isgiving runtime error. dis is the code:-
TABLES: MCHB,MARA,MARD.
DATA: BEGIN OF ITAB OCCURS 0,
MATNR LIKE MARD-MATNR,
SPEME LIKE MARD-SPEME,
WERKS LIKE MARD-SPEME,
LGORT LIKE MARD-LGORT,
END OF ITAB.
SELECT MATNR SPEME WERKS LGORT FROM MARD INTO CORRESPONDING FIELDS OF TABLE ITAB.
LOOP AT ITAB.
WRITE:/ ITAB-MATNR,ITAB-SPEME,ITAB-WERKS,ITAB-LGORT.
ENDLOOP. -
Regarding Runtime error in ALV List Display.
am using following to display data in ALV List.
but after executing of program am getting runtime error called 'Field Symbol has Not been assigned' .
please tell me how to correct the error.
Very urgent
Suitable answers rewarded with Maximum Ponits...
REPORT zmatrix.
TYPE-POOLS: slis.
TABLES: agr_define, sza5_d0700.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-006.
SELECT-OPTIONS: s_role FOR agr_define-agr_name OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b1.
D A T A *
TYPES: BEGIN OF ty_agr_1251_inf,
agr_name TYPE agr_1251-agr_name,
object TYPE agr_1251-object,
field TYPE agr_1251-field,
low(20) TYPE c,
high TYPE agr_1251-high,
infty TYPE t582s-infty,
itext TYPE t582s-itext,
END OF ty_agr_1251_inf.
TYPES: BEGIN OF ty_agr_1251_tcode,
agr_name TYPE agr_1251-agr_name,
object TYPE agr_1251-object,
field TYPE agr_1251-field,
low(20) TYPE c,
high TYPE agr_1251-high,
tcode TYPE tstct-tcode,
ttext TYPE tstct-ttext,
END OF ty_agr_1251_tcode.
TYPES: BEGIN OF ty_t582s,
infty TYPE agval,
itext TYPE t582s-itext,
END OF ty_t582s.
TYPES: BEGIN OF ty_code,
tcode TYPE tstct-tcode,
ttext TYPE ttext_stct,
END OF ty_code.
TYPES: BEGIN OF ty_inf,
infty TYPE t582s-infty,
itext TYPE t582s-itext,
END OF ty_inf.
TYPES: BEGIN OF ty_role,
agr_name TYPE agr_1251-agr_name,
END OF ty_role.
TYPES: BEGIN OF tys_role_dtls,
agr_name TYPE agr_name,
value TYPE c,
property TYPE c,
END OF tys_role_dtls.
TYPES: BEGIN OF tys_infotype_final,
text(60),
text1(60),
value(4),
END OF tys_infotype_final.
I N T E R N A L T A B L E S *
DATA: wa_infotyp_final TYPE tys_infotype_final.
DATA: t_infotyp_final TYPE TABLE OF tys_infotype_final.
DATA: BEGIN OF wa_infotyp_dtls,
infty TYPE infty,
itext TYPE intxt,
role_dtls TYPE TABLE OF tys_role_dtls,
END OF wa_infotyp_dtls.
DATA: BEGIN OF wa_tcode_dtls,
tcode TYPE tcode,
ttext TYPE ttext_stct,
role_dtls TYPE TABLE OF tys_role_dtls,
END OF wa_tcode_dtls.
DATA: t_infotyp_dtls LIKE TABLE OF wa_infotyp_dtls,
t_tcode_dtls LIKE TABLE OF wa_tcode_dtls,
t_role_dtls TYPE TABLE OF tys_role_dtls,
wa_role_dtls TYPE tys_role_dtls.
DATA: wa_inf TYPE ty_inf,
t_inf TYPE STANDARD TABLE OF ty_inf.
DATA: wa_role TYPE ty_role,
t_role TYPE STANDARD TABLE OF ty_role.
DATA: wa_tcode TYPE ty_code,
t_tcode TYPE TABLE OF ty_code.
DATA: wa_agr_1251_inf TYPE ty_agr_1251_inf.
DATA: wa_agr_1251_tcode TYPE ty_agr_1251_tcode.
DATA: t_agr_1251_inf TYPE STANDARD TABLE OF ty_agr_1251_inf.
DATA: t_agr_1251_tc TYPE STANDARD TABLE OF ty_agr_1251_tcode.
DATA: wa_582s TYPE ty_t582s.
DATA: t_582s TYPE STANDARD TABLE OF ty_t582s.
DATA: t_range_tcode TYPE RANGE OF tcode.
DATA: t_range_inf TYPE RANGE OF infotyp.
DATA: wa_range_inf LIKE LINE OF t_range_inf.
DATA: wa_range_tcode LIKE LINE OF t_range_tcode.
DATA: wa_field TYPE slis_fieldcat_alv.
DATA: t_field TYPE slis_t_fieldcat_alv.
VARIABLES FOR OLE *
DATA: text(20),
count(20).
DATA: text1(30).
DATA: agr_name TYPE agr_1251-agr_name.
DATA: flag TYPE i VALUE '0'.
DATA: string1 TYPE string.
DATA: str TYPE string VALUE 'SAP%'.
DATA: count1 TYPE i VALUE '0'.
*& Event START-OF-SELECTION
START-OF-SELECTION.
PERFORM f100_get_inf_data.
PERFORM f200_process_inf_data.
count1 = 1.
PERFORM f300_prepare_field_catalog.
PERFORM f110_main_data.
PERFORM f400_display_data.
PERFORM f100_get_trans_data.
*& Form f110_main_data
text
FORM f110_main_data.
wa_infotyp_final-text = 'Access to Infotypes'.
APPEND wa_infotyp_final TO t_infotyp_final.
wa_infotyp_final-text = 'Infotype'.
wa_infotyp_final-text1 = 'Description'.
APPEND wa_infotyp_final TO t_infotyp_final.
wa_infotyp_final-text = '*'.
wa_infotyp_final-text1 = 'Acess to all Infotypes'.
LOOP AT t_role INTO wa_role WHERE agr_name <> ' '.
READ TABLE t_agr_1251_inf INTO wa_agr_1251_inf
WITH KEY agr_name = wa_role-agr_name field = 'INFTY' low = '*'.
IF syst-subrc = 0.
wa_infotyp_final-value = 'X'.
ENDIF.
ENDLOOP.
APPEND wa_infotyp_final TO t_infotyp_final.
LOOP AT t_inf INTO wa_inf WHERE infty <> ' '.
wa_infotyp_final-text = wa_inf-infty.
wa_infotyp_final-text1 = wa_inf-itext.
LOOP AT t_role INTO wa_role WHERE agr_name <> ' '.
Role Name
CLEAR wa_role_dtls.
flag = 1.
wa_role_dtls-agr_name = wa_role-agr_name.
For Value D & F
READ TABLE t_agr_1251_inf INTO wa_agr_1251_inf
WITH KEY agr_name = wa_role-agr_name field = 'AUTHC'..
IF syst-subrc EQ 0.
IF wa_agr_1251_inf-low = 'R'.
wa_infotyp_final-value = 'D'.
ELSE.
wa_infotyp_final-value = 'F'.
ENDIF.
ENDIF.
APPEND wa_role_dtls TO t_role_dtls.
APPEND wa_infotyp_final TO t_infotyp_final.
ENDLOOP.
ENDLOOP.
ENDFORM. "f110_main_data
*& Form f100_get_inf_data
text
FORM f100_get_inf_data.
Logic for Infotypes *
SELECT aagr_name aobject
afield alow a~high
INTO TABLE t_agr_1251_inf
FROM agr_1251 AS a INNER JOIN agr_define AS b
ON aagr_name EQ bagr_name
WHERE ( ( aobject EQ 'P_ORGIN' OR aobject EQ 'P_PERNR' )
AND ( aagr_name IN s_role ) AND ( bagr_name NOT LIKE str ) ).
ENDFORM. "f100_get_inf_data
*& Form f200_get_inf_process_data
text
FORM f200_process_inf_data.
LOOP AT t_agr_1251_inf INTO wa_agr_1251_inf.
IF wa_agr_1251_inf-high IS INITIAL.
CLEAR wa_range_inf.
wa_range_inf-sign = 'I'.
wa_range_inf-option = 'EQ'.
wa_range_inf-low = wa_agr_1251_inf-low.
APPEND wa_range_inf TO t_range_inf.
ELSE.
CLEAR wa_range_inf.
wa_range_inf-sign = 'I'.
wa_range_inf-option = 'BT'.
wa_range_inf-low = wa_agr_1251_inf-low.
wa_range_inf-high = wa_agr_1251_inf-high.
APPEND wa_range_inf TO t_range_inf.
ENDIF.
ENDLOOP.
SORT t_range_inf.
DELETE ADJACENT DUPLICATES FROM t_range_inf.
IF t_range_inf IS NOT INITIAL.
SELECT infty itext FROM t582s
INTO TABLE t_582s
WHERE sprsl = 'EN' AND infty IN t_range_inf.
IF syst-subrc EQ 0.
ENDIF.
ENDIF.
LOOP AT t_agr_1251_inf INTO wa_agr_1251_inf.
IF wa_agr_1251_inf-high IS INITIAL.
READ TABLE t_582s INTO wa_582s
WITH KEY infty = wa_agr_1251_inf-low.
IF syst-subrc EQ 0.
wa_agr_1251_inf-infty = wa_582s-infty.
wa_agr_1251_inf-itext = wa_582s-itext.
MODIFY t_agr_1251_inf FROM wa_agr_1251_inf
TRANSPORTING infty itext.
IF syst-subrc EQ 0.
ENDIF.
ENDIF.
ELSE.
CLEAR count.
LOOP AT t_582s INTO wa_582s
WHERE infty GE wa_agr_1251_inf-low
AND infty LE wa_agr_1251_inf-high.
IF count LE 1.
wa_agr_1251_inf-high = space.
wa_agr_1251_inf-infty = wa_582s-infty.
wa_agr_1251_inf-itext = wa_582s-itext.
MODIFY t_agr_1251_inf FROM wa_agr_1251_inf
TRANSPORTING infty itext.
IF syst-subrc EQ 0.
CLEAR wa_582s.
ENDIF.
ELSE.
wa_agr_1251_inf-high = space.
wa_agr_1251_inf-infty = wa_582s-infty.
wa_agr_1251_inf-itext = wa_582s-itext.
APPEND wa_agr_1251_inf TO t_agr_1251_inf.
ENDIF.
CLEAR wa_agr_1251_inf.
count = count + 1.
ENDLOOP.
ENDIF.
ENDLOOP.
wa_role-agr_name = ' '.
APPEND wa_role TO t_role.
wa_role-agr_name = ' '.
APPEND wa_role TO t_role.
LOOP AT t_agr_1251_inf INTO wa_agr_1251_inf.
IF wa_agr_1251_inf IS NOT INITIAL.
wa_role-agr_name = wa_agr_1251_inf-agr_name.
wa_inf-infty = wa_agr_1251_inf-infty.
wa_inf-itext = wa_agr_1251_inf-itext.
APPEND wa_role TO t_role.
APPEND wa_inf TO t_inf.
ENDIF.
ENDLOOP.
SORT t_role BY agr_name.
DELETE ADJACENT DUPLICATES FROM t_role.
SORT t_inf BY infty.
DELETE ADJACENT DUPLICATES FROM t_inf.
ENDFORM. "f200_get_process_inf_data
*& Form f100_get_trans_data
text
FORM f100_get_trans_data.
Logic for Transaction Codes *
SELECT aagr_name aobject
afield alow a~high
INTO CORRESPONDING FIELDS OF TABLE t_agr_1251_tc
FROM agr_1251 AS a
INNER JOIN agr_define AS b ON aagr_name EQ bagr_name
WHERE a~agr_name IN s_role
AND a~object EQ 'S_TCODE'.
ENDFORM. "f100_get_trans_data
*& Form f200_process_trans_data
text
FORM f200_process_trans_data.
LOOP AT t_agr_1251_tc INTO wa_agr_1251_tcode.
IF wa_agr_1251_tcode-high IS INITIAL.
CLEAR wa_range_tcode.
wa_range_tcode-sign = 'I'.
wa_range_tcode-option = 'EQ'.
wa_range_tcode-low = wa_agr_1251_tcode-low.
APPEND wa_range_tcode TO t_range_tcode.
ELSE.
CLEAR wa_range_tcode.
wa_range_tcode-sign = 'I'.
wa_range_tcode-option = 'BT'.
wa_range_tcode-low = wa_agr_1251_tcode-low.
wa_range_tcode-high = wa_agr_1251_tcode-high.
APPEND wa_range_tcode TO t_range_tcode.
ENDIF.
ENDLOOP.
SORT t_range_tcode.
DELETE ADJACENT DUPLICATES FROM t_range_tcode.
IF t_range_tcode IS NOT INITIAL.
SELECT tcode
ttext
FROM tstct
INTO TABLE t_tcode
WHERE sprsl EQ 'E'
AND tcode IN t_range_tcode.
IF sy-subrc EQ 0.
ENDIF.
ENDIF.
SORT t_agr_1251_tc BY agr_name.
LOOP AT t_agr_1251_tc INTO wa_agr_1251_tcode.
IF wa_agr_1251_tcode-high IS INITIAL.
READ TABLE t_tcode INTO wa_tcode
WITH KEY tcode = wa_agr_1251_tcode-low.
IF syst-subrc EQ 0.
wa_agr_1251_tcode-tcode = wa_tcode-tcode.
wa_agr_1251_tcode-ttext = wa_tcode-ttext.
MODIFY t_agr_1251_tc FROM wa_agr_1251_tcode
TRANSPORTING tcode ttext.
IF syst-subrc EQ 0.
ENDIF.
ENDIF.
ELSE.
CLEAR count.
LOOP AT t_tcode INTO wa_tcode
WHERE tcode GE wa_agr_1251_tcode-low
AND tcode LE wa_agr_1251_tcode-high.
IF count LE 1.
agr_name = wa_agr_1251_tcode-agr_name.
wa_agr_1251_tcode-high = space.
wa_agr_1251_tcode-tcode = wa_tcode-tcode.
wa_agr_1251_tcode-ttext = wa_tcode-ttext.
MODIFY t_agr_1251_tc FROM wa_agr_1251_tcode
TRANSPORTING tcode ttext high.
IF syst-subrc EQ 0.
CLEAR wa_tcode.
ENDIF.
count = 1.
ELSE.
wa_agr_1251_tcode-high = space.
wa_agr_1251_tcode-agr_name = agr_name.
wa_agr_1251_tcode-low = wa_tcode-tcode.
wa_agr_1251_tcode-tcode = wa_tcode-tcode.
wa_agr_1251_tcode-ttext = wa_tcode-ttext.
APPEND wa_agr_1251_tcode TO t_agr_1251_tc.
ENDIF.
CLEAR wa_agr_1251_tcode.
count = count + 1.
ENDLOOP.
ENDIF.
ENDLOOP.
LOOP AT t_agr_1251_tc INTO wa_agr_1251_tcode.
wa_role-agr_name = wa_agr_1251_tcode-agr_name.
APPEND wa_role TO t_role.
ENDLOOP.
SORT t_role BY agr_name.
DELETE ADJACENT DUPLICATES FROM t_role.
SORT t_tcode BY tcode.
DELETE ADJACENT DUPLICATES FROM t_tcode.
ENDFORM. "f200_process_trans_data
*& Form f100_prepare_field_catalog
text
FORM f300_prepare_field_catalog.
LOOP AT t_role INTO wa_role.
wa_field-col_pos = count1.
wa_field-fieldname = wa_role-agr_name.
APPEND wa_field TO t_field.
count1 = count1 + 1.
ENDLOOP.
ENDFORM. "f100_prepare_field_catalog
*& Form f100_display_data
text
FORM f400_display_data.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
I_BYPASSING_BUFFER =
I_BUFFER_ACTIVE = ' '
i_callback_program = sy-cprog
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
I_STRUCTURE_NAME =
IS_LAYOUT =
it_fieldcat = t_field[]
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT =
IT_FILTER =
IS_SEL_HIDE =
I_DEFAULT = 'X'
I_SAVE = ' '
IS_VARIANT =
IT_EVENTS =
IT_EVENT_EXIT =
IS_PRINT =
IS_REPREP_ID =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
IR_SALV_LIST_ADAPTER =
IT_EXCEPT_QINFO =
I_SUPPRESS_EMPTY_DATA = ABAP_FALSE
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
TABLES
t_outtab = t_infotyp_final[]
EXCEPTIONS
program_error = 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.
ENDFORM. "f100_display_datathis are the wasy u can build a field catalog...
1.----
FORM fill_fieldcat .
DATA: fld(30),
idx(2) TYPE n.
DEFINE no_output.
fieldcatalog-fieldname = &1.
fieldcatalog-no_out = 'X'.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
END-OF-DEFINITION.
DEFINE catalog.
fieldcatalog-fieldname = &1.
fieldcatalog-seltext_s = &2.
if not &3 is initial.
fieldcatalog-seltext_m = &3.
else.
fieldcatalog-seltext_m = fieldcatalog-seltext_s.
endif.
if not &4 is initial.
fieldcatalog-seltext_l = &4.
else.
fieldcatalog-seltext_l = fieldcatalog-seltext_m.
endif.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
END-OF-DEFINITION.
catalog 'AVAIL_BASE'
'Base Qty.'
'Base Qty. Available'
'Base Quantity Available'.
catalog 'AVAIL_SALES'
'Sales Qty.'
'Sales Qty. Available'
'Sales Quantity Available'.
LOOP AT t_char_data.
idx = sy-tabix.
CONCATENATE 'CHR' idx INTO fld.
catalog fld
t_char_data-atbez
t_char_data-atbez
t_char_data-atbez.
ENDLOOP.
ADD 1 TO idx.
WHILE idx LE 15.
CONCATENATE 'CHR' idx INTO fld.
no_output fld.
ADD 1 TO idx.
ENDWHILE..
fieldcatalog-fieldname = 'EXACT'.
fieldcatalog-checkbox = 'X'.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
2.----
FORM fieldcatalog.
REFRESH fc. CLEAR fc.
fc-tabname = 'HEADER'.
fc-fieldname = 'KUNNR'.
fc-ref_tabname = 'MSKU'.
APPEND fc. CLEAR fc.
fc-tabname = 'HEADER'.
fc-fieldname = 'NAME1_K'.
fc-ref_tabname = 'KNA1'.
fc-ref_fieldname = 'NAME1'.
APPEND fc. CLEAR fc.
fc-tabname = 'HEADER'.
fc-fieldname = 'TOTAL'.
fc-ref_tabname = 'MBEW'.
fc-ref_fieldname = 'SALK3'.
APPEND fc. CLEAR fc.
fc-tabname = 'LIST'.
fc-fieldname = 'MATNR'.
fc-ref_tabname = 'MSKU'.
APPEND fc. CLEAR fc.
fc-tabname = 'LIST'.
fc-fieldname = 'MAKTX'.
fc-ref_tabname = 'MAKT'.
fc-no_out = 'X'.
APPEND fc. CLEAR fc.
fc-tabname = 'LIST'.
fc-fieldname = 'CHARG'.
fc-ref_tabname = 'MSKU'.
APPEND fc. CLEAR fc.
fc-tabname = 'LIST'.
fc-fieldname = 'WERKS'.
fc-ref_tabname = 'MSKU'.
fc-no_out = 'X'.
APPEND fc. CLEAR fc.
fc-tabname = 'LIST'.
fc-fieldname = 'NAME1_W'.
fc-ref_tabname = 'T001W'.
fc-ref_fieldname = 'NAME1'.
fc-no_out = 'X'.
APPEND fc. CLEAR fc. -
I do not have a problem getting in the iTunes stores. My issue is once on the site I can not use the "search". It says there is a pure virtual function call R6025. How can I solve this problem? Do I have to create a new account? Do I have to uninstall and re-install? Thanks
Thanks so much for your feedback. I really appreciate any input here.
If someone from Adobe could GUARANTEE that this problem would go away if I
purchased CS4, I would pony up the cash and do it. However, I'm skeptical
about that because I just saw someone else post a message on the forum today
who is running CS4 and getting the exact same runtime error as me.
I'll try un-installing and re-installing as Admin, and if that doesn't work,
maybe I can find a used copy of CS3.
In the meantime, I'm also wondering if a Photoshop file can carry any sort
of corrupt metadata inside it once it has errored out? Reason I ask is, I
had to port all of my old PSD files to the new computer, and I only seem to
be getting this error when I attempt to work on one of the files that
previously got the runtime error when they were sitting on my XP machine.
When I create new files from scratch on this new computer, they seem to be
working just fine (at least, for now).
If so, I would probably be smart to never open those troublesome
"errored-out" files again. -
Runtime error while opening stucture tab in Functional Location..
Dear All,
Whenever I'm trying to open the structure tab of functional location I'm getting the runtime error and the message is as follws..
Run time error TIME_OUT
Time Limit Exceeded
The program " SAPLIE01" has exceeded the maximum permitted runtime without interruption and has therefore been terminated
Error Analysis
After specific time,the program is terminated to make the work area available to other users who may be waiting
I did not understand the reason for it....
Any can throw light on this...
Thanks in Advance
JohnsonDear
This problem is occuring due to your transactions has so many datas in output. So that system is providing the error. In each sap log in you can control the maximum idle hours at Option header menu at Main menu.
Else you get the Abaper+Basis for the help. There is no error in functional side for sort out. -
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 -
Hi Experts
I am trying to create a sales order using BAPI FM BAPI_SALESORDER_CREATEFROMDAT1. After executing the program it shows in output screen that the sales order created and also displays the newly created sales order number. But when I want to check the order from VA03 it shows Express document "Update was terminated" received by author AAA, where AAA is login name.
I also analysis the sort dump for which the update process was terminated. I give the error details
Runtime Errors DBIF_RSQL_INVALID_REQUES
Error analysis
An invalid request was made to the SAP database interface in a statement
in which the table "KONV " was accessed.
Below are the module name and report from where the error is coming.
Function Module name RV_SALES_DOCUMENT_ADD
Program Name SAPLV45U
Include LV45UF0K
Row 26
Source code from Rruntime Error
Line SourceCde
1 *****************************************************************
2 * Unterroutinen RV-Auftragsabwicklung alphabetisch sortiert:
3 * ----------------------------------------------------------
4 * Buchstabe K:
5 *
6 *****************************************************************
7
8 *----------------------------------------------------------------
9 * FORM KONV_BEARBEITEN
10 *----------------------------------------------------------------
11 FORM KONV_BEARBEITEN.
12
13 CHECK: FKONV_GEAENDERT NE SPACE OR
14 VORGANG = CHARH.
15
16 IF VORGANG NE 'H'.
17 DELETE FROM KONV WHERE KNUMV = VBAK-KNUMV.
18 ENHANCEMENT-POINT KONV_BEARBEITEN_10 SPOTS ES_SAPLV45U.
19 ENDIF.
20
21 LOOP AT FXKOMV.
22 FXKOMV-MANDT = VBAK-MANDT.
23 FXKOMV-KNUMV = VBAK-KNUMV.
24 MODIFY FXKOMV.
25 ENDLOOP.
>>>>> INSERT KONV FROM TABLE FXKOMV.
27 IF SY-SUBRC NE 0.
28 MESSAGE A100 WITH
29 ENDIF.
30
31 ENHANCEMENT-POINT KONV
32 ENDFORM.
33 *eject
Below is my source code.
*& Report Z_BAPI_SALESORDER
REPORT z_bapi_salesorder.
* Sales document type
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) v_text FOR FIELD p_auart.
PARAMETERS: p_auart TYPE auart OBLIGATORY.
SELECTION-SCREEN END OF LINE.
* Sales organization
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) v_text1 FOR FIELD p_vkorg.
PARAMETERS: p_vkorg TYPE vkorg OBLIGATORY.
SELECTION-SCREEN END OF LINE.
* Distribution channel
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) v_text2 FOR FIELD p_vtweg.
PARAMETERS: p_vtweg TYPE vtweg OBLIGATORY.
SELECTION-SCREEN END OF LINE.
* Division.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) v_text3 FOR FIELD p_spart.
PARAMETERS: p_spart TYPE spart OBLIGATORY.
SELECTION-SCREEN END OF LINE.
SKIP 1.
* Sold-to
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) v_text4 FOR FIELD p_sold.
PARAMETERS: p_sold TYPE kunnr OBLIGATORY.
SELECTION-SCREEN END OF LINE.
* Ship-to
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) v_text5 FOR FIELD p_ship.
PARAMETERS: p_ship TYPE kunnr.
SELECTION-SCREEN END OF LINE.
SKIP 1.
* Material
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) v_text6 FOR FIELD p_matnr.
PARAMETERS: p_matnr TYPE matnr OBLIGATORY.
SELECTION-SCREEN END OF LINE.
* Quantity.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) v_text7 FOR FIELD p_menge.
PARAMETERS: p_menge TYPE dzmengc OBLIGATORY.
SELECTION-SCREEN END OF LINE.
* Plant
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) v_text9 FOR FIELD p_plant.
PARAMETERS: p_plant TYPE werks_d OBLIGATORY.
SELECTION-SCREEN END OF LINE.
* Data declarations.
DATA: v_vbeln LIKE vbak-vbeln.
DATA: header LIKE bapisdhead.
DATA: headerx LIKE bapisdhead1x.
DATA: item LIKE bapiitemin OCCURS 0 WITH HEADER LINE.
DATA: itemx LIKE bapisditemx OCCURS 0 WITH HEADER LINE.
DATA: partner LIKE bapipartnr OCCURS 0 WITH HEADER LINE.
DATA: return LIKE bapireturn1 OCCURS 0 WITH HEADER LINE.
DATA: lt_schedules_inx TYPE STANDARD TABLE OF bapischdlx
WITH HEADER LINE.
DATA: lt_schedules_in TYPE STANDARD TABLE OF bapisdhedu
WITH HEADER LINE.
* Initialization.
INITIALIZATION.
v_text = 'Order type'.
v_text1 = 'Sales Org'.
v_text2 = 'Distribution channel'.
v_text3 = 'Division'.
v_text4 = 'Sold-to'.
v_text5 = 'Ship-to'.
v_text6 = 'Material'.
v_text7 = 'Quantity'.
v_text9 = 'Plant'.
* Start-of-selection.
START-OF-SELECTION.
* Header data
* Sales document type
header-doc_type = p_auart.
headerx-doc_type = 'X'.
* Sales organization
header-sales_org = p_vkorg.
headerx-sales_org = 'X'.
* Distribution channel
header-distr_chan = p_vtweg.
headerx-distr_chan = 'X'.
* Division
header-division = p_spart.
headerx-division = 'X'.
headerx-updateflag = 'I'.
* Partner data
* Sold to
partner-partn_role = 'AG'.
partner-partn_numb = p_sold.
APPEND partner.
* Ship to
partner-partn_role = 'WB'.
partner-partn_numb = p_ship.
APPEND partner.
* ITEM DATA
itemx-updateflag = 'I'.
* Line item number.
item-itm_number = '000010'.
itemx-itm_number = 'X'.
* Material
item-material = p_matnr.
itemx-material = 'X'.
* Plant
item-plant = p_plant.
itemx-plant = 'X'.
* Quantity
item-target_qty = p_menge.
itemx-target_qty = 'X'.
APPEND item.
APPEND itemx.
* Fill schedule lines
lt_schedules_in-itm_number = '000010'.
lt_schedules_in-sched_line = '0001'.
lt_schedules_in-req_qty = p_menge.
APPEND lt_schedules_in.
* Fill schedule line flags
lt_schedules_inx-itm_number = '000010'.
lt_schedules_inx-sched_line = '0001'.
lt_schedules_inx-updateflag = 'X'.
lt_schedules_inx-req_qty = 'X'.
APPEND lt_schedules_inx.
CALL FUNCTION 'BAPI_SALESORDER_CREATEFROMDAT1'
EXPORTING
order_header_in = header
* WITHOUT_COMMIT = ' '
* CONVERT_PARVW_AUART = ' '
IMPORTING
salesdocument = v_vbeln
* SOLD_TO_PARTY =
* SHIP_TO_PARTY =
* BILLING_PARTY =
* RETURN =
TABLES
order_items_in = item
order_partners = partner
* ORDER_ITEMS_OUT =
* ORDER_CFGS_REF =
* ORDER_CFGS_INST =
* ORDER_CFGS_PART_OF =
* ORDER_CFGS_VALUE =
* ORDER_CCARD =
* ORDER_CFGS_BLOB =
order_schedule_ex = lt_schedules_in
* Check the return table.
IF v_vbeln <> space.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
WRITE: / 'Document ', v_vbeln, ' created'.
ELSE.
WRITE: / 'Error in creating document'.
ENDIF.
I am unable to trace the exact reason. Please help and thanks in advance.
Edited by: Joy Banerjee on Oct 12, 2009 7:47 AMHi Prashant,
Set the profile parameter abap/buffersize value to maximum.Get the virtual memory increased.
If it doesn't work, see in transaction db02 if there is sufficient tablespace.
Let me knoe the status of tablespaces.
Regards,
Sabita -
Runtime error while executing ALV
Hi all,
I have implemented an ALV in OOPS concept and whenevr I am executing it I am getting a runtime error as GET WA NOT ASSIGNED
Error analysis:
You attempted to access an unassigned field symbol
(data segment 32821).
This error may occur if
- You address a typed field symbol before it has been set with
ASSIGN
- You address a field symbol that pointed to the line of an
internal table that was deleted
- You address a field symbol that was previously reset using
UNASSIGN or that pointed to a local field that no
longer exists
- You address a global function interface, although the
respective function module is not active - that is, is
not in the list of active calls. The list of active calls
can be taken from this short dump.
Trigger Location of Runtime Error
Program SAPLSLVC
Include LSLVCF36
Row 3.231
Module type (FORM)
Module Name FILL_DATA_TABLE
3201 alv_style_align_center_top.
3202 endif.
3203
3204 append ls_lvc_data to ct_lvc_data.
3205 endif.
3206
3207 ************************************
3208 * Column per Fieldcat Entry
3209 ************************************
3210 loop at it_fcat_local assigning <ls_fcat>.
3211 clear: ls_lvc_data-href_hndl,
3212 ls_lvc_data-drdn_hndl,
3213 ls_lvc_data-style,
3214 ls_lvc_data-style2,
3215 ls_lvc_data-style3,
3216 ls_lvc_data-style4,
3217 ls_lvc_data-maxlen.
3218
3219 clear: lt_color_lvc, lt_color_slis.
3220
3221 add 1 to ls_lvc_data-col_pos.
3222
3223 if not <ls_fcat>-indx_field is initial.
3224 assign component <ls_fcat>-indx_field
3225 of structure <ls_data> to <l_field_value>.
3226 else.
3227 assign component <ls_fcat>-fieldname
3228 of structure <ls_data> to <l_field_value>.
3229 endif.
3230
>>>> macro_cell_data_get
3232 <ls_fcat>
3233 <ls_data>
3234 <l_field_value>
3235 ls_lvc_data-value.
3236
3237 *>>> new API
3238 if ir_salv_adapter is bound.
3239 clear ls_lvc_data-style.
3240
3241 * color
3242 if g_gui_type ne 1.
3243 if <ls_fcat>-key eq abap_true.
3244 ls_lvc_data-style = alv_style_color_int_key.
3245 elseif l_style_color is initial
3246 and ( <ls_fcat>-emphasize is initial or
3247 <ls_fcat>-emphasize = '$' ).
3248 if <ls_stin>-counter is initial.
3249 ls_lvc_data-style = alv_style_color_normal.
3250 else.
Please help me to sort out this issueFORM s_build_fldctlg .
v_repid = sy-repid.
DATA lw_fldctlg TYPE lvc_s_fcat.
REFRESH i_fldctlg[].
v_cpos = 0.
* Column 1
lw_fldctlg-col_pos = v_cpos.
lw_fldctlg-row_pos = c_1.
lw_fldctlg-ref_table = 'I_OUTPUT'.
lw_fldctlg-fieldname = c_unlpt.
lw_fldctlg-coltext = 'Unloading Point'. "Unloading Point
APPEND lw_fldctlg TO i_fldctlg.
CLEAR lw_fldctlg.
* Column 2
v_cpos = v_cpos + 1.
lw_fldctlg-col_pos = v_cpos.
lw_fldctlg-row_pos = c_1.
lw_fldctlg-ref_table = 'I_OUTPUT'.
lw_fldctlg-fieldname = c_vdrloc. "Vendor Location
lw_fldctlg-coltext = text-003.
APPEND lw_fldctlg TO i_fldctlg.
CLEAR lw_fldctlg.
* Column 3
v_cpos = v_cpos + 1.
lw_fldctlg-col_pos = v_cpos.
lw_fldctlg-row_pos = c_1.
lw_fldctlg-ref_table = 'I_OUTPUT'.
lw_fldctlg-fieldname = c_nopkgs. "No of packages
lw_fldctlg-coltext = text-004.
APPEND lw_fldctlg TO i_fldctlg.
CLEAR lw_fldctlg.
* Column 4
v_cpos = v_cpos + 1.
lw_fldctlg-col_pos = v_cpos.
lw_fldctlg-row_pos = c_1.
lw_fldctlg-ref_table = 'I_OUTPUT'.
lw_fldctlg-fieldname = c_delnote. "Delivery Note
lw_fldctlg-coltext = text-005.
APPEND lw_fldctlg TO i_fldctlg.
CLEAR lw_fldctlg.
* Column 5
v_cpos = v_cpos + 1.
lw_fldctlg-col_pos = v_cpos.
lw_fldctlg-row_pos = c_1.
lw_fldctlg-ref_table = 'I_OUTPUT'.
lw_fldctlg-fieldname = c_reason. "Reason
lw_fldctlg-coltext = text-006.
APPEND lw_fldctlg TO i_fldctlg.
CLEAR lw_fldctlg.
* Column 6
v_cpos = v_cpos + 1.
lw_fldctlg-col_pos = v_cpos.
lw_fldctlg-row_pos = c_1.
lw_fldctlg-ref_table = 'I_OUTPUT'.
lw_fldctlg-fieldname = c_status.
lw_fldctlg-coltext = text-007.
APPEND lw_fldctlg TO i_fldctlg.
CLEAR lw_fldctlg.
ENDFORM. " S_BUILD_FLDCTLG
This is my code.
When i execute it without any values in my final table the ALV is getting displayed.
But when I put some data in the final table I am getting this error -
Runtime error SAPSQL_ARRAY_INSERT_DUPREC during migo
Hi Friends,
When I try doing MIGO with reference to a PO and save the document it gives me runtime error SAPSQL_ARRAY_INSERT_DUPREC.
I have check the buffer, and the no. range everything is perfect, but still i am getting this error.
Can anyone please give me the possible solution for this. Is there any SAP note that I need to apply.
Regards,
Wasim.Hello Wasim,
The common cause of this termination is the material document
number range as per note 31793 - SAPSQL_ARRAY_INSERT_DUPREC.
So please check if the current numbers are synchronized with the
database tables:
OMBT trx x MKPF table
OMH6 trx x EKKO table
If it has the same number range the sort dump should not be raised
anymore.
The main root causes are:
-> when you are transporting number ranges from one client to another;
-> when you face a shut down in your system and you have defined a
buffer application server tolerance in transaction SNRO;
-> when you are doing the posting by using BAPI's and for some reason
the BAPI failed.
I hope it helps you.
Best Regards,
Fábio Almeida
MM Consultant -
SAPSQL_ARRAY_INSERT_DUPREC - ABAP runtime error
Dear Experts,
I am getting a abap dump.
Runtime Errors SAPSQL_ARRAY_INSERT_DUPREC
Exception CX_SY_OPEN_SQL_DB
Error analysis |
An exception occurred that is explained in detail below.
The exception, which is assigned to class 'CX_SY_OPEN_SQL_DB', was not caught
in procedure "BAL_DB_INTERNAL_NO_UPDATE_TASK" "(FUNCTION)", nor was it propagated
by a RAISING clause.
Since the caller of the procedure could not have anticipated that the exception would occur, the current program is terminated. The reason for the exception is: If you use an ABAP/4 Open SQL array insert to insert a record in the database and that record already exists with the same key, this results in a termination.
Information on where terminated
(With an ABAP/4 Open SQL single record insert in the same error
situation, processing does not terminate, but SY-SUBRC is set to 4.)
Termination occurred in the ABAP program "SAPLSBAL_DB_INTERNAL" - in
"BAL_DB_INTERNAL_NO_UPDATE_TASK". The main program was "SWNCCOLL ".
In the source code you have the termination point in line 64
of the (Include) program "LSBAL_DB_INTERNALU02".
The program "SAPLSBAL_DB_INTERNAL" was started as a background job.
Job Name....... "SAP_COLLECTOR_FOR_PERFMONITOR"
Job Initiator.. "SAPADMIN"
Job Number..... 16160100
The termination is caused because exception "CX_SY_OPEN_SQL_DB" occurred in
procedure "BAL_DB_INTERNAL_NO_UPDATE_TASK" "(FUNCTION)", but it was neither
handled locally nor declared
in the RAISING clause of its signature.
The procedure is in program "SAPLSBAL_DB_INTERNAL "; its source code begins in
line
1 of the (Include program "LSBAL_DB_INTERNALU02 ".
Please give me your suggestions to sort out this problem
Thanks in advance
VenkatCheck note 196113 it contains the solution to your problem.
Most of the time this issue is due to a mismatch between the last assigned log number in table BALHDR and the one in the number range object. -
Runtime Error in File Preview of RH7 - Immediate help needed!
Dear all,
we're working on a RoboHelp 7 project under version control.
Today we encountered a major issue with ur project/database. When opening files in the preview window, they are displayed without error. As soon you click on a link within this file that leads to another HTML file, you get a pop-up with a runtime error message. You're asked either to debug or not. Selecting no displays a second runtime error with the same question. After also declining, you get to the selected HTML file.
We have two major sorts of files: Chapter overview pages and topic files. Both are based on the same Style Sheet (CSS) and template. For the overview files the layout is just changed a bit when you create the file. Further there are some extra files don't use the template.
Now I recognized some kind of logic:
- When you open an overview-file, the two pop-ups always refer to runtime errors in line 46 and 49.
- When you open a topic file, the two pop-ups always refer to runtime errors in line 50 and 53.
- When you open a file that is blank and not based on the template, there's no error.
Until now, the error never occured. But since today (or maybe last week und we didn't recognize), this error comes up even for files that were created months ago and never had an error before. They were changed today automatically when a renamed a chapter. Even within our "clean and working" backups we now encounter this error.
Questions:
- Can anyone explain, what a runtime error is at all?
- My assumption is, that it has something to do with the CSS or template, but I'm not sure. What can be wrong there?
- To what lines do the specifications in the pop-up refer to? Where can I find those lines?
As we are in a very critical project phase, I really need your assistance for a quick and effective solution. Please help me as soon as possible!! Thanks!!Hi Tom
Here is my own educated guess.
When you have links of any type in a HTML document, a calculation has to occur at the time they are created. The application has to calculate where the linked item is in relation to the existing page. Then HTML shorthand is created to navigate. Up a folder level is ../ and up two folder levels is ../../. Stuff like that.
Popups are a different story. While you are still creating links, these beasties are actually handled using JavaScript. So the path is supplied in the call to the JavaScript.
As if that weren't complex enough, we now toss Headers and Footers into the mix. Headers and Footers are tied to the Master Page. The Master Page is always in the root level of the project. Links in a Header and Footers often break because of the assorted locations of HTML pages if you are using folders to organize your project. So when you create the link initially as part of the Master Page, things are dandy and as long as the topic is in the project root folder (same as the Master Page) things would likely work fine. But if that Master Page is associated with a topic inside a folder level or two down, things can go to pot in a hurry! (Where are we all headed? And what's with the handbasket?)
Hopefully this helps shed some possible explanation... Rick
Helpful and Handy Links
RoboHelp Wish Form/Bug Reporting Form
Begin learning RoboHelp HTML 7 or 8 within the day - $24.95!
Adobe Certified RoboHelp HTML Training
SorcerStone Blog
RoboHelp eBooks
Maybe you are looking for
-
Blue Screen in Firefox 6 (same problem since Firefox 4!)
Don't know why this is happening at all, and it's been happening since Firefox 4, I submitted a problem then, too, and got zero help, but hey, maybe this time, right? There is nothing special going on when I get the Blue Screen. This one occurred whe
-
[solved]Menu Text in Libreoffice gone (with gnome 3.4?)
I see a really strange behavior with libreoffice from the testing repos. I can't see text in my menus anymore. It's like all text has a white overlay. If i turn on icons, it gets a bit better and I can see some letters. It's a bit hard to describe, s
-
How to import Verilog codes into LabVIEW FPGA?
I tried to import Verilog code by instantiation followed by the instruction in http://digital.ni.com/public.nsf/allkb/7269557B205B1E1A86257640000910D3, but still I can see some errors while compiling the VI file. Simple test Verilog file is as follo
-
ARCHIV_CREATE_DIALOG_META FM not working from apllication server?
Hi everyone, So, earlier I upload photos from my desktop and it worked. But now I have to upload photos from application server, so but ARCHIV_CREATE_DIALOG_META didn't upload the JPG file. file = ' /server/Photos/HRDEV/picture.jpg' . CALL FUNCTION '
-
JDeveloper IDE bugs on multiprocessor workstation
I tryed JDeveveloper beta on dual processor computer (Pentium II) and explored a lot of randomly appeared bugs (usually trivial frozen of JD environment). Is there anybody has the same problem null