Vendor fiels in MB5B
Hi,
Can we have a vendor field in MB5B report. We want the stock shown on a pericular day or period should show that from which vendor it was purchased.
Please advice how to map this scenario.
Thanks in advance.
S J
Dear,
You will get it through MB51 input movement type 101 and vendor code.
If is not possible to add vendor in MB5B better develop your own report, You have to take material stock from table MARD (In-case of IM) or LQUA (In-case of WM), match with Inventory document (MSEG) to find the purchase order and Vendor (EKKO, EKPO).
Regards,
R.Brahmankar
Similar Messages
-
Sub contracot vendor open and close balance
Dear expert
Here I want to see opening and closing balance of subcontract vendor. In MB5B can see only our plant closing and opening stock. Any standard T-Code is available to see opening and closing stock of subcontract vendor? Please suggest
Regards
karanHI;
try following ;
ME2O - Gives the total quantity with Vendor which is yet to be received
ME80FN give your vendor here and execute report and click on change icon and select PO history and check goods receipt qty and PO order qty there
MBLB
Regards
Kailas Ugale
Edited by: kailasugale on Dec 9, 2011 11:27 AM -
Vendor in selection screen of MB5B
Business requirement is - In transaction MB5B (Stock on posting date), when users select Special stock option, Vendor should be available in selection screen. Purpose is to know Vendor consignment stocks on posting date. Does any one have any clue about how to achieve this or any other alternative suggestion to meet this business requirement ?
Hi,
We need stock balance by Vendor as on date and not material documents posted on a date. So, MB51 and MB59 does not help. Thanks for the response.
Edited by: Tushar123 on Feb 10, 2011 6:14 AM -
Stock in MC.9 and MB5B not matching
Hi,
I am getting stock in MC.9 report and stock in MB5B report not matching for a perticular storage location in a perticular peiod.
Can anyone please help me what may be the reason that both report showing different quantity and value where as both are standard reports.
Waiting for a quick response.
PrasantHello,
The stock of MC.9 reflects the complete stock at plant level. It includes also the sock of material which one is send to vendor.(Subcontracting) You can also cross check through MMBE in which stock prov. to vendor is different.
While MB5B had three radio buttons for stock type.
1 - Storage loc/Batch stock - which not include the materials provided to vendor.
2 - Valuated stock - - Total valuated stock as per your selection crieteria.
3 - Special stock -- all the special stock such as subcontracting/pipeline/consignment.
If you click on Valuated radio button and execute it, you will get same stock under head Closing stock and the value will same as the value in MC.9
--Just click Valuated stock radio button.
RGDS
Rajan -
Stock available with vendor as on particular date
Hi,
The requirement is to know the stock at vendor as on particular date say 27th & 28th November 2008
MBLB gives for current date.
Even though I enter requirement date as 27th & 28th Nov 08, ME2O also gives same as current date.
Is there any report that gives the stock at vendor as on particular date?
Regards
VengatHi,
Thanks for the reply.
MB5B does not give per vendor.
If query is to be created may I know the tables involved.
Regards
Vengat -
MB5B - Stock on posting date show in other Unit of measure
Dearl All,
Pls support me this case: I would like to see this report (MB5B - Stock on posting date) in other Unit of measure.
This report shows stock in Basic Unit only.
E.g
Material A, base unit = M, other unit = ROL
Report needs show stock in ROL.
How can I do that?
Thank you vry much!
Cao Huy.Hi,
In your case, order unit as ROL and material basic unit of measure is M.
PO created only for the order unit ROL, and goods have received from the vendor based on the PO order unit.
So,this MB5B stock on posting date is displayed only the total stock received based on the received GR order unit qty .
stock also managed only ROL unit of measues. it is not possible to list based on the M stock unit.
Regards,
thiru -
Vendor stock on particular date
vendor stock on particular date..any std Tcode
plz help
mb5b,mblb,mc.9 wont work
thanks
ramesh reddy(vallur)ME2O
Or
ME2M & ME2L, choose , Item Category L, and choose selection parameter of your requirement.
Choose MB5B,
Choose radio Button Special stock and give special stock as O.It may help u.
Edited by: sudhansu satapathy on Dec 16, 2011 11:46 AM
Edited by: sudhansu satapathy on Dec 16, 2011 11:49 AM -
Dear All ,
Whr can i get report for DATE WISE stock at vendor ?
MBLB : no date selextionj criteria is there .
RegardsDear,
Use MB52.
Enter MB52, Click on Also select special stock indicator.
And enter O - Parts provide to vendor in the field of Special stock indicator.
Then enter other required detail as per your requirement and click on execute button.
With Special stock indicator you can also use MMBE,MB5B.
Regards,
Mahesh Wagh
Edited by: Mahesh Wagh on Sep 27, 2008 8:18 AM -
Stck on posting date for vendor.
can i have the Transaction code to check stock on posting date of vendor stock
(i..e vendor stock on specific date )
MBLB is the transaction code to check vendor stock.
mb5b special stockHi,
I would suggest that you request a simple ABAP for this.
It is not as difficult to write as it would appear.
You know the current stock and you can get a list of the material documents that have updated that stock and so the program just needs to subtract the movements between now and the date that you want, to give you your report.
MB5B is the nearest standard report and this doesn't have vendor on the selection screen and so you will have to write something.
Steve B -
Stock Quantity & Stock Value at vendor on a Particular Date
HI,
My client requirement is to get a report for Stock Quantity & Stock Value at vendor on a Particular Date .
Please give suggestions to get the stock & value in tables or Any standard T.codes
Note : I am getting Stock qty on paricular date In MB5B & S_P00_07000140 , but not getting the values
Regards,
PRHI,
we can get this report thru SAP standard without vendor selection, do the following steps
1. goto MB5B
2. Give plant /material details
3. give selection date
4. select stock type option as special stock
5. select special stoct indicator as "O" for material provided to vendor
excute the same , you will get a report with qty and value posted for the vendor from the plant
here by copying this standard program we can add one more input parameter as vendor, then we can get this report vendorwise also.
try this and let us know
Regards
Sridharan -
Hi
I want to treat vendor as a customer.
I entered customer no on vedor master and vise versa.
But i didnt find for ticking "Clr customer" "clr vendor"
In vendor and customer master where should I get this tick fiels.
its urgentAn extra indicator is not necessary if you have entered the fields you mentioned.
The clearance is done with F.13 transaction -
Hi experts,
I am creating vendor's stock report. I am facing problem i am not getting all material for perticular vendor in MSEG but when i am checking standard report ME2O or MB5B it showing the material at vendor. so how can i get all material for perticular vendor. any FM or somthing else plz giv me solution.
SELECT * FROM MKPF
INTO TABLE IT_MKPF
WHERE BUDAT IN PODATE.
IF NOT IT_MKPF[] IS INITIAL.
SELECT * FROM MSEG
INTO TABLE IT_MSEG
FOR ALL ENTRIES IN IT_MKPF
WHERE MBLNR = IT_MKPF-MBLNR AND
MJAHR = IT_MKPF-MJAHR AND
WERKS = PLANT AND
LIFNR = VENDOR AND
( BWART = '541' AND SHKZG = 'S' OR
BWART = '542' AND SHKZG = 'H' OR
BWART = '543' AND SHKZG = 'H' OR
BWART = '544' AND SHKZG = 'S' OR
BWART = '548' AND SHKZG = 'H' OR
BWART = '549' AND SHKZG = 'S' ) .
ENDIF. plz giv me solution.
Thanks,
Vishal.*& Report Z_MM_STCK_FG_T
report z_mm_stck_fg_t.
TABLES:mara,marc,mkpf,mseg,komp,vbrp.
TYPE-POOLS:slis.
TYPES :BEGIN OF ty_mb5b,
matnr TYPE matnr,
budat TYPE budat,
mb_open TYPE p DECIMALS 3,
END OF ty_mb5b.
DATA:wa_mb5b TYPE ty_mb5b.
DATA:it_mb5b TYPE STANDARD TABLE OF ty_mb5b INITIAL SIZE 0.
TYPES:BEGIN OF ty_fgl,
mblnr TYPE mblnr,
vgart TYPE vgart,
blart TYPE blart,
bldat TYPE bldat,
budat TYPE budat,
aedat TYPE aedat,
xblnr TYPE xblnr1,
bktxt TYPE bktxt,
zeile TYPE mblpo,
bwart TYPE bwart,
xauto TYPE mb_xauto,
matnr TYPE matnr,
werks TYPE werks_d,
lgort TYPE lgort_d,
charg TYPE charg_d,
insmk TYPE mb_insmk,
zusch TYPE dzusch,
zustd TYPE dzustd,
sobkz TYPE sobkz,
lifnr TYPE elifn,
kunnr TYPE ekunn,
kdauf TYPE kdauf,
kdpos TYPE kdpos,
kdein TYPE kdein,
plpla TYPE plpla,
shkzg TYPE shkzg,
waers TYPE waers,
dmbtr TYPE dmbtr,
bnbtr TYPE bnbtr,
bualt TYPE bualt,
shkum TYPE shkum,
dmbum TYPE dmbum,
bwtar TYPE bwtar_d,
menge TYPE menge_d,
meins TYPE meins,
erfmg TYPE erfmg,
erfme TYPE erfme,
bpmng TYPE bpmng,
bprme TYPE bbprm,
ebeln TYPE bstnr,
ebelp TYPE ebelp,
lfbja TYPE lfbja,
lfbnr TYPE lfbnr,
lfpos TYPE lfpos,
sjahr TYPE mjahr,
smbln TYPE mblnr,
smblp TYPE mblpo,
elikz TYPE elikz,
sgtxt TYPE sgtxt,
equnr TYPE equnr,
wempf TYPE wempf,
ablad TYPE ablad,
gsber TYPE gsber,
kzbew TYPE kzbew,
tcode2 TYPE tcode,
umwrk TYPE umwrk,
umcha TYPE umcha,
END OF ty_fgl.
TYPES:BEGIN OF ty_fgl1,
mblnr TYPE mblnr,
vgart TYPE vgart,
blart TYPE blart,
bldat TYPE bldat,
budat TYPE budat,
aedat TYPE aedat,
xblnr TYPE xblnr1,
bktxt TYPE bktxt,
zeile TYPE mblpo,
bwart TYPE bwart,
xauto TYPE mb_xauto,
matnr TYPE matnr,
werks TYPE werks_d,
lgort TYPE lgort_d,
charg TYPE charg_d,
insmk TYPE mb_insmk,
zusch TYPE dzusch,
zustd TYPE dzustd,
sobkz TYPE sobkz,
lifnr TYPE elifn,
kunnr TYPE ekunn,
kdauf TYPE kdauf,
kdpos TYPE kdpos,
kdein TYPE kdein,
plpla TYPE plpla,
shkzg TYPE shkzg,
waers TYPE waers,
dmbtr TYPE dmbtr,
bnbtr TYPE bnbtr,
bualt TYPE bualt,
shkum TYPE shkum,
dmbum TYPE dmbum,
bwtar TYPE bwtar_d,
menge TYPE menge_d,
meins TYPE meins,
erfmg TYPE erfmg,
erfme TYPE erfme,
bpmng TYPE bpmng,
bprme TYPE bbprm,
ebeln TYPE bstnr,
ebelp TYPE ebelp,
lfbja TYPE lfbja,
lfbnr TYPE lfbnr,
lfpos TYPE lfpos,
sjahr TYPE mjahr,
smbln TYPE mblnr,
smblp TYPE mblpo,
elikz TYPE elikz,
sgtxt TYPE sgtxt,
equnr TYPE equnr,
wempf TYPE wempf,
ablad TYPE ablad,
gsber TYPE gsber,
kzbew TYPE kzbew,
tcode2 TYPE tcode,
umwrk TYPE umwrk,
END OF ty_fgl1.
TYPES:BEGIN OF ty_bsim,
belnr TYPE belnr_d,
matnr TYPE matnr,
bwkey TYPE bwkey,
shkzg TYPE shkzg,
budat TYPE budat,
dmbtr TYPE dmbtr,
END OF ty_bsim.
TYPES:BEGIN OF ty_shkzg,
mblnr TYPE mblnr,
matnr TYPE matnr,
budat TYPE budat,
shkzg TYPE shkzg,
s_menge TYPE menge_d,
h_menge TYPE menge_d,
s_dmbtr TYPE dmbtr,
h_dmbtr TYPE dmbtr,
lifnr TYPE elifn,
kunnr TYPE ekunn,
xblnr TYPE xblnr1,
charg TYPE charg_d,
END OF ty_shkzg.
TYPES:BEGIN OF ty_shkzg1,
mblnr TYPE mblnr,
matnr TYPE matnr,
budat TYPE budat,
shkzg TYPE shkzg,
s_menge TYPE menge_d,
h_menge TYPE menge_d,
s_dmbtr TYPE dmbtr,
h_dmbtr TYPE dmbtr,
lifnr TYPE elifn,
kunnr TYPE ekunn,
xblnr TYPE xblnr1,
charg TYPE charg_d,
bwart TYPE bwart,
ebeln TYPE ebeln,
ebelp TYPE ebelp,
lgort TYPE lgort_d,
umwrk TYPE umwrk,
END OF ty_shkzg1.
TYPES:BEGIN OF ty_makt,
matnr TYPE matnr,
maktx TYPE maktx,
END OF ty_makt.
TYPES:BEGIN OF ty_c_shkzg,
mblnr TYPE mblnr,
matnr TYPE matnr,
budat TYPE budat,
shkzg TYPE shkzg,
s_menge TYPE menge_d,
h_menge TYPE menge_d,
s_dmbtr TYPE dmbtr,
h_dmbtr TYPE dmbtr,
lifnr TYPE elifn,
kunnr TYPE ekunn,
xblnr TYPE xblnr1,
charg TYPE charg_d,
END OF ty_c_shkzg.
TYPES:BEGIN OF ty_final,
mblnr TYPE mblnr,
matnr TYPE matnr,
budat TYPE budat,
shkzg TYPE shkzg,
s_menge TYPE menge_d,
h_menge TYPE menge_d,
s_dmbtr TYPE dmbtr,
h_dmbtr TYPE dmbtr,
lifnr TYPE elifn,
kunnr TYPE ekunn,
xblnr TYPE xblnr1,
charg TYPE charg_d,
balance TYPE menge_d,
balancev TYPE menge_d,
open TYPE menge_d,
openv TYPE menge_d,
mb_open TYPE p DECIMALS 3,
hsdat TYPE hsdat,
END OF ty_final.
TYPES:BEGIN OF ty_f_shkzg,
mblnr TYPE mblnr, "Material Document
matnr TYPE matnr, "Material Number
budat TYPE budat, "Posting Date
kbetr TYPE kbetr, "MRP Rate
lifnr TYPE elifn, "Vendor Number
kunnr TYPE ekunn, "Customer Number
xblnr TYPE xblnr1, "Reference Document Number
open TYPE menge_d, "Opening Stock
s_menge TYPE menge_d, "Reciept Stock
h_menge TYPE menge_d, "Issue Stock
balance TYPE menge_d, "Closing Stock
charg TYPE charg_d, "Batch Number
hsdat TYPE hsdat, "Manufaturing Period
bwart TYPE bwart, "Movement type
ebeln TYPE ebeln, "Purchase order No
ebelp TYPE ebelp, "Purchase order Line item
lgort TYPE lgort_d, "Storage Location
s_dmbtr TYPE dmbtr,
h_dmbtr TYPE dmbtr,
balancev TYPE dmbtr,
openv TYPE dmbtr,
umwrk TYPE umwrk,
vbeln type VBELN_VF,
END OF ty_f_shkzg.
*TYPES:BEGIN OF ty_f_shkzg,
mblnr TYPE mblnr, "Material Document
matnr TYPE matnr, "Material Number
budat TYPE budat, "Posting Date
kbetr TYPE kbetr, "MRP Rate
lifnr TYPE elifn, "Vendor Number
kunnr TYPE ekunn, "Customer Number
xblnr TYPE xblnr1, "Reference Document Number
open TYPE p DECIMALS 2, "Opening Stock
s_menge TYPE p DECIMALS 2, "Reciept Stock
h_menge TYPE p DECIMALS 2, "Issue Stock
balance TYPE p DECIMALS 2, "Closing Stock
charg TYPE charg_d, "Batch Number
hsdat TYPE hsdat, "Manufaturing Period
bwart TYPE bwart, "Movement type
ebeln TYPE ebeln, "Purchase order No
ebelp TYPE ebelp, "Purchase order Line item
lgort TYPE lgort_d, "Storage Location
s_dmbtr TYPE dmbtr,
h_dmbtr TYPE dmbtr,
balancev TYPE dmbtr,
openv TYPE dmbtr,
umwrk TYPE umwrk,
END OF ty_f_shkzg.
TYPES:BEGIN OF ty_f_shkzg_l,
mblnr TYPE mblnr, "Material Document
matnr TYPE matnr, "Material Number
budat TYPE budat, "Posting Date
kbetr TYPE kbetr, "MRP Rate
lifnr TYPE elifn, "Vendor Number
kunnr TYPE ekunn, "Customer Number
xblnr TYPE xblnr1, "Reference Document Number
open TYPE menge_d, "Opening Stock
s_menge TYPE menge_d, "Reciept Stock
h_menge TYPE menge_d, "Issue Stock
balance TYPE menge_d, "Closing Stock
charg TYPE charg_d, "Batch Number
hsdat TYPE hsdat, "Manufaturing Period
bwart TYPE bwart, "Movement type
ebeln TYPE ebeln, "Purchase order No
ebelp TYPE ebelp, "Purchase order Line item
lgort TYPE lgort_d, "Storage Location
s_dmbtr TYPE dmbtr,
h_dmbtr TYPE dmbtr,
balancev TYPE dmbtr,
openv TYPE dmbtr,
reswk TYPE reswk,
werks TYPE werks_d, "Plant
k_name1(40) TYPE c, "Customer Name
l_name1(40) TYPE c, "Vendor Name
p_name1(40) TYPE c, "Plant Name
m_name1( 90) TYPE c, "Material Description
s_name1(40) TYPE c,
vbeln type VBELN_VF,
END OF ty_f_shkzg_l.
*TYPES:BEGIN OF ty_f_shkzg_l,
mblnr TYPE mblnr, "Material Document
matnr TYPE matnr, "Material Number
budat TYPE budat, "Posting Date
kbetr TYPE kbetr, "MRP Rate
lifnr TYPE elifn, "Vendor Number
kunnr TYPE ekunn, "Customer Number
xblnr TYPE xblnr1, "Reference Document Number
open TYPE p DECIMALS 2, "Opening Stock
s_menge TYPE p DECIMALS 2, "Reciept Stock
h_menge TYPE p DECIMALS 2, "Issue Stock
balance TYPE p DECIMALS 2, "Closing Stock
charg TYPE charg_d, "Batch Number
hsdat TYPE hsdat, "Manufaturing Period
bwart TYPE bwart, "Movement type
ebeln TYPE ebeln, "Purchase order No
ebelp TYPE ebelp, "Purchase order Line item
lgort TYPE lgort_d, "Storage Location
s_dmbtr TYPE dmbtr,
h_dmbtr TYPE dmbtr,
balancev TYPE dmbtr,
openv TYPE dmbtr,
reswk TYPE reswk,
werks TYPE werks_d, "Plant
k_name1(40) TYPE c, "Customer Name
l_name1(40) TYPE c, "Vendor Name
p_name1(40) TYPE c, "Plant Name
m_name1(90) TYPE c, "Material Description
s_name1(40) TYPE c,
END OF ty_f_shkzg_l.
TYPES:BEGIN OF ty_kna1,
kunnr TYPE kunnr,
name1 TYPE ad_name1,
city1 TYPE ad_city1,
END OF ty_kna1.
TYPES:BEGIN OF ty_lfa1,
lifnr TYPE lifnr,
name1 TYPE ad_name1,
city1 TYPE ad_city1,
END OF ty_lfa1.
TYPES:BEGIN OF ty_werks,
werks TYPE werks_d,
name1 TYPE ad_name1,
city1 TYPE ad_city1,
END OF ty_werks.
TYPES:BEGIN OF ty_reswk,
werks TYPE werks_d,
name1 TYPE ad_name1,
city1 TYPE ad_city1,
END OF ty_reswk.
TYPES:BEGIN OF ty_a974,
kschl TYPE kscha,
matnr TYPE matnr,
charg TYPE charg_d,
datbi TYPE kodatbi,
datab TYPE kodatab,
knumh TYPE knumh,
kbetr TYPE kbetr,
END OF ty_a974.
TYPES:BEGIN OF ty_a926,
kappl TYPE kappl,
kschl TYPE kscha,
matnr TYPE matnr,
datbi TYPE kodatbi,
datab TYPE kodatab,
knumh TYPE knumh,
kbetr TYPE kbetr,
END OF ty_a926.
TYPES: BEGIN OF ty_konv,
matnr TYPE matnr,
knumh TYPE knumh,
kbetr TYPE kbetr,
END OF ty_konv.
TYPES:BEGIN OF ty_mch1,
matnr TYPE matnr,
charg TYPE charg_d,
hsdat TYPE hsdat,
END OF ty_mch1.
TYPES:BEGIN OF ty_ekko,
ebeln TYPE ebeln,
ebelp TYPE ebelp,
werks TYPE werks_d,
reswk TYPE reswk,
END OF ty_ekko.
TYPES:BEGIN OF ty_bkpf,
bukrs TYPE bukrs,
belnr TYPE belnr_d,
gjahr TYPE gjahr,
budat TYPE budat,
xblnr TYPE xblnr1,
bktxt TYPE bktxt,
tcode TYPE tcode,
matnr TYPE matnr,
dmbtr TYPE dmbtr,
END OF ty_bkpf.
TYPES:BEGIN OF ty_bseg,
bukrs TYPE bukrs,
belnr TYPE belnr_d,
gjahr TYPE gjahr,
budat TYPE budat,
matnr TYPE matnr,
werks TYPE werks,
dmbtr TYPE dmbtr,
END OF ty_bseg.
TYPES : begin of ty_vbrp,
vbeln type VBELN_VF,
vgbel( 16) type c ,
matnr type matnr,
end of ty_vbrp.
DATA: wa_shkzg TYPE ty_shkzg,
wa_shkzg1 TYPE ty_shkzg1,
wa_c_shkzg TYPE ty_c_shkzg,
wa_final TYPE ty_final,
wa_f_shkzg TYPE ty_f_shkzg,
wa_f_shkzg_l TYPE ty_f_shkzg_l,
wa_fgl TYPE ty_fgl,
wa_fglc TYPE ty_fgl,
wa_fgl1 TYPE ty_fgl1,
wa_a974 TYPE ty_a974,
wa_a926 TYPE ty_a926,
wa_konv TYPE ty_konv,
wa_mch1 TYPE ty_mch1,
wa_kna1 TYPE ty_kna1,
wa_lfa1 TYPE ty_lfa1,
wa_werks TYPE ty_werks,
wa_reswk TYPE ty_reswk,
wa_makt TYPE ty_makt,
wa_bkpf TYPE ty_bkpf,
wa_bseg TYPE ty_bseg,
wa_bsim TYPE ty_bsim,
wa_ekko TYPE ty_ekko,
wa_vbrp type ty_vbrp.
DATA: it_fgl TYPE STANDARD TABLE OF ty_fgl INITIAL SIZE 0,
it_fglc TYPE STANDARD TABLE OF ty_fgl INITIAL SIZE 0,
it_fgl1 TYPE STANDARD TABLE OF ty_fgl1 INITIAL SIZE 0,
it_shkzg TYPE STANDARD TABLE OF ty_shkzg INITIAL SIZE 0,
it_shkzg1 TYPE STANDARD TABLE OF ty_shkzg1 INITIAL SIZE 0,
it_c_shkzg TYPE STANDARD TABLE OF ty_c_shkzg INITIAL SIZE 0,
it_final TYPE STANDARD TABLE OF ty_final INITIAL SIZE 0,
it_f_shkzg TYPE STANDARD TABLE OF ty_f_shkzg INITIAL SIZE 0,
it_f_shkzg_l TYPE STANDARD TABLE OF ty_f_shkzg_l INITIAL SIZE 0,
it_a974 TYPE STANDARD TABLE OF ty_a974 INITIAL SIZE 0,
it_a926 TYPE STANDARD TABLE OF ty_a926 INITIAL SIZE 0,
it_konv TYPE STANDARD TABLE OF ty_konv INITIAL SIZE 0,
it_mch1 TYPE STANDARD TABLE OF ty_mch1 INITIAL SIZE 0,
it_kna1 TYPE STANDARD TABLE OF ty_kna1 INITIAL SIZE 0,
it_lfa1 TYPE STANDARD TABLE OF ty_lfa1 INITIAL SIZE 0,
it_werks TYPE STANDARD TABLE OF ty_werks INITIAL SIZE 0,
it_reswk TYPE STANDARD TABLE OF ty_reswk INITIAL SIZE 0,
it_makt TYPE STANDARD TABLE OF ty_makt INITIAL SIZE 0,
it_bkpf TYPE STANDARD TABLE OF ty_bkpf INITIAL SIZE 0,
it_bseg TYPE STANDARD TABLE OF ty_bseg INITIAL SIZE 0,
it_ekko TYPE STANDARD TABLE OF ty_ekko INITIAL SIZE 0,
it_bsim TYPE STANDARD TABLE OF ty_bsim INITIAL SIZE 0,
it_vbrp TYPE STANDARD TABLE OF ty_vbrp INITIAL SIZE 0.
*DATA: BEGIN OF bestand OCCURS 100,
bwkey LIKE mbew-bwkey,
werks LIKE mseg-werks,
matnr LIKE mseg-matnr,
charg LIKE mseg-charg,
endmenge(09) TYPE p DECIMALS 3,
anfmenge(09) TYPE p DECIMALS 3,
meins LIKE mara-meins,
endwert(09) TYPE p DECIMALS 2,
anfwert(09) TYPE p DECIMALS 2,
soll(09) TYPE p DECIMALS 3,
haben(09) TYPE p DECIMALS 3,
sollwert(09) TYPE p DECIMALS 2,
habenwert(09) TYPE p DECIMALS 2,
waers LIKE t001-waers,
END OF bestand.
DATA:temp1 TYPE menge_d,
temp2 TYPE dmbtr,
c TYPE i,
count TYPE i,
temp TYPE menge_d,
tempv TYPE dmbtr,
tgjahr TYPE gjahr.
*For ALV
DATA: gt_fld TYPE slis_t_fieldcat_alv,
gt_ev TYPE slis_t_event,
gt_hdr TYPE slis_t_listheader,
gt_sort TYPE slis_t_sortinfo_alv.
DATA: wa_fld TYPE slis_fieldcat_alv,
wa_ev TYPE slis_alv_event,
wa_hdr TYPE slis_listheader,
wa_sort TYPE slis_sortinfo_alv,
wa_layout TYPE slis_layout_alv.
DATA: mtrl LIKE sy-repid,
title LIKE sy-title,
l_matnr LIKE mara-matnr.
DEFINE fld.
wa_fld-fieldname = & 1.
wa_fld-tabname = &2.
wa_fld-outputlen = &3.
wa_fld-seltext_l = &4.
wa_fld-seltext_m = & 5.
wa_fld-seltext_s = &6.
wa_fld-col_pos = &7.
wa_fld-fix_column = &8.
wa_fld-do_sum = & 9.
append wa_fld to gt_fld.
clear wa_fld.
END-OF- DEFINITION.
DATA:strtdte TYPE sy-datum.
DATA:strt1dte LIKE mkpf-budat.
RANGES : l_ra_datum FOR mkpf-budat.
CONSTANTS: c_top TYPE slis_formname VALUE 'TOP_OF_PAGE' ,
c_user_command TYPE slis_formname VALUE 'USER_COMMAND'.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS:matnr FOR mara-matnr." OBLIGATORY.
PARAMETERS :werks LIKE marc-werks OBLIGATORY.
*PARAMETERS:lgort LIKE mseg-lgort.
SELECT-OPTIONS:datum FOR mkpf-budat. " DEFAULT '20060831'.
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN ON matnr.
IF matnr-low IS INITIAL.
MESSAGE 'Please Enter the Material Number' TYPE 'E'.
SET CURSOR FIELD matnr-low.
ENDIF.
SELECT matnr
INTO (l_matnr)
FROM mara
FOR ALL ENTRIES IN matnr
WHERE matnr = matnr-low.
ENDSELECT.
IF sy-subrc = 0.
SELECT matnr
INTO (l_matnr)
FROM mara
FOR ALL ENTRIES IN matnr
WHERE matnr = matnr-low
AND mtart = 'FERT'.
ENDSELECT.
IF sy-subrc NE 0.
MESSAGE 'Please Enter Finished goods Material' TYPE 'E'.
ENDIF.
ELSEIF sy-subrc NE 0.
MESSAGE 'Material Number Does Not Exists nor Activated' TYPE 'E' .
SET CURSOR FIELD matnr-low.
ENDIF.
INITIALIZATION.
mtrl = sy-repid.
title = sy-title.
LOOP AT DATUM.
STRTDTE = DATUM-LOW.
DATUM-LOW = '31.08.2006'.
MODIFY DATUM FROM DATUM.
ENDLOOP.
*BREAK-POINT.
START-OF-SELECTION.
PERFORM select_data_from_mkpf_mseg.
PERFORM select_data_from_a974.
PERFORM select_data_from_a926.
PERFORM select_data_from_konv.
PERFORM select_data_from_mch1.
PERFORM retrive_open_stock.
PERFORM data_cal_format.
perform data_vbrp.
PERFORM data_cal_final.
END -OF-SELECTION.
*BUILDING FIELD CATALOG
PERFORM build_fieldcat.
*BUILD EVENT
PERFORM build_event.
*BUILD LISTHEADER
PERFORM build_listheader.
*SORTING THE FIELDCAT DISPLAY
PERFORM sort_fieldcat.
*FIELDCAT LAYOUT BUILD
PERFORM build_layout.
*ALV GRID DISPLAY
PERFORM grid_display.
*& Form select_data_from_mkpf_mseg
Select data from MKPF and MSEG tables based on the selection parameters
--> p1 text
<-- p2 text
FORM select_data_from_mkpf_mseg .
DATA:tempvar TYPE p DECIMALS 3.
LOOP AT datum INTO l_ra_datum.
if not l_ra_matnr-low is initial and
l_ra_matnr-sign = 'I' and
l_ra_matnr-option = 'EQ' and
l_ra_matnr-high is initial.
strtdte = datum-high.
l_ra_datum-option = 'BT'.
l_ra_datum-low = '20060831'.
l_ra_datum-high = datum-high.
APPEND l_ra_datum.
endif.
CLEAR l_ra_datum.
ENDLOOP.
strt1dte = '20060831'.
SELECT a~mblnr
a~vgart
a~blart
a~bldat
a~budat
a~aedat
a~xblnr
a~bktxt
a~tcode2
b~matnr
b~charg
b~werks
b~bwart
b~lgort
b~lifnr
b~kunnr
b~shkzg
b~menge
b~ebeln
b~ebelp
b~umwrk
b~xauto
b~dmbtr
b~umcha
INTO CORRESPONDING FIELDS OF TABLE it_fgl
FROM mkpf AS a
INNER JOIN mseg AS b ON a~mblnr = b~mblnr
WHERE b~matnr IN matnr
AND b~werks EQ werks
AND b~lgort EQ lgort
AND a~budat IN l_ra_datum
AND b~bwart NOT IN ('321', '343','344','651').
and xauto ne 'X'.
IF sy-subrc NE 0.
MESSAGE 'Data does not exists for the entered selection criteria' TYPE 'I'.
LEAVE LIST-PROCESSING.
ENDIF.
it_fglc[] = it_fgl[].
CLEAR wa_fgl.
CLEAR wa_fglc.
LOOP AT it_fgl INTO wa_fgl WHERE bwart = '101' AND dmbtr EQ space.
READ TABLE it_fglc INTO wa_fglc WITH KEY bwart = '641' xauto = 'X' ebeln = wa_fgl-ebeln ebelp = wa_fgl-ebelp. "umcha = wa_fgl-charg.
IF sy-subrc = 0.
IF wa_fgl-menge NE wa_fglc-menge.
tempvar = wa_fglc-dmbtr / wa_fglc-menge.
wa_fgl-dmbtr = wa_fgl-menge * tempvar.
ELSE.
wa_fgl-dmbtr = wa_fglc-dmbtr.
ENDIF.
ELSE.
READ TABLE it_fglc INTO wa_fglc WITH KEY bwart = '643' xauto = 'X' ebeln = wa_fgl-ebeln ebelp = wa_fgl-ebelp. "umcha = wa_fgl-charg.
IF sy-subrc = 0 .
IF wa_fgl-menge NE wa_fglc-menge.
tempvar = wa_fglc-dmbtr / wa_fglc-menge.
wa_fgl-dmbtr = wa_fgl-menge * tempvar.
ELSE.
wa_fgl-dmbtr = wa_fglc-dmbtr.
ENDIF.
ENDIF.
ENDIF.
MODIFY it_fgl FROM wa_fgl.
CLEAR wa_fgl.
CLEAR wa_fglc.
ENDLOOP.
LOOP AT it_fgl INTO wa_fgl WHERE bwart = '102' AND dmbtr EQ space.
READ TABLE it_fglc INTO wa_fglc WITH KEY bwart = '642' xauto = 'X' ebeln = wa_fgl-ebeln ebelp = wa_fgl-ebelp. "umcha = wa_fgl-charg.
IF sy-subrc = 0.
IF wa_fgl-menge NE wa_fglc-menge.
tempvar = wa_fglc-dmbtr / wa_fglc-menge.
wa_fgl-dmbtr = wa_fgl-menge * tempvar.
ELSE.
wa_fgl-dmbtr = wa_fglc-dmbtr.
ENDIF.
ELSE.
READ TABLE it_fglc INTO wa_fglc WITH KEY bwart = '644' xauto = 'X' ebeln = wa_fgl-ebeln ebelp = wa_fgl-ebelp. "umcha = wa_fgl-charg.
IF sy-subrc = 0.
IF wa_fgl-menge NE wa_fglc-menge.
tempvar = wa_fglc-dmbtr / wa_fglc-menge.
wa_fgl-dmbtr = wa_fgl-menge * tempvar.
ELSE.
wa_fgl-dmbtr = wa_fglc-dmbtr.
ENDIF.
ENDIF.
ENDIF.
MODIFY it_fgl FROM wa_fgl.
CLEAR wa_fgl.
CLEAR wa_fglc.
ENDLOOP.
*DELETE it_fgl WHERE bwart EQ '101' AND DMBTR EQ space.
*DELETE it_fgl WHERE bwart EQ '102' AND DMBTR EQ space.
SORT it_fgl BY matnr budat.
DELETE it_fgl WHERE bwart EQ '641' AND xauto EQ 'X'.
DELETE it_fgl WHERE bwart EQ '642' AND xauto EQ 'X' .
DELETE it_fgl WHERE bwart EQ '643' AND xauto EQ 'X'.
DELETE it_fgl WHERE bwart EQ '644' AND xauto EQ 'X'.
SELECT matnr
bwkey
belnr
gjahr
buzei
buzid
shkzg
dmbtr
budat
blart
FROM bsim
INTO CORRESPONDING FIELDS OF TABLE it_bsim
FOR ALL ENTRIES IN it_fgl
WHERE matnr EQ it_fgl-matnr
AND bwkey EQ werks
AND budat IN l_ra_datum "EQ it_fgl-budat
AND blart EQ 'PR'.
LOOP AT it_bsim INTO wa_bsim.
wa_fgl-mblnr = wa_bsim-belnr.
wa_fgl-matnr = wa_bsim-matnr.
wa_fgl-bwart = 'PRC'.
wa_fgl-shkzg = wa_bsim-shkzg.
wa_fgl-budat = wa_bsim-budat.
wa_fgl-dmbtr = wa_bsim-dmbtr.
APPEND wa_fgl TO it_fgl.
CLEAR wa_fgl.
CLEAR wa_bsim.
ENDLOOP.
SORT it_fgl BY matnr budat.
it_fglc[] = it_fgl[].
LOOP AT it_fgl INTO wa_fgl."WHERE tcode2 NE 'MIGO_GR'.
wa_shkzg-matnr = wa_fgl-matnr.
wa_shkzg-budat = wa_fgl-budat.
wa_shkzg1-matnr = wa_fgl-matnr.
wa_shkzg1-budat = wa_fgl-budat.
wa_shkzg1-charg = wa_fgl-charg.
wa_shkzg1-ebeln = wa_fgl-ebeln.
wa_shkzg1-ebelp = wa_fgl-ebelp.
wa_shkzg1-lgort = wa_fgl-lgort.
wa_shkzg1-umwrk = wa_fgl-umwrk.
IF wa_fgl-shkzg = 'S'.
wa_shkzg1-s_menge = wa_fgl-menge.
wa_shkzg-s_menge = wa_fgl-menge.
wa_shkzg1-s_dmbtr = wa_fgl-dmbtr.
wa_shkzg-s_dmbtr = wa_fgl-dmbtr.
ELSEIF wa_fgl-shkzg = 'H'.
wa_shkzg1-h_menge = wa_fgl-menge.
wa_shkzg-h_menge = wa_fgl-menge.
wa_shkzg1-h_dmbtr = wa_fgl-dmbtr.
wa_shkzg-h_dmbtr = wa_fgl-dmbtr.
ENDIF.
wa_fgl1-mblnr = wa_fgl-mblnr.
wa_fgl1-lifnr = wa_fgl-lifnr.
wa_fgl1-kunnr = wa_fgl-kunnr.
wa_fgl1-xblnr = wa_fgl-xblnr.
wa_fgl1-bwart = wa_fgl-bwart.
wa_fgl1-ebeln = wa_fgl-ebeln.
wa_fgl1-ebelp = wa_fgl-ebelp.
wa_fgl1-umwrk = wa_fgl-umwrk.
APPEND wa_fgl1 TO it_fgl1.
APPEND wa_shkzg TO it_shkzg.
APPEND wa_shkzg1 TO it_shkzg1.
CLEAR wa_shkzg.
CLEAR wa_shkzg1.
CLEAR wa_fgl1.
clear wa_fgl.
ENDLOOP.
LOOP AT it_shkzg INTO wa_shkzg.
COLLECT wa_shkzg INTO it_c_shkzg.
ENDLOOP.
ENDFORM. " select_data_from_mkpf_mseg
*& Form select_data_from_a974
text
--> p1 text
<-- p2 text
FORM select_data_from_a974 .
SELECT kschl
matnr
charg
datbi
datab
knumh
FROM a974
INTO CORRESPONDING FIELDS OF TABLE it_a974
FOR ALL ENTRIES IN it_fgl
WHERE matnr EQ it_fgl-matnr
AND charg EQ it_fgl-charg
AND kschl EQ 'ZMRP'.
ENDFORM. " select_data_from_a974
*& Form select_data_from_a926
Select KNUMH from a926 table
--> p1 text
<-- p2 text
FORM select_data_from_a926 .
SELECT matnr
knumh
datbi
datab
FROM a953
INTO CORRESPONDING FIELDS OF TABLE it_a926
FOR ALL ENTRIES IN it_fgl
WHERE matnr EQ it_fgl-matnr
AND kschl EQ 'ZMRP'.
ENDFORM . " select_data_from_a926
*& Form select_data_from_konv
select KBETR from table KONV for fetching MRP rate of Material
--> p1 text
<-- p2 text
FORM select_data_from_konv .
SELECT knumh
kbetr
FROM konp
INTO CORRESPONDING FIELDS OF TABLE it_konv
FOR ALL ENTRIES IN it_a974
WHERE knumh = it_a974-knumh.
SELECT knumh
kbetr
FROM konp
INTO CORRESPONDING FIELDS OF TABLE it_konv
FOR ALL ENTRIES IN it_a926
WHERE knumh = it_a926-knumh.
LOOP AT it_a974 INTO wa_a974.
READ TABLE it_konv INTO wa_konv WITH KEY knumh = wa_a974-knumh.
wa_a974-kbetr = wa_konv-kbetr.
MODIFY it_a974 FROM wa_a974 TRANSPORTING kbetr.
CLEAR wa_a974.
ENDLOOP .
LOOP AT it_a926 INTO wa_a926.
READ TABLE it_konv INTO wa_konv WITH KEY knumh = wa_a926-knumh.
wa_a926-kbetr = wa_konv-kbetr.
MODIFY it_a926 FROM wa_a926 TRANSPORTING kbetr.
CLEAR wa_a926.
ENDLOOP.
ENDFORM. " select_data_from_konv
*& Form select_data_from_mch1
text
--> p1 text
<-- p2 text
FORM select_data_from_mch1 .
SELECT
matnr
charg
hsdat
FROM mch1
INTO TABLE it_mch1
FOR ALL ENTRIES IN it_fgl
WHERE matnr = it_fgl-matnr
AND charg = it_fgl-charg.
ENDFORM. " select_data_from_mch1
*& Form retrive_open_stock
text
--> p1 text
<-- p2 text
FORM retrive_open_stock .
it_final[] = it_c_shkzg[].
SORT it_final BY matnr budat.
LOOP AT it_final INTO wa_final.
ON CHANGE OF wa_final-matnr.
wa_mb5b-matnr = wa_final-matnr.
wa_mb5b-budat = wa_final-budat.
APPEND wa_mb5b TO it_mb5b.
CLEAR wa_mb5b.
CLEAR wa_final.
ENDON.
ENDLOOP.
LOOP AT it_mb5b INTO wa_mb5b.
SUBMIT zmm_stlg_rm07mlbd
EXPORTING LIST TO MEMORY WITH matnr EQ wa_mb5b-matnr
WITH werks EQ werks
WITH datum = wa_mb5b-budat
WITH bwbst = 'X' AND RETURN.
IMPORT bestand FROM MEMORY ID 'stockledger2'.
LOOP AT bestand.
wa_mb5b-mb_open = bestand-anfmenge.
MODIFY it_mb5b FROM wa_mb5b TRANSPORTING mb_open.
ENDLOOP.
DELETE FROM MEMORY ID 'stockledger2'.
ENDLOOP.
LOOP AT it_final INTO wa_final.
wa_final-open = temp.
wa_final-balance = wa_final-s_menge - wa_final-h_menge.
temp = wa_final-balance.
wa_final-openv = tempv.
wa_final-balancev = wa_final-s_dmbtr - wa_final-h_dmbtr.
tempv = wa_final-balancev.
MODIFY it_final FROM wa_final TRANSPORTING balance open.
ENDLOOP.
ENDFORM. " retrive_open_stock
*& Form data_cal_format
text
--> p1 text
<-- p2 text
FORM data_cal_format .
CLEAR wa_final.
CLEAR wa_shkzg.
CLEAR wa_shkzg1.
LOOP AT it_shkzg1 INTO wa_shkzg1.
c = c + 1.
READ TABLE it_fgl1 INTO wa_fgl1 INDEX c .
wa_shkzg1-mblnr = wa_fgl1-mblnr.
wa_shkzg1-lifnr = wa_fgl1-lifnr.
wa_shkzg1-kunnr = wa_fgl1-kunnr.
wa_shkzg1-xblnr = wa_fgl1-xblnr.
wa_shkzg1-bwart = wa_fgl1-bwart.
wa_shkzg1-ebeln = wa_fgl1-ebeln.
wa_shkzg1-ebelp = wa_fgl1-ebelp.
wa_shkzg1-umwrk = wa_fgl1-umwrk.
MODIFY it_shkzg1 FROM wa_shkzg1.
CLEAR wa_shkzg1.
ENDLOOP.
LOOP AT it_final INTO wa_final.
ON CHANGE OF wa_final-matnr.
clear temp1.
clear temp2.
READ TABLE it_mb5b INTO wa_mb5b WITH KEY matnr = wa_final-matnr budat = wa_final-budat.
temp1 = wa_mb5b-mb_open.
ENDON.
wa_f_shkzg-open = temp1.
wa_f_shkzg-openv = temp2.
count = count + 1.
LOOP AT it_shkzg1 INTO wa_shkzg1 WHERE matnr EQ wa_final-matnr AND budat EQ wa_final-budat.
wa_f_shkzg-matnr = wa_shkzg1-matnr.
wa_f_shkzg-budat = wa_shkzg1-budat.
wa_f_shkzg-charg = wa_shkzg1-charg.
wa_f_shkzg-mblnr = wa_shkzg1-mblnr.
wa_f_shkzg-lgort = wa_shkzg1-lgort.
wa_f_shkzg-lifnr = wa_shkzg1-lifnr.
wa_f_shkzg-kunnr = wa_shkzg1-kunnr.
wa_f_shkzg-xblnr = wa_shkzg1-xblnr.
wa_f_shkzg-bwart = wa_shkzg1-bwart.
wa_f_shkzg-ebeln = wa_shkzg1-ebeln.
wa_f_shkzg-ebelp = wa_shkzg1-ebelp.
wa_f_shkzg-s_menge = wa_shkzg1-s_menge.
wa_f_shkzg-h_menge = wa_shkzg1-h_menge.
wa_f_shkzg-s_dmbtr = wa_shkzg1-s_dmbtr.
wa_f_shkzg-h_dmbtr = wa_shkzg1-h_dmbtr.
wa_f_shkzg-umwrk = wa_shkzg1-umwrk.
APPEND wa_f_shkzg TO it_f_shkzg.
CLEAR wa_f_shkzg.
CLEAR wa_shkzg.
CLEAR wa_shkzg1.
ENDLOOP .
wa_f_shkzg-budat = wa_final-budat.
wa_f_shkzg-s_menge = wa_final-s_menge.
wa_f_shkzg-h_menge = wa_final-h_menge.
wa_f_shkzg-balance = ( ( temp1 + wa_final-s_menge ) - wa_final-h_menge ).
wa_f_shkzg-open = temp1.
temp1 = wa_f_shkzg-balance.
wa_f_shkzg-s_dmbtr = wa_final-s_dmbtr.
wa_f_shkzg-h_dmbtr = wa_final-h_dmbtr.
wa_f_shkzg-balancev = ( ( temp2 + wa_final-s_dmbtr ) - wa_final-h_dmbtr ).
wa_f_shkzg-openv = temp2.
temp2 = wa_f_shkzg-balancev.
APPEND wa_f_shkzg TO it_f_shkzg.
CLEAR wa_final.
CLEAR wa_f_shkzg.
ENDLOOP.
LOOP AT it_f_shkzg INTO wa_f_shkzg.
READ TABLE it_a974 INTO wa_a974 WITH KEY matnr = wa_f_shkzg-matnr charg = wa_f_shkzg-charg.
IF wa_f_shkzg-budat BETWEEN wa_a974-datab AND wa_a974-datbi.
wa_f_shkzg-kbetr = wa_a974-kbetr.
ENDIF .
IF wa_a974-kbetr IS INITIAL.
READ TABLE it_a926 INTO wa_a926 WITH KEY matnr = wa_f_shkzg-matnr.
IF wa_f_shkzg-budat BETWEEN wa_a926-datab AND wa_a926-datbi.
wa_f_shkzg-kbetr = wa_a926-kbetr.
ENDIF.
ENDIF.
MODIFY it_f_shkzg FROM wa_f_shkzg TRANSPORTING kbetr.
CLEAR wa_f_shkzg.
CLEAR wa_a974.
clear wa_a926.
ENDLOOP.
LOOP AT it_f_shkzg INTO wa_f_shkzg.
READ TABLE it_mch1 INTO wa_mch1 WITH KEY matnr = wa_f_shkzg-matnr charg = wa_f_shkzg-charg.
wa_f_shkzg-hsdat = wa_mch1-hsdat.
MODIFY it_f_shkzg FROM wa_f_shkzg TRANSPORTING hsdat matnr.
CLEAR wa_f_shkzg.
CLEAR wa_mch1.
ENDLOOP.
ENDFORM. " data_cal_format
*& Form data_vbrp
text
--> p1 text
<-- p2 text
FORM data_vbrp .
select vgbel
vbeln
into corresponding fields of table it_vbrp
from vbrp.
for all entries in it_f_shkzg_l
WHERE matnr EQ it_f_shkzg_l-matnr.
ENDFORM. " data_vbrp
*& Form data_cal_final
text
--> p1 text
<-- p2 text
FORM data_cal_final .
DATA:enddate LIKE mkpf-budat.
enddate = datum-low - 1.
it_f_shkzg_l[] = it_f_shkzg[].
*loop at it_f_shkzg into wa_f_shkzg where budat le strtdte.
*move-corresponding wa_f_shkzg to wa_f_shkzg_l.
*append wa_f_shkzg_l to it_f_shkzg_l.
*clear wa_f_shkzg_l.
*endloop.
DATA :k_name1( 40) TYPE c,
l_name1(40) TYPE c,
i_name1( 40) TYPE c,
p_name1(40) TYPE c,
p_city( 10) TYPE c,
t_name1(90) TYPE c.
SELECT a~reswk
b~ebeln
b~ebelp
b~werks
INTO CORRESPONDING FIELDS OF TABLE it_ekko
FROM ekko AS a
INNER JOIN ekpo AS b ON a~ebeln = b~ebeln -
Dear Gurus,
please let me know how to find For Vendor Master which field are Suppressed or Hidded or Visble.
Regards
AmeyHi,
Please check the account group for that vendor, and now check the fiels status group for that vendor account group.here you will see all field status.
Thanks
Vinay -
Problem in LSMW - Vendor master upload
Hello Experts,
I am doing vendor upload using LSMW direct input (RFBIKR00) program. I am uploading files in LFA1, LFB1, LFBK, LFM1 and MAIN - total 5 files, MAIN file has all the key fields which is in(BLF00) structure. Other files has same table structure as its names are.
Now When I run the batch input session. It works for the first vendor, but if there is record for the same vendor with other company code, then it gives error as no data available for screen 102.
for eg. MAIN file has records as below
KTOKK,EKORG,BUKRS,LIFNR,TCODE
LIEF, 0990, US01, 0001234567, XK01
LIEF, , CH01, 0001234567, XK01
In above records, same vendor has 2 company codes, so for the 2nd record, I think Accounting Information screen should come directly, but when I saw session run in foreground, it takes all the fiels blank , and then gives error as no data available for the screen, and it does not create record for CH01.
Please suggest If I have to do something else for it, or am I doing anything wrong!?!
Regards,
bh_hirHI,
In step 12, I see both the records, but in the 2nd record - I also see LFA1 and LFM1 structure filled with LFB1.
so I think for 2nd record It should just fill LFB1 and header(BLF00) right?
But dont know how to achieve this...
please suggest.
Thanks,
bh_hir -
Including Vendor Name in Standard report 'MB51' transaction
Hi Friends,
I have a requirement of Displaying the Vendor Name in the standard report 'MB51', after the vendor No.
I checked the report and it is really confusing ..... ( i ve seen something like when i double click the document number it is going to 'Display material Document - 147404608' something !! ........
I want the same report with vendor name included ... is that possible ????
One more doubt .... i actually copied the Program 'RM07DOCS' with the includes to a name 'ZRM07DOCS' but when i execute with plant '0020' iam getting an error 'Selection was not restricted' though iam not getting the error when i give the same selection criteria in the Standard report....
Expecting ur replies :-|
Thanks in advance
Cheers,
R.Kripa.Hi,
I did similar requirement but in my case the tr code was mb5b but anyway approach would be same ,please check steps below.
1) Copy standard report to a Zreport. copy everything including includes , texts etc.
2) Now put a break point at REUSE_ALV_LIST_DISPLAY , it might be possible that its used multiple times. so just cross check which list display is showing results.comment out this REUSE_ALV_LIST_DISPLAY.
3) Now say you have to add 2 extra fields to report.define you own internal table with all the fields you needed.move the final internal table to your internal table.
4) build your own field catalog for your internal table.
4) using select queries fetch field values of those 2 extra fields for each record.and then use resue_alv_list_display or resue_alv_grid_display in place of original list_display. pass fieldcatalog and your final internal table to it so as to get output desired.
Maybe you are looking for
-
The small "[Javascript Application] and balance.balance is undefined" pop up window is followed by a pop up that shows a caution sign and the number 3. They repeatedly pop back up when I click on the OK button or X, I must click them 10 times before
-
Reinstalling software on later firmware
I currently have snow leopard 10.6.8 and have installed all the latest software AND FIRMWARE. Would I be able to revert back to snow leopard 10.6.7? (will there be any problems with the already installed firmware designed for 10.6.8)
-
Ichat video/audio problem NetGear W6R64
hooking up without router... everything works... I know how to get into the netgear set-up... I know how to get to the Mac network/firewall setting... I just need the settings for the mac and the router... it has UPnP...
-
Extending System Center Operations Manager Classes & Discovery SCOM 2007 R2
I want to add some additional attributes to SCOM that are populated from information in another database.....for example. I have a CMDB that contains information about the support level for each server (i.e. gold, silver, bronze), i want to be able t
-
Garage Band Error Message - Library Invalid
My Hard Drive burned out. I had a new one installed and all programs transfered over. Everything works but my GB. This is the message I get. Can anyone help? To the best of my knowledge GB came installed. I have OS X 10.4.10. The Instrument Library i