Program is giving dump now
hi ,
i got syntax error like below
passing the formal parameter "SUBRC" to the fields SY-SUBRC is not appropriate since
SY-SUBRC is set by statement
the code is like below,
FORM view_sap_locks.
DATA: l_num_locks LIKE sy-tabix.
CALL FUNCTION 'ENQUEUE_READ'
EXPORTING
gclient = sy-mandt
gname = c_order
guname = space
IMPORTING
number = l_num_locks
subrc = sy-subrc
TABLES
enq = t_saplocks
EXCEPTIONS
communication_failure = 1
system_failure = 2
OTHERS = 3.
please tell me how to proceed
Hello,
DATA: l_num_locks LIKE sy-tabix.
DATA lv_RC type sy-subrc.----
Add this line to your code
CALL FUNCTION 'ENQUEUE_READ'
EXPORTING
gclient = sy-mandt
gname = c_order
guname = space
IMPORTING
number = l_num_locks
subrc = lv_rc----
change sy-subrc to lv_rc
TABLES
enq = t_saplocks
EXCEPTIONS
communication_failure = 1
system_failure = 2
OTHERS = 3.
and test.... I hope you will be able to proceed.....:-)
Regards,
Viahaal
Similar Messages
-
hi ,
i got syntax error like below
passing the formal parameter "SUBRC" to the fields SY-SUBRC is not appropriate since
SY-SUBRC is set by statement
the code is like below,
FORM view_sap_locks.
DATA: l_num_locks LIKE sy-tabix.
CALL FUNCTION 'ENQUEUE_READ'
EXPORTING
gclient = sy-mandt
gname = c_order
guname = space
IMPORTING
number = l_num_locks
subrc = sy-subrc
TABLES
enq = t_saplocks
EXCEPTIONS
communication_failure = 1
system_failure = 2
OTHERS = 3.
please tell me how to proceedHello,
DATA: l_num_locks LIKE sy-tabix.
DATA lv_RC type sy-subrc.----
Add this line to your code
CALL FUNCTION 'ENQUEUE_READ'
EXPORTING
gclient = sy-mandt
gname = c_order
guname = space
IMPORTING
number = l_num_locks
subrc = lv_rc----
change sy-subrc to lv_rc
TABLES
enq = t_saplocks
EXCEPTIONS
communication_failure = 1
system_failure = 2
OTHERS = 3.
and test.... I hope you will be able to proceed.....:-)
Regards,
Viahaal -
Using NAST WITH DATE RANGE THE ZPROGRAM GIVING DUMP
Hi Frineds,
i am writing select query from NAST table for PO created time based on date range more than 10 days the program is giving DUMP in Quality System.. but in Developement system the dump is not coming for same date range.
please see the below code......that i ahve written. help me.
IF SY-SUBRC EQ 0.
SELECT KAPPL
OBJKY
KSCHL
SPRAS
ERDAT
ERUHR
FROM NAST
INTO TABLE IT_NAST
WHERE KAPPL = 'EF' AND
OBJKY IN R_OBJKY AND
KSCHL IN S_KSCHL
AND ERDAT IN S_DATE
AND ERUHR IN S_ERUHR.
SORT IT_NAST BY OBJKY.
DELETE ADJACENT DUPLICATES FROM IT_NAST COMPARING OBJKY.
ENDIF.
ENDIF.
regards,
Vijay
Edited by: Rob Burbank on Jan 21, 2010 12:42 PMHi,
thanks for your mail..
the dump message
There is no help text for this dump
Either the text was inadvertently deleted or the release of
the kernel differs from the release of the database
Refer to the Note system for further information on this dump.
Regards,
Vijay -
Include program for script dump error in data type
Hi i have written following subroutine for script.
FORM WITHHOLD TABLES in_tab STRUCTURE itcsy
out_tab STRUCTURE itcsy.
data: a_SKFBT TYPE REGUP-SKFBT,
A_DMBTR TYPE REGUP-DMBTR,
W_TAX1(18) TYPE REGUP-SKFBT.
read table in_tab WITH KEY NAME = 'REGUP-SKFBT'.
read table in_tab INDEX 1.
check sy-subrc = 0.
a_SKFBT = in_tab-value.
read table in_tab WITH KEY NAME = 'REGUP-DMBTR'.
read table in_tab INDEX 2.
check sy-subrc = 0.
a_DMBTR = in_tab-value.
W_TAX = ( a_SKFBT - a_DMBTR ).
read table out_tab with key name = 'W_TAX1'.
IF SY-SUBRC = 0.
out_tab-value = W_TAX1.
modify out_tab INDEX 1.
ENDIF.
ENDIF.
endform.
above program is giving dump .
while deduction values in w_tax .
what type of variables i shold take here..Hi Venkat,
Your declaration for the tax variable is wrong. When you have specified a table field there is not any need to mention the number of characters for that variable.
Simply declare as W_TAX type REGUP-SKFBT and
W_TAX1(16) type c.
After computing W_TAX, Move W_TAX to W_TAX1.
Regards,
Anil -
I've just installed Mountain Lion 10.8.5, but now the CS4 and CS5 programs are giving me a licensing error. I've restarted. Uninstalled, reinstalled. And still, they don't work. I need to stay at 10.8.5 and not go to Maverick, per a client's needs at this time. Help!
I've also tried this...that I found in another discussion...also did not work.
Solution 1: Delete the FlexNet Publisher preferences folder
- Quit all Adobe applications.
- On your startup disk, locate and delete the following folder:
[hard drive]/Library/Preferences/FlexNet Publisher/ -
Program is giving a Short Dump u201CCONVT_NO_NUMBERu201D.
Hi,
The current ABAP program "ZINPUTMODULE" had to be terminated because one of th
statements could not be executed.
Program is giving a Short Dump u201CCONVT_NO_NUMBERu201D.
Can anyone please help with the cause of the dump?
Thanks in advance
ReshmaHi Reshma,
See the Note 856312 - Dump CONVT_NO_NUMBER
FORM FCODE_ALT_1000
Delta001Context Block
DATA: lv_parvw TYPE parvw_4,
lv_parnr TYPE sd_partner_parnr,
lv_pargr TYPE pargr,
lvs_old_partner LIKE gvs_tc_data,
lv_cancel TYPE xfeld,
lv_tabix TYPE sy-tabix,
lv_selline TYPE i,
lv_error LIKE sy-subrc,
lv_selection_done type xflag,
lv_new_parnr type sd_partner_parnr,
lvs_message_info type message_info,
lvs_syncro_subscreen like gvs_syncro_subscreen,
lv_result type xfeld,
lv_parnr_to_change type partner_vb.
loop at selected lines
LOOP AT gt_tc_selected_lines.
lv_parvw = gt_tc_selected_lines-rec-parvw.
Delete Block
IF gt_tc_selected_lines-rec-partner co ' 0123456789'.
UNPACK gt_tc_selected_lines-rec-partner TO lv_parnr.
ELSE.
lv_parnr = gt_tc_selected_lines-rec-partner.
ENDIF.
Insert Block
CATCH SYSTEM-EXCEPTIONS CONVT_NO_NUMBER = 01
OTHERS = 02.
IF gt_tc_selected_lines-rec-partner co ' 0123456789'.
UNPACK gt_tc_selected_lines-rec-partner TO lv_parnr.
ELSE.
lv_parnr = gt_tc_selected_lines-rec-partner.
ENDIF.
ENDCATCH.
if sy-subrc <> 0.
lv_parnr = gt_tc_selected_lines-rec-partner.
endif.
Delta002Context Block
GET CURSOR LINE lv_selline.
lv_tabix = gv_tc_partner_overview-top_line + lv_selline - 1.
READ TABLE gt_tc_data INTO lvs_old_partner INDEX lv_tabix.
IF lvs_old_partner cn ' 0'.
lv_parvw = lvs_old_partner-rec-parvw.
Delete Block
IF lvs_old_partner-rec-partner co ' 0123456789'.
UNPACK lvs_old_partner-rec-partner TO lv_parnr.
ELSE.
Insert Block
CATCH SYSTEM-EXCEPTIONS CONVT_NO_NUMBER = 01
OTHERS = 02.
IF lvs_old_partner-rec-partner co ' 0123456789'.
UNPACK lvs_old_partner-rec-partner TO lv_parnr.
ELSE.
lv_parnr = lvs_old_partner-rec-partner.
ENDIF.
ENDCATCH.
if sy-subrc <> 0.
Regards,
Md Ziauddin -
I'm using the function module SO_DOCUMENT_SEND_API1
and after that I'm using this command.
SUBMIT rsconn01 WITH mode = 'INT'
WITH output = 'X'
AND RETURN.
But it is giving Dump. Says Error when calling a remote function call. RFC_GET4 I'm getting this error.
I'm recieving the mail to SAP inbox.
But when I give any other External ID mail is not coming.
Is it that do i need to do any settings?Hi Phani ,
External Mails means ? ur outlook id ? thats y we given ref of SCOT, where u can check the status of Messages.
check ur address nodes configurations.
Regards
prabhu -
FM ARCHIVE_SCHEDULE_JOB giving dump as background job?
Hello Everyone,
I am scheduling a report in SM37 which consists of FM ARCHIVE_SCHEDULE_JOB.
And based on the output of FM, some Ztables are updated and some jobs are created in sm37.
Now, when i debugged the background job, i found out that Fm is giving Dump 'NO_RUNTIME_INFO' since sy-batch is not initial.
Due to which Ztables are not updated but the jobs are created....
Can anyone please help me what should i do on this case?
Edited by: Suruchi Razdan on Jun 2, 2011 9:45 AMHi Akshay,
II have copied the Std workflow WS20000075 into a custom one and in the latest end tab, i have selected "Workitem creaton" for Refer Date/Time field and given 5 mins. I have deactivated the workflow in which i have created the containers for date and time and used "Expresion" for latest end and also commented the zmethod in delegated object. Even now also the job is getting cancelled with the same error.
Any idea why is it happening ?
regards,
Trimurty -
While Creating Implicit enhancement system is giving dump
Hello All,
I am enhanceing standard code with the help of implicit enhancement.. I have done successfully in one system but when i try to do it in other system it is giving me short dump.. And the dump also didn't give any information..
I am working on ECC 6.0 and i assume we can use implicit enhancement points...
Kindly let me know why i am getting dump..
This is what dump says..
The exception 'CX_SY_MESSAGE_ILLEGAL_TEXT' was raised, but it was not caught
anywhere along
the call hierarchy.
What happened?
Since exceptions represent error situations and this error was not
adequately responded to, the running ABAP program
'CL_MESSAGE_HELPER=============CP' has to be
terminated.
Error analysis
An exception occurred that is explained in detail below.
The exception, which is assigned to class 'CX_SY_MESSAGE_ILLEGAL_TEXT', was not
caught in
procedure "ACTION" "(FORM)", 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:
The text parameter in MESSAGE cannot be an initial reference
METHOD set_msg_vars_for_if_t100_msg.
IF text IS INITIAL.
RAISE EXCEPTION TYPE cx_sy_message_illegal_text
EXPORTING textid = cx_sy_message_illegal_text=>initial_ref.
ENDIF.
Thanks all for your help.
Regards,
RajHi,
This is for SE16N transaction code.. Even i tried in SE38 for a custom program but still giving dump..
So this is not an issue with particular transaction but somehow getting dump ..I doono if there is any OSS notes to be implemented...
Regards,
Raj -
Dynamic data select from table is giving dump
Hello Experts,
Below statement is giving Dump after it move all the data in my dynamic table.
When i see in debug. All my recored are avilable in <T_TAB> Table.
SELECT * FROM (pa_tab) INTO CORRESPONDING FIELDS OF TABLE <T_TAB>.
> IF SY-SUBRC = 0.
Information on where terminated
The termination occurred in the ABAP program "ZFIR_ZTABLE_UPLOAD" in
"F_DOWNLOAD".
The main program was "ZFIR_ZTABLE_UPLOAD ".
The termination occurred in line 403 of the source code of the (Include)
program "ZFIR_ZTABLE_UPLOAD"
of the source code of program "ZFIR_ZTABLE_UPLOAD" (when calling the editor
4030).
Processing was terminated because the exception "CX_SY_OPEN_SQL_DB" occurred in
the
procedure "F_DOWNLOAD" "(FORM)" but was not handled locally, not declared in
the
RAISING clause of the procedure.
The procedure is in the program "ZFIR_ZTABLE_UPLOAD ". Its source code starts
in line 399
of the (Include) program "ZFIR_ZTABLE_UPLOAD ".
please help me.
Regards,
Amit
Message was edited by:
Amit GuptaHi Amit,
Check if you are doing the following in your program
FIELD-SYMBOLS <T_TAB> TYPE STANDARD TABLE.
DATA: g_tabref type ref to data. "Reference to your table structure
CREATE DATA g_tabref type standard table of (pa_tab).
ASSIGN g_tabref->* to <T_TAB>.
SELECT * FROM (PA_TAB) INTO TABLE <T_TAB>.
Hope this solves your problem.
Let me know if you require any further info.
Enjoy SAP. Reward points of useful
Rajasekhar -
Report (uses LDB's) giving dump due to memory problem
Hi,
I have a report which is giving dump in production due to memory problem.
Memory is increased from basis part,but still getting same error.
the report uses Logical DataBases.
Can anyone suggest solution to solve this problem.
regards
MallikHi Amit,
thanks for ur quick reply and ur idea "make changes in development and write the logic to read records in chunks".
I have n't worked on LDB's till now.So i Don't know how I can read the data in chunks from LDB's.
Can u Plz give some idea how to read data in chunks.
Iam also sending the code,if possible ,plz go thru it and give me some idea.
Hope u will help me.
CODE.
REPORT ZAROP028
ABLES: PROJ, " Project definition
PRPS_R, " WBS element
PRPS, " WBS elements
TJ02T, " System Status Values
TCJ1, " Project Types
JEST, " Active System Status
COSP1, " cost totals - external postings
COSS1, " cost totals - internal postings
COVP11, " Line Items by Prd & Doc Header
COVP12, " Line Items by Prd & Doc Header
BHDGD, " Page heading table.
AUFK, " Order Master Data for WBS (LDB)
ANEP, " Asset line item
COBRB, "Distribution Rules Settlement Ru
SETHIER, "Hierarchy Structure
TKA02, "Controlling Area Assignment
CEPC, "Profit Center Master Data
PSDYPD, "Dummy struct for GET proj late
PSDYPR, "Dummy struct for GET PRPS_R late
PSDYNP. "Dummy struct for GET AUFK late
CONSTANTS:
C_E TYPE C VALUE 'E',
C_I TYPE C VALUE 'I',
C_N TYPE C VALUE 'N',
C_X TYPE C VALUE 'X',
C_Y TYPE C VALUE 'Y',
C_NE(2) TYPE C VALUE 'NE',
C_EQ(2) TYPE C VALUE 'EQ',
C_USD(3) TYPE C VALUE 'USD',
C_04(2) TYPE C VALUE '04',
C_I0046(5) TYPE C VALUE 'I0046'
various working storage
DATA:
W_TXT04(4) TYPE C. " make status uppercase
DATA: ACTIVE(1) TYPE C VALUE 'A', " type for status_flag
INACTIVE(1) TYPE C VALUE 'I', " type for status_flag
STATUS_FLAG(1) TYPE C VALUE 'I', " wbs active or inactive?
INACTIVEDT LIKE SY-DATUM, " inactive date for wbs
REC_FLAG TYPE C VALUE 'N', " records retrieved?
DAYS_INACTIVE TYPE I, " days wbs has been inac
W_LOWINACT TYPE I, " smallest inactive days
WBS_CNT TYPE I, " cnt for wbs in status
W_AUC_COST TYPE P DECIMALS 2, " unsettled auc cost
W_VNAME LIKE PRPS_R-VNAME. " venture number storage
DATA: BEGIN OF ITAB OCCURS 0, "MELI-5F2KMH
COMPCODE LIKE PROJ-VBUKR, " company code
PLANT LIKE PROJ-WERKS, " plant
PROJECT LIKE PROJ-PSPID, " project
NAME LIKE PROJ-POST1, " project description
DINACT TYPE I, " days proj inactive
PRCTR LIKE PROJ-PRCTR, " profit center
SETID LIKE SETHIER-SETID, " level 2 pc hier
DESCRIPT LIKE SETHEADERT-DESCRIPT,
VERNA LIKE PROJ-VERNA, " person responsible
AUC TYPE P DECIMALS 2, " AUC unsettled amount
END OF ITAB.
DATA: BEGIN OF I_INACT OCCURS 0,
STAT LIKE JEST-STAT,
INACT LIKE JEST-INACT,
END OF I_INACT.
DATA: EQ_FLAG TYPE C, " system status flag
NE_FLAG TYPE C. " system status flag
TYPES: BEGIN OF T_COSTS,
PSPID LIKE PROJ-PSPID,
BUDAT LIKE COVP11-BUDAT,
END OF T_COSTS.
DATA: I_PROJ LIKE PROJ OCCURS 0 WITH HEADER LINE,
I_PRPS_R LIKE PRPS_R OCCURS 0 WITH HEADER LINE,
I_COSTS TYPE T_COSTS OCCURS 0 WITH HEADER LINE.
DATA: W_RECORDS TYPE I.
DATA: FOUND_FLAG TYPE C. " CHAD-4PRPDE
DATA: BEGIN OF I_HIER OCCURS 0. "FEAT-5BNRRP
INCLUDE STRUCTURE SETHIER. "FEAT-5BNRRP
DATA: END OF I_HIER. "FEAT-5BNRRP
RANGES: R_TJ02T FOR TJ02T-ISTAT.
DATA: W_LVL2 LIKE SETHIER-SETID. "MELI-5F2KMH
SELECTION-SCREEN BEGIN OF BLOCK PROJECT WITH FRAME TITLE TEXT-B01.
PARAMETERS: P_BUDAT LIKE COVP11-BUDAT,
DAYINACT(3) TYPE N DEFAULT '090'.
SELECTION-SCREEN SKIP. "FEAT-5BNRRP
PARAMETERS: P_PC-SET LIKE CEPC-KHINR OBLIGATORY "FEAT-5BNRRP
DEFAULT 'SCH_STREAM'. "FEAT-5BNRRP
SELECTION-SCREEN END OF BLOCK PROJECT.
SELECTION-SCREEN BEGIN OF BLOCK SORT WITH FRAME TITLE TEXT-B02.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(13) TEXT-C01.
SELECTION-SCREEN POSITION 15.
PARAMETERS: P_PLANT RADIOBUTTON GROUP SORT DEFAULT 'X'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(13) TEXT-C03. "FEAT-5BNRRP
SELECTION-SCREEN POSITION 15.
PARAMETERS: P_PRCTR RADIOBUTTON GROUP SORT. "FEAT-5BNRRP
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(13) TEXT-C04.
SELECTION-SCREEN POSITION 15.
PARAMETERS: P_DAYS RADIOBUTTON GROUP SORT.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK SORT.
AT SELECTION-SCREEN OUTPUT.
PERFORM USER_PARM_INIT.
AT SELECTION-SCREEN.
PERFORM CHECK_PROJ_CRITERIA.
START-OF-SELECTION.
PERFORM BUILD_PC_HIER USING P_PC-SET.
Project Definition *
GET PROJ.
MOVE-CORRESPONDING PROJ TO I_PROJ. "MELI-5F2KMH
APPEND I_PROJ. "MELI-5F2KMH
CLEAR I_PROJ.
WBS element table
GET PRPS_R.
MOVE-CORRESPONDING PRPS_R TO I_PRPS_R.
APPEND I_PRPS_R.
CLEAR I_PRPS_R.
GET all order and cost objects associated with order and elements
GET AUFK.
GET COSP1.
CHECK COSP1-WRTTP EQ C_04. " check if value type '04'
Get last date that the wbselement was updated and determine status
GET COVP11.
MOVE PROJ-PSPID TO I_COSTS-PSPID.
MOVE COVP11-BUDAT TO I_COSTS-BUDAT.
APPEND I_COSTS.
CLEAR I_COSTS.
Loop through Internal cost statements
GET COSS1.
CHECK COSS1-WRTTP EQ C_04. " if value type is 04
Get last date that the wbselement was updated and determine status
GET COVP12.
MOVE PROJ-PSPID TO I_COSTS-PSPID.
MOVE COVP12-BUDAT TO I_COSTS-BUDAT.
APPEND I_COSTS.
CLEAR I_COSTS.
END-OF-SELECTION.
PERFORM BUILD_TABLE.
DELETE ITAB WHERE DINACT < DAYINACT.
DESCRIBE TABLE ITAB LINES W_RECORDS.
IF W_RECORDS = 0.
MESSAGE I024.
ENDIF.
PERFORM WRITE_REPORT.
FORM CHECK_PROJ_CRITERIA *
This form verifies correct selection criteria has been entered from *
the selection screen inputs. If incorrect data has been entered the*
valid information messages are displayed. *
FORM CHECK_PROJ_CRITERIA.
check for either posting date or inactivity criteria but not both
IF NOT P_BUDAT IS INITIAL AND NOT DAYINACT IS INITIAL.
MESSAGE E119.
ENDIF.
IF NOT DAYINACT IS INITIAL. "check s/o day inactive
IF NOT DAYINACT <= 998.
MESSAGE E018.
ELSE.
INACTIVEDT = SY-DATUM - DAYINACT.
ENDIF.
if days inactive is initial set INACTIVEDT using the posting date
ELSE.
INACTIVEDT = P_BUDAT.
ENDIF.
ENDFORM. " CHECK_PROJ_CRITERIA
FORM GET_AUC_COSTS *
This form retrieves AUC costs for records based on AUFK2 where they *
meet project criteria. This pulls the unsettled amount on a AUC as *
a settlement receiver. *
FORM GET_AUC_COSTS USING F_OBJNR F_BUKRS.
CONSTANTS:
C_SETLEMENT_ANNUAL LIKE COBRB-PERBZ VALUE 'JHR', "Annual Settlement
C_DEP_AREA_STD LIKE ANEP-AFABE VALUE '01'. "Std depreciation
DATA: L_ANLC LIKE ANLC OCCURS 0 WITH HEADER LINE,
L_ANLCV LIKE ANLCV OCCURS 0 WITH HEADER LINE,
BEGIN OF L_COBRB OCCURS 0, "SRIN-6ZNEAR
ANLN1 LIKE COBRB-ANLN1,
ANLN2 LIKE COBRB-ANLN2,
END OF L_COBRB,
F_H_COST TYPE P DECIMALS 2.
SELECT ANLN1 ANLN2 FROM COBRB
INTO TABLE L_COBRB " SRIN-6ZNEAR
WHERE OBJNR = F_OBJNR
AND PERBZ = C_SETLEMENT_ANNUAL.
IF SY-SUBRC NE 0. " gary-463qbd
EXIT. " gary-463qbd
ENDIF. " gary-463qbd
LOOP AT L_COBRB. " gary-463qbd
CLEAR: F_H_COST.
SELECT SINGLE * FROM ANLC
INTO L_ANLC
WHERE BUKRS = F_BUKRS AND
ANLN1 = L_COBRB-ANLN1 AND
ANLN2 = L_COBRB-ANLN2 AND
GJAHR = SY-DATUM(4) AND
AFABE = C_DEP_AREA_STD AND
ZUJHR = '0000' AND
ZUCOD = '0000'.
IF SY-SUBRC = 0.
CALL FUNCTION 'FI_AA_VALUES_CALCULATE'
EXPORTING
I_ANLC = L_ANLC
IMPORTING
E_ANLCV = L_ANLCV.
F_H_COST = L_ANLCV-BCHWRT_LFD.
ENDIF.
ADD: F_H_COST TO W_AUC_COST.
ENDLOOP. " gary-463qbd
ENDFORM. " GET_AUC_COSTS
FORM CHECK_INACTIVE_DATE *
This form checks the computed inactive date based on the formal *
parameter DAYS_INACTIVE. If DAYS_INACTIVE is more current than the *
current lowest inactive date W_LOWINACT then W_LOWINACT is replaced *
with this value. *
FORM CHECK_INACTIVE_DATE USING DAYS_INACTIVE.
IF DAYS_INACTIVE < W_LOWINACT.
MOVE DAYS_INACTIVE TO W_LOWINACT.
ELSEIF W_LOWINACT EQ 0.
MOVE: DAYS_INACTIVE TO W_LOWINACT,
W_LOWINACT TO ITAB-DINACT.
ENDIF.
ENDFORM. " CHECK_INACTIVE_DATE
FORM build_table *
collect fields to the internal table ITAB *
FORM BUILD_TABLE.
SORT I_COSTS BY PSPID ASCENDING BUDAT DESCENDING.
LOOP AT I_PROJ.
CLEAR W_AUC_COST.
READ TABLE I_COSTS WITH KEY PSPID = I_PROJ-PSPID
BINARY SEARCH.
IF SY-SUBRC = 0.
ITAB-DINACT = SY-DATUM - I_COSTS-BUDAT.
ELSE.
ITAB-DINACT = SY-DATUM - I_PROJ-ERDAT.
ENDIF.
LOOP AT I_PRPS_R WHERE PSPHI = I_PROJ-PSPNR AND
BELKZ = 'X'.
IF NOT I_PRPS_R-IMPRF IS INITIAL.
PERFORM GET_AUC_COSTS USING I_PRPS_R-OBJNR
I_PRPS_R-PBUKR.
ELSE.
CONTINUE.
ENDIF.
ENDLOOP.
ITAB-COMPCODE = I_PROJ-VBUKR.
ITAB-PLANT = I_PROJ-WERKS.
ITAB-PROJECT = I_PROJ-PSPID.
ITAB-NAME = I_PROJ-POST1.
ITAB-PRCTR = I_PROJ-PRCTR.
ITAB-VERNA = I_PROJ-VERNA.
ITAB-AUC = W_AUC_COST.
IF ITAB-DINACT > DAYINACT.
PERFORM GET_HIER_INFO.
ENDIF.
APPEND ITAB.
CLEAR ITAB.
ENDLOOP.
ENDFORM. " BUILD_TABLE
FORM STATUS_CHECK *
Checks the active status of the project definition for the *
parameter values assigned. *
FORM STATUS_CHECK USING F_OBJNR.
begin of GARY-463QBD
CLEAR: I_INACT.
REFRESH: I_INACT.
MOVE: C_N TO EQ_FLAG,
C_Y TO NE_FLAG.
retrieve status for a given record
SELECT STAT INACT
INTO TABLE I_INACT
FROM JEST
WHERE OBJNR EQ F_OBJNR AND
INACT NE C_X.
sort internal status entered by user
SORT R_TJ02T BY OPTION DESCENDING.
check all current object statuses meet user entered criteria
LOOP AT R_TJ02T WHERE OPTION EQ C_NE.
check for user selected options
READ TABLE I_INACT WITH KEY STAT = R_TJ02T-LOW.
IF SY-SUBRC EQ 0.
MOVE C_N TO NE_FLAG.
EXIT.
ENDIF.
ENDLOOP.
LOOP AT R_TJ02T WHERE OPTION EQ C_EQ.
check for user selected options
READ TABLE I_INACT WITH KEY STAT = R_TJ02T-LOW.
IF SY-SUBRC EQ 0.
MOVE C_Y TO EQ_FLAG.
EXIT.
ENDIF.
ENDLOOP.
check for no statuses entered as EQ option
LOOP AT R_TJ02T WHERE OPTION EQ C_EQ.
EXIT.
ENDLOOP.
if so move c_y to eq_flag
IF SY-SUBRC NE 0.
MOVE C_Y TO EQ_FLAG.
ENDIF.
if both eq_flag or ne_flag are true(c_y) move true to valid_flag
IF ( EQ_FLAG EQ C_N OR
NE_FLAG EQ C_N ).
REJECT 'PRPS_R'.
ENDIF.
end of GARY-463QBD
ENDFORM. " STATUS_CHECK
Form WRITE_REPORT
FORM WRITE_REPORT.
IF P_PLANT EQ 'X'.
SORT ASCENDING BY ITAB-BUSAREA "FEAT-5BNRRP
SORT ITAB ASCENDING BY PLANT
PROJECT.
ELSEIF P_PRCTR EQ 'X'.
SORT ITAB ASCENDING BY PRCTR "FEAT-5BNRRP
PROJECT.
ELSE.
SORT ITAB ASCENDING BY DINACT
PROJECT.
ENDIF.
FORMAT COLOR COL_BACKGROUND INTENSIFIED ON.
"MELI-5F2KMH
LOOP AT ITAB. "MELI-5F2KMH
WRITE: / ITAB-COMPCODE,
9(4) ITAB-PLANT,
17(12) ITAB-SETID,
33(40) ITAB-DESCRIPT,
77(10) ITAB-PRCTR,
91(24) ITAB-PROJECT,
119(40) ITAB-NAME,
163(25) ITAB-VERNA,
192(15) ITAB-AUC CURRENCY C_USD,
211(8) ITAB-DINACT.
ENDLOOP.
ENDFORM. " WRITE_REPORT
Form USER_PARM_INIT
Initializes user parameter settings
FORM USER_PARM_INIT.
ENDFORM. " USER_PARM_INIT
At top of every page, generate Amoco-standard header.
TOP-OF-PAGE.
MOVE: '0' TO BHDGD-INIFL,
SY-LINSZ TO BHDGD-LINES,
SY-UNAME TO BHDGD-UNAME,
SY-REPID TO BHDGD-REPID,
SY-TITLE TO BHDGD-LINE1,
SPACE TO BHDGD-DOMAI,
SPACE TO BHDGD-SEPAR,
SPACE TO BHDGD-MIFFL.
IF P_PLANT EQ 'X'.
MOVE TEXT-H01 TO BHDGD-LINE2.
ELSE.
MOVE TEXT-H03 TO BHDGD-LINE2. "FEAT-5BNRRP
ENDIF.
temporarily clear sy-mandt to remove "europe" from header "FEAT-5BNRRP
DATA: W_MANDT LIKE SY-MANDT.
BHDGD-BUKRS = SPACE.
W_MANDT = SY-MANDT.
CLEAR SY-MANDT.
FORMAT COLOR COL_BACKGROUND INTENSIFIED OFF.
PERFORM BATCH-HEADING(RSBTCHH0).
FORMAT RESET.
reset sy-mandt "FEAT-5BNRRP
SY-MANDT = W_MANDT.
PERFORM PGH_WRITE_HEADING USING TEXT-003 INACTIVEDT. "MELI-5F2KMH
SKIP 1.
ULINE.
write heading info
FORMAT COLOR COL_TOTAL INTENSIFIED ON.
WRITE: /1(5)'CCode',
9(5)'Plant',
17(12)'Level 2 Node',
33(40)'Level 2 Node Description',
77(10)'Profit Ctr',
91(18)'Project Definition',
119(19)'Project Description',
163(18)'Person Responsible',
192(15)' AUC Unsettled',
211(13)'Days Inactive'.
end FEAT-5BNRRP
BEGIN FEAT-5BNRRP NEW FORMS
FORM BUILD_PC_HIER
FORM BUILD_PC_HIER USING SETID.
DATA: W_SETID LIKE SETHIER-SETID,
W_NEWSETID LIKE SETHIER-SETID.
CONCATENATE '0H' SETID INTO W_SETID.
CALL FUNCTION 'G_SET_GET_ID_FROM_NAME'
EXPORTING
SHORTNAME = W_SETID
TABNAME = 'GLPCT'
SETCLASS = '0106'
SUPRESS_POPUP = 'X'
OLD_SETID = W_NEWSETID
IMPORTING
NEW_SETID = W_NEWSETID.
CALL FUNCTION 'G_SET_TREE_IMPORT'
EXPORTING
CLIENT = SY-MANDT
LANGU = SY-LANGU
SETID = W_NEWSETID
TABNAME = 'GLPCT'
TABLES
SET_HIERARCHY = I_HIER
EXCEPTIONS
SET_NOT_FOUND = 1
ILLEGAL_FIELD_REPLACEMENT = 2
ILLEGAL_TABLE_REPLACEMENT = 3
OTHERS = 4.
CLEAR I_HIER.
ENDFORM.
FORM GET_HIER_INFO
FORM GET_HIER_INFO.
DATA: W_SETID LIKE SETHIER-SETID,
W_KHINR LIKE CEPC-KHINR,
W_INDEX TYPE I.
CLEAR: W_SETID,
W_KHINR,
W_INDEX.
DETERMINE PROFIT CENTER NODE
SELECT SINGLE KHINR
FROM CEPC
INTO W_KHINR
WHERE PRCTR EQ ITAB-PRCTR.
CONCATENATE '0106' I_PROJ-VKOKR W_KHINR
INTO W_SETID.
READ TABLE I_HIER WITH KEY
SETID = W_SETID.
IF SY-SUBRC EQ 0.
W_INDEX = SY-TABIX.
DO.
READ TABLE I_HIER INDEX W_INDEX.
IF W_INDEX = 0.
ITAB-SETID = 'Not Found'.
EXIT.
ENDIF.
IF I_HIER-LEVEL = 1.
ITAB-SETID = I_HIER-SETID+8(12).
ITAB-DESCRIPT = I_HIER-DESCRIPT.
EXIT.
ENDIF.
IF I_HIER-LEVEL = 2.
ITAB-SETID = I_HIER-SETID+8(12).
ITAB-DESCRIPT = I_HIER-DESCRIPT.
EXIT.
ENDIF.
W_INDEX = W_INDEX - 1.
ENDDO.
ELSE.
ITAB-SETID = 'Not Found'.
ENDIF.
ENDFORM.
END FEAT-5BNRRP NEW FORMS
*& Form PGH_WRITE_HEADING WR MELI-5F2KMH
FORM PGH_WRITE_HEADING USING L_V1 L_V2.
DATA: L_LINSZ LIKE SY-LINSZ.
DATA: L_TITLEL LIKE SY-TABIX.
DATA: L_START LIKE SY-TABIX.
DATA: L_DATE LIKE SY-DATUM.
DATA: L_FORMATTED_DATE(10) TYPE C.
DATA: L_TITLE(27) TYPE C.
MOVE L_V2 TO L_DATE.
WRITE L_DATE TO L_FORMATTED_DATE.
CONCATENATE L_V1 L_FORMATTED_DATE INTO L_TITLE
SEPARATED BY SPACE.
L_LINSZ = SY-LINSZ.
L_TITLEL = STRLEN( L_TITLE ).
L_START = ( L_LINSZ / 2 ) - ( L_TITLEL / 2 ) - 2.
NEW-LINE.
POSITION L_START.
WRITE: L_TITLE.
regards
Mallik -
Office 2007 Attachments giving dump"Buffer table not up to date" in SOCO
Hi SRM Experts,
We have came across a strange issue. DOCX & XLSX doc type attachments are giving a dump " Buffer Table not up to the date" when the Buyer in SOCO press the button "Add to the work area".
This is coming only when there is some SPECIAL CHARACTER used in the description of the attachment e.g. _, -, . / etc etc.
The other attachment types are working fine. i.e. PDF or Doc with NO special characters used in the description are giving NO errors t
IS there any special OSS note for this?
I have already configured all the config settings in DC10, DC20 & DC 30.
Please help us out in this.
Regards,
Varun.Hi Muthu,
Thanks for the help.. But here the problem is not with extension only.
The problem is if there is a special character in the attachment description in Office 2007 doc types like XLSX, DOCX then and then only it is giving dump.
I tested without special characters in description with DOCX file it is working fine.
Please help out as this is becoming serious issue now.
Regards,
Varun -
Hi,
I am creating version in cn72. when I am displaying it in cn71,it is giving dump.
In cn71 , I am giving project,then choosing DB profile and clicking version data and sales data and then enter.Then in the project version I am giving the version that I have created in CN72.And when I execute it, it is giving dump.
The error analysis(in the dump) :
An exception occurred that is explained in detail below.
The exception, which is assigned to class 'CX_SY_DYNAMIC_OSQL_SEMANTICS', was
not caught in
procedure "SELECT_VBAK_FOR_ITAB_VBELN" "(FORM)", 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:
An Open SQL clause was specified dynamically. The contained field name
"CRM_GUID" does not exist in any of the database tables from the FROM clause.
Please help.
Thanks in advance.Sounds like a problem in SAP standard code, did you check for SAP notes?
Thomas -
hi,
Standard PM Transaction IW22 is giving dump the use entered the correct data. There is a select statment from table VIQMEL(notification header),to fetch data from this table it's taking lot of time and going to dump.This select statment is in FM BREAKDOWN_NOTIFS_READ_F04 and program name is SAPLMCI1. I Searched Service market palce and i not found any suitable notes for this dump. Earlier it worked fine from fast few days it's giving dump. If any body faced these kind of problem please kindly give the solution. There are no customization errors.
Thanks and Regards,
Surendar Reddy.The problem is that there's too much data. If it was working before, and has only recently stopped, this would imply it's taking too long, because the data volumes have grown.
I'd log a call with SAP.
As a short-term measure, ask your basis people to increase the timeout parameter. Or use the transaction with less data selected, if possible.
matt -
Method CL_FAGL_OI_READ giving dump
Hi,
method giving dump when i m trying to use it.
st 22 stmt.
In program "CL_FAGL_OI_READ===============CP ", the following syntax error
occurred
in the Include "CL_FAGL_OI_READ===============CU " in line 25:
"Field "ABAP_FALSE" is unknown. It is neither in one of the specified t"
"ables nor defined by a "DATA" statement. "DATA" statement."
please suggest me the solution
Regards
Sumitdear,
there may be a chance of missing some line in your sap code.
1. open program LFAGL_SPL_SERVICESU01.
2. double click on CALL METHOD cl_fagl_split_services.
3. double click on get_customizing.
you will get read stmt where your abap_false entry may be missing.
hope your problem will be solved.
Regards
vijay
Maybe you are looking for
-
Hi, I have a problem regarding the presentation cable Part ID: CAB-VGA-DVI-AUD25 This cable used to be this config DVI -> VGA RCA -> 3.5 mm stereo But now (since this summer 2014) its seams to be this config on the cable
-
Maintenance activity type - PM order
Hello, I have to configure the field "activity type" on PM order (tcode IW31). I want to make this field obrigatory and It can't come with default values. It must comes empty. In SPRO, when a take off the link between the Order type and the default v
-
Send Scope_Identity to an htmlpanel
I use the Scope_Identity to retrive the last ID in a simple insert, then use an Observer with OnPostUpdate to send the user in another page, like this: <script> var observer1 = {onPostUpdate: function() widget.loadContent('newpage.asp');
-
How do I copy RaW files from Mac to external hard drive? I only seem to be able to copy jogs
I would like to copy photos from Mac to external drive but when I do they are saved as jpgs. I really want the origianl RAW files. What am I doing wrong? thanks
-
Enter material in Stock to do the delivery
I am trying to do a Delivery from a Sls Order. In Sls Order it was confirmed the schedule line. However I do not have material in stock. How an easy and fast way to enter material in stock in order to create my delivery? What is the t-code and the mo