Impossible to delete an item number of a PO of the previous year
Hello,
I have a question.
Closing Operations (Carryforward of Open Items) were not made yet.
We want to delete in 2011 an item number of a purchase order (created in 2010 with doc date of the year 2010).
The System informs us that It is not possible to change document in fiscal year 2011 because the document was updated as open commitment in fiscal year 2010 in Funds Management.
System : SAP ERP 6.0 /7.0 - EHP 4 - FM BCS
In our old system SAP 4.7 enterprise (FM) , It was possible to delete an item number of a purchase order of a previous year (when Closing Operations (Carryforward of Open Items) were not made yet).
Isn't it possible any more to delete in 2011 an item number of a purchase order created in 2010 before Closing Operations ?
Thanks for your answer.
Fabian
Hi,
I believe, you have PBET activated. In this case, modification of the commitment should be indeed made in the same year.
Regards,
Eli
Similar Messages
-
I need help. just purchased the daobe light room and can't get further than the serial number, says i need previous number. I'm confused
If you buy an Upgrade you will need to have a previous version of Lightroom ... a Full version doesn't need a previous serial number.
Did you buy and "Upgrade" or "Full" version?
If you wanted full but bought an upgrade you will need to contact Adobe customer support. -
Since I have downloaded the 11.0, I no longer see the song count or size of file at botton of screen.....can I find this somewhere else?
You can sync multiple iPods with one library:
How to use multiple iPods with one computer.
iTunes doesn't know about multiple libraries. You have to tell iTunes which library to use.
If the library was created by iTunes, holding the Option-key on launching iTunes, will enable a menu to choose one.
If you want to switch to another library, quit iTunes and launch again while holding the Option-key
If you created multiple libraries with one of the 3rd party applications I mentioned in my previous post, you have to quit iTunes too, run the app. and launch iTunes again.
The difference is that these apps. not only save the 'iTunes Library' file, but also the preferences file.
iTunes can only manage one library at a time. That's why you have to quit and relaunch.
You can manually manage your iPod with multiple libraries.
It's about the same as described in this article:
Using iPod with multiple computers
M
17' iMac 800 MHz, 768 MB RAM, 200 GB HD, DL burner Mac OS X (10.4.8) iTunes 7.0.1 -
Hello friends,
I am retreiving the change item number from table CDPOS from the field TABKEY , I also need to retreive the change date(When the user changes the item number) of item number. Can anyone pls tell where can I get the change date from.*"Table declarations...................................................
TABLES:
EKKO, " Purchasing Document Header
CDHDR, " Change document header
SSCRFIELDS. " Fields on selection screens
*"Selection screen elements............................................
SELECT-OPTIONS:
S_EBELN FOR EKKO-EBELN, " Purchasing Document Number
S_LIFNR FOR EKKO-LIFNR, " Vendor's account number
S_EKGRP FOR EKKO-EKGRP, " Purchasing group
S_BEDAT FOR EKKO-BEDAT, " Purchasing Document Date
S_UDATE FOR CDHDR-UDATE. " Creation date of the change
" document
*" Data declarations...................................................
Field String to hold Purchase Document Number *
DATA:
BEGIN OF FS_EBELN,
EBELN(90) TYPE C, " Purchase Document Number
ERNAM TYPE EKKO-ERNAM, " Name of Person who Created
" the Object
LIFNR TYPE EKKO-LIFNR, " Vendor's account number
EKGRP TYPE EKKO-EKGRP, " Purchasing group
BEDAT TYPE EKKO-BEDAT, " Purchasing Document Date
END OF FS_EBELN,
Field String to hold Purchase Document Header *
BEGIN OF FS_EKKO,
EBELN TYPE EKKO-EBELN, " Purchasing Document Number
ERNAM TYPE EKKO-ERNAM, " Name of Person who Created the
" Object
LIFNR TYPE EKKO-LIFNR, " Vendor's account number
EKGRP TYPE EKKO-EKGRP, " Purchasing group
BEDAT TYPE EKKO-BEDAT, " Purchasing Document Date
END OF FS_EKKO,
Field String to hold Account Number and name of the Vendor *
BEGIN OF FS_LFA1,
LIFNR TYPE LFA1-LIFNR, " Account Number of Vendor
NAME1 TYPE LFA1-NAME1, " Name1
END OF FS_LFA1,
Field String to hold Change date and the name of the user *
BEGIN OF FS_CDHDR,
OBJECTCLAS TYPE CDHDR-OBJECTCLAS, " Object Class
OBJECTID TYPE CDHDR-OBJECTID, " Object value
CHANGENR TYPE CDHDR-CHANGENR, " Document change number
USERNAME TYPE CDHDR-USERNAME, " User name
UDATE TYPE CDHDR-UDATE, " Creation date of the change
" document
END OF FS_CDHDR,
Field String to hold Change document items *
BEGIN OF FS_CDPOS,
OBJECTCLAS TYPE CDPOS-OBJECTCLAS," Object class
OBJECTID(10) TYPE C, " Object Value
CHANGENR TYPE CDPOS-CHANGENR, " Document change number
TABNAME TYPE CDPOS-TABNAME, " Table Name
FNAME TYPE CDPOS-FNAME, " Field Name
VALUE_NEW TYPE CDPOS-VALUE_NEW, " New contents of changed field
VALUE_OLD TYPE CDPOS-VALUE_OLD, " Old contents of changed field
END OF FS_CDPOS,
Field String to hold Date Element Name *
BEGIN OF FS_DATAELE,
TABNAME TYPE DD03L-TABNAME, " Table Name
FIELDNAME TYPE DD03L-FIELDNAME, " Field Name
ROLLNAME TYPE DD03L-ROLLNAME, " Data element (semantic domain)
END OF FS_DATAELE,
Field String to hold Short Text of the Date Element *
BEGIN OF FS_TEXT,
ROLLNAME TYPE DD04T-ROLLNAME, " Data element (semantic domain)
DDTEXT TYPE DD04T-DDTEXT, " Short Text Describing R/3
" Repository Objects
END OF FS_TEXT,
Field String to hold data to be displayed on the ALV grid *
BEGIN OF FS_OUTTAB,
EBELN TYPE EKKO-EBELN, " Purchasing Document Number
ERNAM TYPE EKKO-ERNAM, " Name of Person who Created the
" Object
LIFNR TYPE EKKO-LIFNR, " Vendor's account number
EKGRP TYPE EKKO-EKGRP, " Purchasing group
BEDAT TYPE EKKO-BEDAT, " Purchasing Document Date
WERKS TYPE LFA1-WERKS, " Plant
NAME1 TYPE LFA1-NAME1, " Name1
USERNAME TYPE CDHDR-USERNAME, " User name
UDATE TYPE CDHDR-UDATE, " Creation date of the change
" document
DDTEXT TYPE DD04T-DDTEXT, " Short Text Describing R/3
" Repository Objects
VALUE_NEW TYPE CDPOS-VALUE_NEW, " New contents of changed field
VALUE_OLD TYPE CDPOS-VALUE_OLD, " Old contents of changed field
END OF FS_OUTTAB,
Internal table to hold Purchase Document Number *
T_EBELN LIKE STANDARD TABLE
OF FS_EBELN,
Internal table to hold Purchase Document Header *
T_EKKO LIKE STANDARD TABLE
OF FS_EKKO,
Temp Internal table to hold Purchase Document Header *
T_EKKO_TEMP LIKE STANDARD TABLE
OF FS_EKKO,
Internal table to hold Account number and Name of the Vendor *
T_LFA1 LIKE STANDARD TABLE
OF FS_LFA1,
Internal Table to hold Change date and the name of the user *
T_CDHDR LIKE STANDARD TABLE
OF FS_CDHDR,
Internal Table to hold Change document items *
T_CDPOS LIKE STANDARD TABLE
OF FS_CDPOS,
Temp. Internal Table to hold Change document items *
T_CDPOS_TEMP LIKE STANDARD TABLE
OF FS_CDPOS,
Internal Table to hold Data Element Name *
T_DATAELE LIKE STANDARD TABLE
OF FS_DATAELE,
Temp. Internal Table to hold Data Element Name *
T_DATAELE_TEMP LIKE STANDARD TABLE
OF FS_DATAELE,
Internal Table to hold Short Text of the Date Element *
T_TEXT LIKE STANDARD TABLE
OF FS_TEXT,
Internal Table to hold data to be displayed on the ALV grid *
T_OUTTAB LIKE STANDARD TABLE
OF FS_OUTTAB.
C L A S S D E F I N I T I O N *
CLASS LCL_EVENT_HANDLER DEFINITION DEFERRED.
*" Data declarations...................................................
Work variables *
DATA:
W_EBELN TYPE EKKO-EBELN, " Purchasing Document Number
W_LIFNR TYPE EKKO-LIFNR, " Vendor's account number
W_EKGRP TYPE EKKO-EKGRP, " Purchasing group
W_VALUE TYPE EKKO-EBELN, " Reflected Value
W_SPACE VALUE ' ', " Space
W_FLAG TYPE I, " Flag Variable
W_VARIANT TYPE DISVARIANT, " Variant
*--- ALV Grid
W_GRID TYPE REF TO CL_GUI_ALV_GRID,
*--- Event Handler
W_EVENT_CLICK TYPE REF TO LCL_EVENT_HANDLER,
*--- Field catalog table
T_FIELDCAT TYPE LVC_T_FCAT.
AT SELECTION-SCREEN EVENT *
AT SELECTION-SCREEN ON S_EBELN.
Subroutine to validate Purchase Document Number.
PERFORM VALIDATE_PD_NUM.
AT SELECTION-SCREEN ON S_LIFNR.
Subroutine to validate Vendor Number.
PERFORM VALIDATE_VEN_NUM.
AT SELECTION-SCREEN ON S_EKGRP.
Subroutine to validate Purchase Group.
PERFORM VALIDATE_PUR_GRP.
START-OF-SELECTION EVENT *
START-OF-SELECTION.
Subroutine to select all Purchase orders.
PERFORM SELECT_PO.
CHECK W_FLAG EQ 0.
Subroutine to select Object values.
PERFORM SELECT_OBJ_ID.
CHECK W_FLAG EQ 0.
Subroutine to select Changed values.
PERFORM SELECT_CHANGED_VALUE.
CHECK W_FLAG EQ 0.
Subroutine to Select Purchase Orders.
PERFORM SELECT_PUR_DOC.
Subroutine to select Vendor Details.
PERFORM SELECT_VENDOR.
Subroutine to select Text for the Changed values.
PERFORM DESCRIPTION.
END-OF-SELECTION EVENT *
END-OF-SELECTION.
IF NOT T_EKKO IS INITIAL.
Subroutine to populate the Output Table.
PERFORM FILL_OUTTAB.
Subroutine to build Field Catalog.
PERFORM PREPARE_FIELD_CATALOG CHANGING T_FIELDCAT.
CALL SCREEN 100.
ENDIF. " IF NOT T_EKKO...
CLASS LCL_EVENT_HANDLER DEFINITION
Defining Class which handles events
CLASS LCL_EVENT_HANDLER DEFINITION .
PUBLIC SECTION .
METHODS:
HANDLE_HOTSPOT_CLICK
FOR EVENT HOTSPOT_CLICK OF CL_GUI_ALV_GRID
IMPORTING E_ROW_ID E_COLUMN_ID.
ENDCLASS. " LCL_EVENT_HANDLER DEFINITION
CLASS LCL_EVENT_HANDLER IMPLEMENTATION
Implementing the Class which can handle events
CLASS LCL_EVENT_HANDLER IMPLEMENTATION .
*---Handle Double Click
METHOD HANDLE_HOTSPOT_CLICK .
Subroutine to get the HotSpot Cell information.
PERFORM GET_CELL_INFO.
SET PARAMETER ID 'BES' FIELD W_VALUE.
CALL TRANSACTION 'ME23N'.
ENDMETHOD. " HANDLE_HOTSPOT_CLICK
ENDCLASS. " LCL_EVENT_HANDLER
*& Module STATUS_0100 OUTPUT
PBO Event
MODULE STATUS_0100 OUTPUT.
SET PF-STATUS 'OOPS'.
SET TITLEBAR 'TIT'.
Subroutine to fill the Variant Structure
PERFORM FILL_VARIANT.
IF W_GRID IS INITIAL.
CREATE OBJECT W_GRID
EXPORTING
I_SHELLSTYLE = 0
I_LIFETIME =
I_PARENT = CL_GUI_CONTAINER=>SCREEN0
I_APPL_EVENTS =
I_PARENTDBG =
I_APPLOGPARENT =
I_GRAPHICSPARENT =
I_NAME =
I_FCAT_COMPLETE = SPACE
EXCEPTIONS
ERROR_CNTL_CREATE = 1
ERROR_CNTL_INIT = 2
ERROR_CNTL_LINK = 3
ERROR_DP_CREATE = 4
OTHERS = 5.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF. " IF SY-SUBRC <> 0
CALL METHOD W_GRID->SET_TABLE_FOR_FIRST_DISPLAY
EXPORTING
I_BUFFER_ACTIVE =
I_BYPASSING_BUFFER =
I_CONSISTENCY_CHECK =
I_STRUCTURE_NAME =
IS_VARIANT = W_VARIANT
I_SAVE = 'A'
I_DEFAULT = 'X'
IS_LAYOUT =
IS_PRINT =
IT_SPECIAL_GROUPS =
IT_TOOLBAR_EXCLUDING =
IT_HYPERLINK =
IT_ALV_GRAPHICS =
IT_EXCEPT_QINFO =
IR_SALV_ADAPTER =
CHANGING
IT_OUTTAB = T_OUTTAB
IT_FIELDCATALOG = T_FIELDCAT
IT_SORT =
IT_FILTER =
EXCEPTIONS
INVALID_PARAMETER_COMBINATION = 1
PROGRAM_ERROR = 2
TOO_MANY_LINES = 3
OTHERS = 4
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF. " IF SY-SUBRC <> 0.
ENDIF. " IF W_GRID IS INITIAL
CREATE OBJECT W_EVENT_CLICK.
SET HANDLER W_EVENT_CLICK->HANDLE_HOTSPOT_CLICK FOR W_GRID.
ENDMODULE. " STATUS_0100 OUTPUT
*& Module USER_COMMAND_0100 INPUT
PAI Event
MODULE USER_COMMAND_0100 INPUT.
CASE SY-UCOMM.
WHEN 'BACK'.
LEAVE TO SCREEN 0.
WHEN 'EXIT'.
LEAVE PROGRAM.
WHEN 'CANCEL'.
LEAVE TO SCREEN 0.
ENDCASE.
ENDMODULE. " USER_COMMAND_0100 INPUT
*& Form PREPARE_FIELD_CATALOG
Subroutine to build the Field catalog
<--P_T_FIELDCAT Field Catalog Table
FORM PREPARE_FIELD_CATALOG CHANGING PT_FIELDCAT TYPE LVC_T_FCAT .
DATA LS_FCAT TYPE LVC_S_FCAT.
Purchasing group...
LS_FCAT-FIELDNAME = 'EKGRP'.
LS_FCAT-REF_TABLE = 'EKKO'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Purchasing Document Number...
LS_FCAT-FIELDNAME = 'EBELN'.
LS_FCAT-REF_TABLE = 'EKKO' .
LS_FCAT-EMPHASIZE = 'C411'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
LS_FCAT-HOTSPOT = 'X'.
APPEND LS_FCAT TO PT_FIELDCAT .
CLEAR LS_FCAT .
Name of Person who Created the Object...
LS_FCAT-FIELDNAME = 'ERNAM'.
LS_FCAT-REF_TABLE = 'EKKO'.
LS_FCAT-OUTPUTLEN = '15' .
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Purchasing Document Date...
LS_FCAT-FIELDNAME = 'BEDAT'.
LS_FCAT-REF_TABLE = 'EKKO'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Vendor's account number...
LS_FCAT-FIELDNAME = 'LIFNR'.
LS_FCAT-REF_TABLE = 'EKKO'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Account Number of Vendor or Creditor...
LS_FCAT-FIELDNAME = 'NAME1'.
LS_FCAT-REF_TABLE = 'LFA1'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
LS_FCAT-COLTEXT = 'Vendor Name'(001).
LS_FCAT-SELTEXT = 'Vendor Name'(001).
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Creation date of the change document...
LS_FCAT-FIELDNAME = 'UDATE'.
LS_FCAT-REF_TABLE = 'CDHDR'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
LS_FCAT-COLTEXT = 'Change Date'(002).
LS_FCAT-SELTEXT = 'Change Date'(002).
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
User name of the person responsible in change document...
LS_FCAT-FIELDNAME = 'USERNAME'.
LS_FCAT-REF_TABLE = 'CDHDR'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '10'.
LS_FCAT-COLTEXT = 'Modified by'(003).
LS_FCAT-SELTEXT = 'Modified by'(003).
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Short Text Describing R/3 Repository Objects...
LS_FCAT-FIELDNAME = 'DDTEXT'.
LS_FCAT-REF_TABLE = 'DD04T'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '15'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
Old contents of changed field...
LS_FCAT-FIELDNAME = 'VALUE_OLD'.
LS_FCAT-REF_TABLE = 'CDPOS'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '12'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
New contents of changed field...
LS_FCAT-FIELDNAME = 'VALUE_NEW'.
LS_FCAT-REF_TABLE = 'CDPOS'.
LS_FCAT-INTTYPE = 'C'.
LS_FCAT-OUTPUTLEN = '12'.
APPEND LS_FCAT TO PT_FIELDCAT.
CLEAR LS_FCAT.
ENDFORM. " PREPARE_FIELD_CATALOG
*& Form SELECT_PO
Subroutine to select all the Purchase Orders
There are no interface parameters to be passed to this subroutine.
FORM SELECT_PO .
SELECT EBELN " Purchasing Document Number
ERNAM " Name of Person who Created
" the Object
LIFNR " Vendor's account number
EKGRP " Purchasing group
BEDAT " Purchasing Document Date
FROM EKKO
PACKAGE SIZE 10000
APPENDING TABLE T_EBELN
WHERE EBELN IN S_EBELN
AND BEDAT IN S_BEDAT.
ENDSELECT.
IF SY-SUBRC NE 0.
W_FLAG = 1.
MESSAGE S401(M8).
ENDIF. " IF SY-SUBRC NE 0
ENDFORM. " SELECT_PO
*& Form SELECT_OBJ_ID
Subroutine to select Object ID
There are no interface parameters to be passed to this subroutine.
FORM SELECT_OBJ_ID .
IF NOT T_EBELN IS INITIAL.
SELECT OBJECTCLAS " Object Class
OBJECTID " Object value
CHANGENR " Document change number
USERNAME " User name
UDATE " Creation date
FROM CDHDR
INTO TABLE T_CDHDR
FOR ALL ENTRIES IN T_EBELN
WHERE OBJECTID EQ T_EBELN-EBELN
AND UDATE IN S_UDATE
AND TCODE IN ('ME21N','ME22N','ME23N').
ENDSELECT.
IF SY-SUBRC NE 0.
W_FLAG = 1.
MESSAGE S833(M8) WITH 'Header Not Found'(031).
ENDIF. " IF SY-SUBRC NE 0.
ENDIF. " IF NOT T_EBELN IS INITIAL
ENDFORM. " SELECT_OBJ_ID
*& Form SELECT_CHANGED_VALUE
Subroutine to select Changed Values
There are no interface parameters to be passed to this subroutine.
FORM SELECT_CHANGED_VALUE .
IF NOT T_CDHDR IS INITIAL.
SELECT OBJECTCLAS " Object class
OBJECTID " Object value
CHANGENR " Document change number
TABNAME " Table Name
FNAME " Field Name
VALUE_NEW " New contents of changed field
VALUE_OLD " Old contents of changed field
FROM CDPOS
PACKAGE SIZE 10000
APPENDING TABLE T_CDPOS
FOR ALL ENTRIES IN T_CDHDR
WHERE OBJECTCLAS EQ T_CDHDR-OBJECTCLAS
AND OBJECTID EQ T_CDHDR-OBJECTID
AND CHANGENR EQ T_CDHDR-CHANGENR.
ENDSELECT.
IF SY-SUBRC NE 0.
W_FLAG = 1.
MESSAGE S833(M8) WITH 'Item Not Found'(032).
ENDIF. " IF SY-SUBRC NE 0.
ENDIF. " IF NOT T_CDHDR IS INITIAL
T_CDPOS_TEMP[] = T_CDPOS[].
ENDFORM. " SELECT_CHANGED_VALUE
*& Form SELECT_PUR_DOC
Subroutine to select Purchase Order Details
There are no interface parameters to be passed to this subroutine.
FORM SELECT_PUR_DOC .
IF NOT T_CDPOS IS INITIAL.
SORT T_EBELN BY EBELN.
LOOP AT T_CDPOS INTO FS_CDPOS.
READ TABLE T_EBELN INTO FS_EBELN WITH KEY EBELN =
FS_CDPOS-OBJECTID BINARY SEARCH.
IF SY-SUBRC NE 0.
DELETE TABLE T_EBELN FROM FS_EBELN.
ENDIF. " IF SY-SUBRC NE 0.
ENDLOOP. " LOOP AT T_CDPOS...
LOOP AT T_EBELN INTO FS_EBELN.
MOVE FS_EBELN-EBELN TO FS_EKKO-EBELN.
MOVE FS_EBELN-ERNAM TO FS_EKKO-ERNAM.
MOVE FS_EBELN-LIFNR TO FS_EKKO-LIFNR.
MOVE FS_EBELN-EKGRP TO FS_EKKO-EKGRP.
MOVE FS_EBELN-BEDAT TO FS_EKKO-BEDAT.
APPEND FS_EKKO TO T_EKKO.
ENDLOOP. " LOOP AT T_EBELN...
T_EKKO_TEMP[] = T_EKKO[].
ENDIF. " IF NOT T_CDPOS IS INITIAL
ENDFORM. " SELECT_PUR_DOC
*& Form SELECT_VENDOR
Subroutine to select Vendor details
There are no interface parameters to be passed to this subroutine.
FORM SELECT_VENDOR .
IF NOT T_EKKO IS INITIAL.
SORT T_EKKO_TEMP BY LIFNR.
DELETE ADJACENT DUPLICATES FROM T_EKKO_TEMP COMPARING LIFNR.
SELECT LIFNR " Account Number of Vendor or
" Creditor
NAME1 " Name 1
FROM LFA1
INTO TABLE T_LFA1
FOR ALL ENTRIES IN T_EKKO_TEMP
WHERE LIFNR EQ T_EKKO_TEMP-LIFNR.
IF SY-SUBRC NE 0.
MESSAGE S002(M8) WITH 'Master Details'(033).
ENDIF. " IF SY-SUBRC NE 0.
ENDIF. " IF NOT T_EKKO IS INITIAL
ENDFORM. " SELECT_VENDOR
*& Form DESCRIPTION
Subroutine to get the description
There are no interface parameters to be passed to this subroutine.
FORM DESCRIPTION .
IF NOT T_CDPOS IS INITIAL.
SORT T_CDPOS_TEMP BY TABNAME FNAME.
DELETE ADJACENT DUPLICATES FROM T_CDPOS_TEMP COMPARING TABNAME FNAME
SELECT TABNAME " Table Name
FIELDNAME " Field Name
ROLLNAME " Data element
FROM DD03L
INTO TABLE T_DATAELE
FOR ALL ENTRIES IN T_CDPOS_TEMP
WHERE TABNAME EQ T_CDPOS_TEMP-TABNAME
AND FIELDNAME EQ T_CDPOS_TEMP-FNAME.
IF NOT T_DATAELE IS INITIAL.
T_DATAELE_TEMP[] = T_DATAELE[].
SORT T_DATAELE_TEMP BY ROLLNAME.
DELETE ADJACENT DUPLICATES FROM T_DATAELE_TEMP COMPARING ROLLNAME.
SELECT ROLLNAME " Data element
DDTEXT " Short Text Describing R/3
" Repository Objects
FROM DD04T
INTO TABLE T_TEXT
FOR ALL ENTRIES IN T_DATAELE_TEMP
WHERE ROLLNAME EQ T_DATAELE_TEMP-ROLLNAME
AND DDLANGUAGE EQ SY-LANGU.
IF SY-SUBRC NE 0.
EXIT.
ENDIF. " IF SY-SUBRC NE 0.
ENDIF. " IF NOT T_DATAELE IS INITIAL.
ENDIF. " IF NOT T_CDPOS IS INITIAL.
ENDFORM. " DESCRIPTION
*& Form FILL_OUTTAB
Subroutine to populate the Outtab
There are no interface parameters to be passed to this subroutine.
FORM FILL_OUTTAB .
SORT T_CDHDR BY OBJECTCLAS OBJECTID CHANGENR.
SORT T_EKKO BY EBELN.
SORT T_LFA1 BY LIFNR.
SORT T_DATAELE BY TABNAME FIELDNAME.
SORT T_TEXT BY ROLLNAME.
LOOP AT T_CDPOS INTO FS_CDPOS.
READ TABLE T_CDHDR INTO FS_CDHDR WITH KEY
OBJECTCLAS = FS_CDPOS-OBJECTCLAS
OBJECTID = FS_CDPOS-OBJECTID
CHANGENR = FS_CDPOS-CHANGENR
BINARY SEARCH.
IF SY-SUBRC EQ 0.
MOVE FS_CDHDR-USERNAME TO FS_OUTTAB-USERNAME.
MOVE FS_CDHDR-UDATE TO FS_OUTTAB-UDATE.
READ TABLE T_EKKO INTO FS_EKKO WITH KEY
EBELN = FS_CDHDR-OBJECTID
BINARY SEARCH.
IF SY-SUBRC EQ 0.
MOVE FS_EKKO-EBELN TO FS_OUTTAB-EBELN.
MOVE FS_EKKO-ERNAM TO FS_OUTTAB-ERNAM.
MOVE FS_EKKO-LIFNR TO FS_OUTTAB-LIFNR.
MOVE FS_EKKO-EKGRP TO FS_OUTTAB-EKGRP.
MOVE FS_EKKO-BEDAT TO FS_OUTTAB-BEDAT.
READ TABLE T_LFA1 INTO FS_LFA1 WITH KEY
LIFNR = FS_EKKO-LIFNR
BINARY SEARCH.
IF SY-SUBRC EQ 0.
MOVE FS_LFA1-NAME1 TO FS_OUTTAB-NAME1.
ENDIF. " IF SY-SUBRC EQ 0.
ENDIF. " IF SY-SUBRC EQ 0.
ENDIF. " IF SY-SUBRC EQ 0.
MOVE FS_CDPOS-VALUE_NEW TO FS_OUTTAB-VALUE_NEW.
MOVE FS_CDPOS-VALUE_OLD TO FS_OUTTAB-VALUE_OLD.
READ TABLE T_DATAELE INTO FS_DATAELE WITH KEY
TABNAME = FS_CDPOS-TABNAME
FIELDNAME = FS_CDPOS-FNAME
BINARY SEARCH.
IF SY-SUBRC EQ 0.
READ TABLE T_TEXT INTO FS_TEXT WITH KEY
ROLLNAME = FS_DATAELE-ROLLNAME
BINARY SEARCH.
IF SY-SUBRC EQ 0.
MOVE FS_TEXT-DDTEXT TO FS_OUTTAB-DDTEXT.
ENDIF. " IF SY-SUBRC EQ 0.
ENDIF. " IF SY-SUBRC EQ 0.
APPEND FS_OUTTAB TO T_OUTTAB.
CLEAR FS_OUTTAB.
ENDLOOP.
ENDFORM. " FILL_OUTTAB
*& Form GET_CELL_INFO
Subroutine to get the Cell Information
--> W_VALUE Holds the value of Hotspot clicked
FORM GET_CELL_INFO .
CALL METHOD W_GRID->GET_CURRENT_CELL
IMPORTING
E_ROW =
E_VALUE = W_VALUE
E_COL =
ES_ROW_ID =
ES_COL_ID =
ES_ROW_NO =
ENDFORM. " GET_CELL_INFO
*& Form VALIDATE_PD_NUM
Subroutine to validate Purchase Document Number
There are no interface parameters to be passed to this subroutine.
FORM VALIDATE_PD_NUM .
IF NOT S_EBELN[] IS INITIAL.
SELECT EBELN " Purchase Document Number
FROM EKKO
INTO W_EBELN
UP TO 1 ROWS
WHERE EBELN IN S_EBELN.
ENDSELECT.
IF SY-SUBRC NE 0.
CLEAR SSCRFIELDS-UCOMM.
MESSAGE E717(M8).
ENDIF. " IF SY-SUBRC NE 0
ENDIF. " IF NOT S_EBELN[]...
ENDFORM. " VALIDATE_PD_NUM
*& Form VALIDATE_VEN_NUM
Subroutine to validate Vendor Number
There are no interface parameters to be passed to this subroutine.
FORM VALIDATE_VEN_NUM .
IF NOT S_LIFNR[] IS INITIAL.
SELECT LIFNR " Vendor Number
FROM LFA1
INTO W_LIFNR
UP TO 1 ROWS
WHERE LIFNR IN S_LIFNR.
ENDSELECT.
IF SY-SUBRC NE 0.
CLEAR SSCRFIELDS-UCOMM.
MESSAGE E002(M8) WITH W_SPACE.
ENDIF. " IF SY-SUBRC NE 0
ENDIF. " IF NOT S_LIFNR[]...
ENDFORM. " VALIDATE_VEN_NUM
*& Form VALIDATE_PUR_GRP
Subroutine to validate the Purchase Group
There are no interface parameters to be passed to this subroutine.
FORM VALIDATE_PUR_GRP .
IF NOT S_EKGRP[] IS INITIAL.
SELECT EKGRP " Purchase Group
FROM T024
INTO W_EKGRP
UP TO 1 ROWS
WHERE EKGRP IN S_EKGRP.
ENDSELECT.
IF SY-SUBRC NE 0.
CLEAR SSCRFIELDS-UCOMM.
MESSAGE E622(M8) WITH W_SPACE.
ENDIF. " IF SY-SUBRC NE 0
ENDIF. " IF NOT S_EKFRP[]...
ENDFORM. " VALIDATE_PUR_GRP
*& Form FILL_VARIANT
Subroutine to fill the Variant Structure
There are no interface parameters to be passed to this subroutine
FORM FILL_VARIANT .
Filling the Variant structure
W_VARIANT-REPORT = SY-REPID.
W_VARIANT-USERNAME = SY-UNAME.
ENDFORM. " FILL_VARIANT
Check the above Program. You have related data from <b>CDPOS, CDHDR.</b>
Regards,
Pavan -
Internal Item Number " Items not appearing in Sales order Line form
Hi,
We are in 11.5.7 vis. While choosing an item in the Sales order form, only the line items with type 'chargemaster' and 'vendor' appear. The items with type 'Internal item number' doesn't appear anymore. The item validation organization is set to the Master Inventory organization.(V1).
When i checked the pricelist creation screen, with product attribute - item number, the product value field is empty and greyed out for all the items.
I compiled the system Items flexfield. I tried adding a new product to the pricelist with product attribute-item number,product value - A000 .All the items (with their internal item numbers) appear while choosing the product, but the product description doesn't default and the field remains empty and greyed out.
After saving the item in the price list and if i query for this particular item, the product description appears but the product value now becomes empty and greyed out.
Any explanation as to to why this is behaving so and to rectify the same?
Regards,
NithyaHi,
Check item category determination (VOV4) whether the item category is determine with the combination of material item
category group,untill the material being read by the system it will not give the line item no,and also check at VOV8 for your doc
type Item no.increment Ex: 10, is maintained or not ,if not maintain and try.
Regards
Ram -
Hi All,
Currently i'm working on a EDI2JDBC scenario. we have a field called LINE_ITEM_NUMBER at the target side. The incoming EDI signal doesn't contain the line item number and at the target side for every line item we need a create line item number. Lets suppose the incoming signals contains 3 line item number then at target side the value for LINE_ITEM_NUMBER should be 1,2 and 3. Can i achieve this functionality with any standard function or do i need to write an UDF? Can anyone provide the code for UDF?
Your hekp is highly appreciated.
Regards
Faisal.Hi Faisal,
The Below mapping will work for your requirement..
Source(LineItemNumber)--->Index(Initial Value = 1, Increment = 1 )------\
then
Source(LineItemNumber) ----> Exisists -----> If ------>Target(LineItemNumber)
else
Constant[0] ------------/
If Input is
<Source>
<Line>aaaa</Line>
<Line>bbbb</Line>
<Line>cccc</Line>
</Source>
Your Target will be Like This
<Target>
<Line>1</Line>
<Line>2</Line>
<Line>3</Line>
</Target>
I have Tested That Mapping.. Working as shown below.
Let me know For any clarifications..
Regards
Jyothi A. -
Find Item number based on Sales document and material in GTS system
Dear experts,
I have a situation where in I created a Sales order in ECC system and transmitted the document to GTS for compliance check.
Now, during my subsequent processing in ECC side, there is a situation where in I need to check if the document (at every item level) is blocked for any reason or is it good to go. But I do not have the item number in ECC side (at the point where I'm calling RFC to GTS to check). I only have sales order number and the material number.
So, can some one point me table level information in GTS side on how I could find the item number based on Sales document and the material (In our scenario all our materials in a sales order will be distinct).
Please provide me table information on where the sales document number, item number, material info are stored in GTS.
Thanks for your time
-AmitUse these tables
/SAPSLL/CORREF
/SAPSLL/PNTPR
/SAPSLL/CUIT -
BOM Item number and the pr number created through network
We can create PR through network. If we know the PR number and the item number, how do we find the BOM item number in the network?
BOM item number
Item number of the BOM components copied into the order.RSDB
RSBD POSNR -
Sales Order-Line Item Number Field not Appearing
Dear All
I have an issue in which, in sales order, the field where I enter material, I am not able to see the line item number.
For example; if the Material X is entered, I cannot see the item number as 10.
Can I know what might be the problem.
Thanks and Regards
AdithyaHi,
Check item category determination (VOV4) whether the item category is determine with the combination of material item
category group,untill the material being read by the system it will not give the line item no,and also check at VOV8 for your doc
type Item no.increment Ex: 10, is maintained or not ,if not maintain and try.
Regards
Ram -
When validate item for a particular item number
hi all
i am using forms 6i
In a master detail form
the block XXNP_JL_OO1 has 2 fields like
Manual--checkbox item
Field--text item (populated from Lov RECORD group names Field)
the query for the record group of FIELD is
select flex_value from fnd_flex_values where flex_value_set_id=1009757
flex value
abdaly
wafra
fintas
now if we do the query select flex_value, hierarchy_level from fnd_flex_values where flex_value_set_id=1009757
flex_value hierarchy_level
abdaly 315
wafra 200
fintas 100
In the detail part
there is a tabbed canvas one field is ACT_QTY
ITEM NUMBER ACTQTY
client requirement is whenever the item number is 1010103002 only and the manual checkbox item is ticked the act_qty should return values corresponding to the data in Field
manual and field belongs to datablock XXNP_JL_001
ITEM_NUMBER AND ACT_QTY belongs to data block xxnp_jl_est_002
kindly guide how to proceed with this
should i do a when validate item trigger in act_qty as follow
BEGIN
IF :XXNP_JL_001.Manual IS NOT NULL and XXNP_JL_EST_002.ITEM_NUMBER='1010103002' THEN
SELECT hierarchy_level
INTO :XXNP_JL_EST_002.ACT_QTY
FROM fnd_flex_values
WHERE flex_value_set_id = 1009757
AND FLEX_VALUE=:XXNP_JL_001.FIELD ;
ELSE
:XXNP_JL_EST_002.ACT_QTY:=NULL;
END IF;
ENDthanking in advance
Edited by: makdutakdu on May 8, 2012 11:15 AM
Edited by: makdutakdu on May 8, 2012 11:16 AM
Edited by: makdutakdu on May 8, 2012 11:23 AM
Edited by: makdutakdu on May 9, 2012 9:00 AMhi
this is the code i wrote
when job is manual(check box ticked) and item number=''1010103002' the act_qty as per client requirement as follows
BEGIN
IF :XXNP_JL_001.Manual IS NOT NULL and XXNP_JL_EST_002.ITEM_NUMBER='1010103002' THEN
SELECT hierarchy_level
INTO :XXNP_JL_EST_002.ACT_QTY
FROM fnd_flex_values
WHERE flex_value_set_id = 1009757
AND FLEX_VALUE=:XXNP_JL_001.FIELD ;
ELSE
:XXNP_JL_EST_002.ACT_QTY:=NULL;
END IF;
END;the original code as to how act_qty is populated now
ORIGINAL CODE OF WHEN VALIDATE ITEM FOR ACT_QTY
Declare
V_count number(10) ;
Begin
SELECT count(1) into V_count FROM MTL_SYSTEM_ITEMS
WHERE SEGMENT1 = :XXNP_JL_EST_002.item_number
AND ATTRIBUTE3 = 'Yes' ;
If V_count >=1 then
:XXNP_JL_EST_002.CALC_CEMENT_SK := :XXNP_JL_EST_002.act_QTY ;
:XXNP_JL_EST_002.CALC_AMOUNT := :XXNP_JL_EST_002.act_QTY * 94 ;
Else
:XXNP_JL_EST_002.CALC_AMOUNT := :XXNP_JL_EST_002.act_QTY ;
end if ;
end ;
-----------------------------------------------------------i want to include the above original code of act_qty in my code in the else clause
this is wht i tried
Declare
V_count number(10) ;
Begin
IF :XXNP_JL_001.Manual IS NOT NULL and :XXNP_JL_EST_002.ITEM_NUMBER='1010103002' THEN
SELECT hierarchy_level
INTO :XXNP_JL_EST_002.ACT_QTY
FROM fnd_flex_values
WHERE flex_value_set_id = 1009757
AND FLEX_VALUE=:XXNP_JL_001.FIELD ;
ELSE
----------original code of act_qty included below in the else clause-----------------------------
SELECT count(1) into V_count FROM MTL_SYSTEM_ITEMS
WHERE SEGMENT1 = :XXNP_JL_EST_002.item_number
AND ATTRIBUTE3 = 'Yes' ;
If V_count >=1 then
:XXNP_JL_EST_002.CALC_CEMENT_SK := :XXNP_JL_EST_002.act_QTY ;
:XXNP_JL_EST_002.CALC_AMOUNT := :XXNP_JL_EST_002.act_QTY * 94 ;
Else
:XXNP_JL_EST_002.CALC_AMOUNT := :XXNP_JL_EST_002.act_QTY ;
end if ;
END IF;
end ;
END;i am getting error fnd_flex_values should be declared
kindly guide me
thanking in advance -
Net value of Sales order Zero - delete line item
Hi,
Sales Order is raised for 3 materials.
Line item 10 --> 1 Qty --> Quantity delivered -->1
Line item 20 --> 1 Qty --> Quantity delivered -->1
Line item 30 --> 1 Qty --> Quantity delivered -->0
Line item 10 and 20 have some price but as a result of R100(100% discount) their net value is zero.
Line item 30 has some price, lets say Rs. 100
The requirement: Line item 30 needs to be deleted.
When I delete line item 30 and attempt to save the order, it takes me to incompletion log.
Where it displays line item 10 Missing Data Net Value
Where it displays line item 20 Missing Data Net Value
What are the possible solutions?
Happy Diwali in advance.
thanks,I think I need divine intervention on this.
1.I applied OSS NOTE 106567 and ran the report SDVBUV00 but it didnot solve my problem. Raised this issue in OSS also, but no solution.
2.I changed the incompletion log for my sales doc at item level... I changed VBAP-NETWR as warning but still I could not solve it.
3. Assigning "reason for rejection" at item level, does not solve the purpose and it invokes the incompletion log
Any other options.
Just a quick recap on the nature of problem.
"+ Sales Order is raised for 3 materials.
Line item 10 --> 1 Qty --> Quantity delivered -->1
Line item 20 --> 1 Qty --> Quantity delivered -->1
Line item 30 --> 1 Qty --> Quantity delivered -->0
Line item 10 and 20 have some price but as a result of R100(100% discount) their net value is zero.
Line item 30 has some price, lets say Rs. 100
The requirement: Line item 30 needs to be deleted.
When I delete line item 30 and attempt to save the order, it takes me to incompletion log.
Where it displays line item 10 Missing Data Net Value
Where it displays line item 20 Missing Data Net Value" + -
Internal Order Settlment Error: First settle items from previous year in
Dear Gurus,
I tried to work out a solution to settle AUC to G/L expense account through internal order. I tested in QA system it works well. But in PRD, it gave me an error message "First settle items from previous year in the previous year".
The process is the following: IO-> AUC-> FXA or G/L. Becaue user has done some expense transaction wrongly to the AUC so he wants to post the balances in AUC to GL expense account.
I have set the final settlement to GL as optional and config some pop up message as warning message and implement a sap notes to fulfill this request.
I guess my problem is:
I tested in QA in senario the IO was created in 2009 and I tried to settle it to a GL in 2010. So it shows no problem. However in PRD the IO was created in 2008 and the final settlement year is 2010 or 2011 so it shows the error which was not shown in QA.
The error message only shows "First settle items from previous year in the previous year". No more detail to me.
Have you ever run into this problem before? Please help to throw some lights on it.
EmmaHi,
Thanks. I am considering to updated the AW624 according to the notes.
The detailed message is:
Message Text
First settle items from the previous year in the previous year.
Technical data
Message type _____________ E (Error)
Message Class ______________AW (AuC message)
Message number ______________624
Message variable 1 __________2009
Message variable 2 __________2003359632
Message variable 3 _001
Message variable _______
Message Attributes
Level of detail____ 2(Level of detail 2)
Problem class_______
Sort criterion____
Number________1
Environ.information
Item___________ 001 -
Deleting Parked Documents for Previous Years
Hi
We have got 800 parked documents with a posting date between March 2003
and May 2010. As per audit requirements we need to delete all these
parked docuents which are mostly created through Tcode FV50 or FB50
usin parking option as we don't want to actually post them in system.
These docments have profit centre or cost centre entries in them as
well. Now when we try to delete these parked documents we get an error
message 'Transaction CO Through-postings from FI has been locked'. We
don't want to open the close CO period as it can use great problem to
us so can you please tell us some alternate way or some programme which
can be helpful to delete these parked documents without opening the
closed CO periods. I will really appreciate your kind response in this
regard.
Kind RegardsI just attempted to duplicate the error message you were getting by pinpointing a parked document from 2006 created using FV50. I verified that the document contained cost centers and all CO posting periods from 2006 were locked in OKP1.
I pulled up the document in display mode, clicked on Document in the top left corner and went into change mode, then I clicked on document again while in change mode and selected "Delete Parked Document" and the document was deleted without error. Is this the same deletion method that you are using?
Like the previous response, I don't see how opening the CO posting periods will have any negative impact especially if FI posting periods are left closed. -
When i login to my mac, it opens iTunes, Skype and AIM. I've tried deleting these from the login items, but they are not on the list. Can anyone help?
babowa wrote:
If you do not lock that folder immediately after deleting all the contents, it will simply populate again (Resume - a "feature" in Lion). You do that by doing a Get Info (highlight folder and press Command + I keys), unlock the lock at the bottom, enter your admin password, then check the box to lock the folder. lock the lock and you're done.
Yes, that is correct. The alternative is to quit all applications prior to logging out. Lion will then have a chance to remove the saved states.
babowa also wrote:
And, for the OP:
It has also been a regular feature of Mac OS to automatically open any window that was open at shutdown. To avoit that behavior, simply close any Finder windows and properly quit applications by closing their window and using Command + Q (or File >Quit).
This was true only for the Finder. Prior to Lion, no other apps would launch unless they were included in the Login Items for the account. And the OS would not restore windows for other apps.
A very small number of apps (TextWrangler is an example) implemented this capability prior to Lion. They could restore previously opened windows. But that is an application feature, and can be controlled by the application's preferences. Lion implements it at the system level, and users have virtually no control on a per application basis. -
How to delete multiple items in XSLT Dataview webpart
Hi,
I am creating a combined view based on 3 lists with common column like (number) with merge option and now I have added a delete button on top and my requirement is to delete multiple items on selection in combined view using linked data
source and for single item I am able to delete but I am unable to get the data from number field on multiple selection. deletion is performing in 3 lists based on number column value.
Kindly give me any better procedures than this for deletion of multiple item on selection.
Thanks
Razvi444Hi Razvi444,
According to your description, my understanding is that you want to delete multiple items in XSLT Dataview webpart on button click.
For achieving your demand, you can refer to the blog:
http://tanveerkhan-sharepoint.blogspot.in/2011/08/delete-multiple-items-using-dataview.html
Best Regards,
Eric
Eric Tao
TechNet Community Support
Maybe you are looking for
-
Got error while recover controlfile with rman
Dear all, My controlfile and some datafiles were crash and i tried to recover their with rman as the following step: 1. startup nomount; 2. restore controlfile from autobackup; 3. alter database mount; 4. restore database; 5.SELECT archivelog_change#
-
Pavilion A6750F hangs after new drive with Windows 7 64 install. Suggestions?
Pavilion A6750F new hard drive with clean install of Windows 7 64. The system will hang on many screens from IE to Outlook 2003. If I wait, they will correct themselves. The Bios is version 5.13, but I do not see an update available.
-
Flash Builder Export Release Build Fails
I'm having an issue when trying to export the release build of my AIR application in Flash Builder 4.5. After choosing the key to sign the package and clicking finish to complete the export, it errors saying that "Error occurred while saving the pro
-
Change bookmark/text in footer (OLE-integration)
Hi folks I have a ABAP program with OLE integration to Word (Old program, and therefore the old way to integrate - not DOI!) So far so good. It has been working for the last 4 years. Now I want to add some extra code, so I can insert a value to a boo
-
Where is the look for apple tv option gone?
Trying to setup apple tv on my mac, it is the old apple tv and all forums are telling me to look for apple tv in my settings. It is not there anywhere! I have connected atv to the internet and now just need to stream/save my content to it. ANY ideas