BDC Problem for FF67
Hi All,
I have developed BDC for FF67 transaction ,
Am having a problem in that , My problem is that the second screen number, where we enter line items, is different in development server and different in production server.
In development am having second screen number as 8001 and in production server am having screen number as 8000.
I want to know why the screen number is different in two servers.
Regards,
Bharat.
Edited by: bharat tambat on Nov 6, 2008 3:21 PM
am waiting for reply...
Edited by: bharat tambat on Nov 7, 2008 6:23 AM
Hi Bharat
Probably too late for an advice but always try using a BAPI for SAP posting.
Go for BDC only if one is not available !!
Re: Regd : BAPI might interest you.
Neeraj
Similar Messages
-
Change transaction using BDC-problem for large number of lines on screen
Hi All,
I am developing BAPI (using BDC) which creates quality notification in SAP which is entered via front end web application. Structure p_qmsm contain 3 lines of task in notification. The code is as given below. To avoid problem of large no of lines on screen,code lines starting with * is used. This actually for pagedown after entering every 2 lines and creates new line. so that 2 lines always push up on screen and there will not be problem for creating large no of lines on screen
perform bdc_dynpro using 'SAPLIQS0' '7200'.
perform bdc_field using 'BDC_OKCODE' '=10\TAB11'.
LOOP AT p_qmsm INTO wa_qmsm.
*IF wa_qmsm_cntr > 2.
wa_qmsm_cntr = 2.
perform bdc_dynpro using 'SAPLIQS0' '7204'.
perform bdc_field using 'BDC_OKCODE' '=PEND'.
ENDIF.
perform bdc_dynpro using 'SAPLIQS0' '7204'.
perform bdc_field using 'BDC_OKCODE' '/00'.
CONCATENATE 'VIQMSM-QSMNUM(' wa_qmsm_cntr ')' INTO wm_qmsm_qsmnum.
CONCATENATE 'VIQMSM-MNGRP(' wa_qmsm_cntr ')' INTO wm_qmsm_mngrp.
CONCATENATE 'VIQMSM-MNCOD(' wa_qmsm_cntr ')' INTO wm_qmsm_mncod.
CONCATENATE 'VIQMSM-MATXT(' wa_qmsm_cntr ')' INTO wm_qmsm_matxt.
perform bdc_field using wm_qmsm_qsmnum wa_qmsm-qsmnum.
perform bdc_field using wm_qmsm_mngrp wa_qmsm-mngrp.
perform bdc_field using wm_qmsm_mncod wa_qmsm-mncod.
perform bdc_field using wm_qmsm_matxt wa_qmsm-matxt.
wa_qmsm_cntr = wa_qmsm_cntr + 01.
ENDLOOP.
CALL TRANSACTION 'IQS2' USING wt_bdc
MODE 'N' UPDATE 'A' MESSAGES INTO P_MESSTAB.
The same code is used in modify mode also. web application is sending all 3 lines in modify mode even if single line is modified. It is already decided to send all rows back from web application to SAP in same sequence. It is working fine if i comment 5 lines which is starting with *. But in modify mode, how can i ensure that correct row is modified? and how can i achieve problem of large no of lines on screen?Please suggest?Hi yogesh,
how can i ensure that correct row is modified?
1. For this we need to know two things ;
a) the database table in which the entries are already stored
b) the sequence in which they are displayed in the transaction.
2. So before changing any line, we need to compare (the primary key values / important values)
a) as per the database table and as per the incoming data from web application (using bapi)
b) if the match is ok, it means that particular row was not modified, else modified.
how can i achieve problem of large no of lines on screen?
1. For this I am not sure about the transaction and its screen. Manytimes for appending row on the screen,
there is a PLUS + button on the grid toolbar. So for every entry, (inspite of some empty/filled rows already visible on the screen), we should use the + button, and this new row always appears on the top i.e. row number 1.
hope this helps.
regards,
amit m. -
Dear all,
there is problem in BDC MIGO report. when i uploaded the p_file the bdc run but on some fields it gives the error message
S Field GOITEM-ERFME . is not an input field
S Field GOITEM-ERFMG . is not an input field
S Field GOITEM-LSMNG . is not an input field
S Field GOITEM-LSMEH . is not an input field
S Field GOITEM-BWART . is not an input field
S Field GOITEM-LGOBE . is not an input field
S Field GOITEM-WEMPF . is not an input field
S Field GOITEM-ABLAD . is not an input field
S Field GOITEM-SGTXT . is not an input field
these are all input fields and i defiend as
perform bdc_field using 'BDC_CURSOR'
'GOITEM-ERFME'.
perform bdc_field using 'GOITEM-ERFME'
IT_DATA-ERFME.
perform bdc_field using 'GOITEM-ERFMG'
IT_DATA-ERFMG.
perform bdc_field using 'GOITEM-LSMNG'
IT_DATA-LSMNG.
perform bdc_field using 'GOITEM-LSMEH'
IT_DATA-LSMEH.
*perform bdc_field using 'GOITEM-MIGO_ELIKZ'
'1'.
perform bdc_field using 'GOITEM-BWART'
'101'.
perform bdc_field using 'GOITEM-LGOBE'
IT_DATA-LGOBE.
perform bdc_field using 'GOITEM-WEMPF'
IT_DATA-WEMPF.
perform bdc_field using 'GOITEM-ABLAD'
IT_DATA-ABLAD.
perform bdc_field using 'GOITEM-SGTXT' "
IT_DATA-SGTXT.
please solve my problem.
Regards,
PankajHI,
May this will throw some light for u
Geting problem in BDC prog of MIGO transaction
Regards,
Aditya -
BDC problem for Schedule Agreement
Hi,
We are facing a problem in BDC for Schedule Agreement - Tick on Delivery Completed.
In SA line items are like this..
10.............AAAAA..................10.....NOS
20.............BBBBB..................20.....NOS
30.............CCCCC...................5......NOS
60.............DDDDD..................40.....NOS
We want update Delivery Completed indicator in line items 10 & 60.
Our Flat File is like...
5500004556.......10
5500004556.......60
During BDC, this updates the line item 10 successfully, but when going for updating line item 60, not picking related item (means 60..DDDDD..40..NOS), it is going on line item 60 of the SA (means it is counting line item 40 inplace of 60, but in SA there is no 40 line item)..
Regards..Thanks Dear..
Please let me know, where I can change in my code...
Code of Line Item
PERFORM bdc_field USING 'RM06E-EBELP' wa-ebelp.
CASE wa-ebelp.
WHEN 10.
PERFORM bdc_field USING 'RM06E-TCSELFLAG(01)' 'X'.
WHEN 20.
PERFORM bdc_field USING 'RM06E-TCSELFLAG(02)' 'X'.
WHEN 30.
PERFORM bdc_field USING 'RM06E-TCSELFLAG(03)' 'X'.
WHEN 40.
PERFORM bdc_field USING 'RM06E-TCSELFLAG(04)' 'X'.
WHEN 50.
PERFORM bdc_field USING 'RM06E-TCSELFLAG(05)' 'X'.
WHEN 60.
PERFORM bdc_field USING 'RM06E-TCSELFLAG(06)' 'X'.
ENDCASE.
Code of Line Item
please guide.. -
BDC problem for PFCG generation.
Dear Experts,
In PFCG transation for Role pushing when I press generate button manually it does all processing successfully in background but if I do it using BDC recording it just come out without processing anything with success message. Please help.
wait for the reply.
Thanks in advance.HI,
Try to use code below instead of using BDC.
Enqueue
CALL FUNCTION 'PRGN_ACTIVITY_GROUP_ENQUEUE'
EXPORTING
activity_group = i_agr_name
EXCEPTIONS
foreign_lock = 1
transport_check_problem = 2
OTHERS = 3.
IF sy-subrc NE 0.
exit.
ENDIF.
CALL FUNCTION 'PRGN_RFC_CREATE_ACTIVITY_GROUP'
EXPORTING
ACTIVITY_GROUP = i_agr_name
ACTIVITY_GROUP_TEXT = i_agr_text
COMMENT_TEXT_LINE_1 = ' '
COMMENT_TEXT_LINE_2 = ' '
COMMENT_TEXT_LINE_3 = ' '
COMMENT_TEXT_LINE_4 = ' '
PROFILE_NAME = i_profile
PROFILE_TEXT = ' '
ORG_LEVELS_WITH_STAR = ''
NO_DIALOG = 'X'
UNMAINTAINED_FIELDS_WITH_STAR = ''
TEMPLATE = ''
ONLY_TCODE_ASSIGNMENT = ' '
TABLES
TCODES =
HIERARCHY_NODES =
HIERARCHY_TEXTS =
EXCEPTIONS
ACTIVITY_GROUP_ALREADY_EXISTS = 1
ACTIVITY_GROUP_ENQUEUED = 2
NAMESPACE_PROBLEM = 3
ILLEGAL_CHARACTERS = 4
ERROR_WHEN_CREATING_ACTGROUP = 5
PROFILE_NAME_EXISTS = 6
PROFILE_NOT_IN_NAMESPACE = 7
NO_AUTH_DATA_SELECTED = 8
ILLEGAL_TCODES = 9
NOT_AUTHORIZED = 10
PROFGEN_TABLES_NOT_UPDATED = 11
ERROR_WHEN_GENERATING_PROFILE = 12
OTHERS = 13
IF SY-SUBRC <> 0.
exit.
ENDIF.
ls_auth_data-object = 'S_RS_AUTH'.
ls_auth_data-field = 'BIAUTH'.
ls_auth_data-low = i_bi_auth.
ls_auth_data-modifier = 'U'.
append ls_auth_data to lt_auth_data.
CALL FUNCTION 'SUPRN_DARK_MANIPULATE_PROFILE'
EXPORTING
ACTIVITY_GROUP = i_agr_name
PROFILE_NAME = i_profile
USE_EXTERNAL_TEMPLATE_DATA = 'X'
AUTH_TEMPLATE_TO_ADD = ' '
FILL_ORGS_WITH_STAR = ' '
FILL_FIELDS_WITH_STAR = 'X'
NO_DIALOG = 'X'
REBUILD_AUTH_DATA = 'X'
GENERATE_PROFILE = 'X'
IMPORTING
PROFILE_TORSO =
TABLES
TCODES =
EXTERNAL_TEMPLATE_DATA = lt_auth_data
EXCEPTIONS
PROFILE_NOT_IN_NAMESPACE = 1
PROFILE_NAME_EXISTS = 2
NO_AUTH_FOR_ROLE_CHANGE = 3
NO_AUTH_FOR_PROF_CREATION = 4
NO_AUTH_FOR_AUTH_MAINT = 5
NO_AUTH_FOR_GEN = 6
NO_AUTHS = 7
OPEN_AUTHS = 8
TOO_MANY_AUTHS = 9
ERROR_WHEN_GENERATING_PROFILE = 10
OTHERS = 11
IF SY-SUBRC <> 0.
exit.
ENDIF.
Dequeue
CALL FUNCTION 'PRGN_ACTIVITY_GROUP_DEQUEUE'
EXPORTING
activity_group = i_agr_name.
e_ok = 'X'.
This will create role. To save authorisation use FM "RSEC_MODIFY_AUTH".
Srikanth. -
Problem in creating a BDC program for transaction cj20n(project sytem)
Hi all,
I am trying to create project,WBS element ,network and activity using a BDC program,
I am able to create to a recording for the transaction cj20n using tcode shdb but when i run the recording it doesnt run properly i am not able to create any thing.
I get error saying that a particular field doesnt exist on the screen.
Is possible to create a BDC program for transaction CJ20N ?
Also is there any other alternative apart from using a BAPI or a function module.
Thanks,
NishantHi,
Check below link for BAPIs of transaction cj20n.
[BAPI for cj20n|BAPI for CJ20N transaction]
Thanks,
Asit Purbey. -
Hi All,
I want to record a BDC for F-30 to clear the deduction line items for a Document. These deduction line items have a "Reason code" with it... When I select a Document Number in F-30, it displays all the line items in a table control.. I need to select and clear only those items with "Reason code" in that...
How can I select a line item from the table control and clear it based on the reason code in a BDC?
I have looked at the previous posts... I have seen a solution provided by filling the structure BSELP. How this can be included in the program and how to fill the values... Is there any limit for the values to get it filled?.. Because I could see
FELDN_1 to FELDN_18 in BSELP structure.....
BDC problem in F-30
BSELP-FELDN_1 = "BELNR"
BSELP-SLVON_1 = "00002222221997003"
How the rfbibl00 program works?
Thanks for the help,
AshaHi,
Use BAPI_PAYIT_POST_CLEARING
or FM POSTING_INTERFACE_CLEARING
or
try this code for transaction fb05:
DATA: BEGIN OF bkey OCCURS 0,
belnr LIKE bseg-belnr,
gjahr LIKE bseg-gjahr,
buzei LIKE bseg-buzei,
END OF bkey.
*Dynpro 122 - Header
PERFORM bdc_dynpro USING 'SAPMF05A' '0122'.
PERFORM bdc_field USING 'BKPF-BLDAT' agz-datum.
PERFORM bdc_field USING 'BKPF-BLART' augblart.
PERFORM bdc_field USING 'BKPF-BUKRS' htab-bukrs.
PERFORM bdc_field USING 'BKPF-BUDAT' agz-datum.
PERFORM bdc_field USING 'BKPF-WAERS' t001-waers.
IF t003-xmref = 'X'.
IF htab-xblnr <> space.
PERFORM bdc_field USING 'BKPF-XBLNR' htab-xblnr.
ELSE.
PERFORM bdc_field USING 'BKPF-XBLNR' text-aag.
ENDIF.
ENDIF.
UNPACK vorgang TO zeile.
PERFORM bdc_field_loop USING zeile 'RF05A-XPOS1' 'X'.
PERFORM bdc_field USING 'BDC_OKCODE' 'SL'.
LOOP AT itab WHERE marked = 'X'.
*Dynpro 0710 -
PERFORM bdc_dynpro USING 'SAPMF05A' '0710'.
PERFORM bdc_field USING 'RF05A-AGKON' agku-kunnr.
PERFORM bdc_field USING 'RF05A-AGBUK' agku-bukrs.
PERFORM bdc_field USING 'BDC_OKCODE' 'SLB'. "ins
*Dynpro 0733 - insert fi-document-nr.
PERFORM bdc_dynpro USING 'SAPMF05A' '0733'.
CLEAR: zeile, cnt.
LOOP AT htab WHERE agzif = agc-nr AND xfeld = 'X'
AND bukrs = agku-bukrs AND kunnr = agku-kunnr.
CLEAR bkey.
cnt = cnt + 1.
UNPACK cnt TO zeile.
PERFORM bdc_field_loop USING zeile 'RF05A-FELDN' 'BELNR'.
MOVE-CORRESPONDING tab TO bkey.
PERFORM bdc_field_loop USING zeile 'RF05A-SEL01' bkey.
ENDLOOP.
<b>Reward points</b>
Regards -
ENTRY_ACT field in BDC program for Txn. IA05
Dear Gurus,
I want to write BDC program for IA05 transaction. In that, Inspection Charatertics entries, I want to add more entries (more than one page - page down). Please guide me how to handle RQPAS-ENTRY_ACT screen field.
Please provide the logic in writing, if possible.
Regards,Hi,
I am having same problem.
Can you give me the code as it shows solved at your end..
-Maharshi -
Hi Abapers..
I am doing BDC Upload program using MB1B Screen. I put the receiving bin but the following error coming..
" CALL_TRANSACTION MB1B Return code = 1,001 RECORD: 0
S The Receiving batch will be automatically set to G02
W Batch G02 has already been posted in stock
S No batch input data for screen SAPLKACB 0002"
What is the error? how to rectify that error. anybody please give the solution of this problem.
Give me source code for this bdc program for MB1B Screen.
This is very urgent I will give reward points..
Thanks
S.Muthu.Hi Siddu,
Thanks Very much. My Solution solved by You. I given reward points.
Thanks a lot.
I created BAPI_GOODSMVT_CREATE now its working.
Regards,
S.Muthu. -
Hi ,
i have written a bdc program for f-02 .here we have 2 posting keys 31 and 40 .when i recored in shdb i can see when i use 31 posting key then i get 302 screen and when i use 40 posting key then i get 300 screen.But the problem is in 302 screen we have new posting keys and new account numbers .how to update these . here is my code . my file is not getting updated when i get screen 302 .Any advice?
REPORT zfip0009 NO STANDARD PAGE HEADING.
TABLES ska1.
DATA: BEGIN OF bdcdata OCCURS 0.
INCLUDE STRUCTURE bdcdata.
DATA: END OF bdcdata.
DATA w_date(10) TYPE c.
DATA w_first TYPE c.
DATA w_second TYPE c.
data from flat file
DATA: BEGIN OF t_data OCCURS 0,
bukrs LIKE bkpf-bukrs, "company code
newbs LIKE rf05a-newbs, "Posting Key
newko LIKE rf05a-newko, "New account number(SAP)
wrbtr(13) TYPE c, "amount
dmbtr(13) TYPE c, "sterling local amount "+MW1
mwskz LIKE bseg-mwskz, "Tax code
sgtxt LIKE bseg-sgtxt, "item description
kostl LIKE cobl-kostl, "Cost centre
ps_posid LIKE cobl-ps_posid, "WBS number
aufnr LIKE cobl-aufnr, "Internal order
END OF t_data.
SELECTION SCREEN
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: p_file LIKE rlgrap-filename
DEFAULT 'C:\temp\XSL.txt'.
SELECTION-SCREEN SKIP.
PARAMETERS: p_sess(12) DEFAULT 'GLPOSTING'.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
PARAMETERS: p_bldat LIKE bkpf-bldat,
p_budat LIKE bkpf-budat,
p_blart LIKE bkpf-blart,
p_monat LIKE bkpf-monat,
p_bukrs LIKE bkpf-bukrs,
p_bktxt LIKE bkpf-bktxt,
p_xblnr LIKE bkpf-xblnr,
p_waers LIKE bkpf-waers.
SELECTION-SCREEN END OF BLOCK b2.
*SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-003.
*PARAMETERS p_ktopl LIKE ska1-ktopl.
*SELECTION-SCREEN END OF BLOCK b3.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CALL FUNCTION 'WS_FILENAME_GET'
EXPORTING
def_filename = p_file
DEF_PATH = ' '
mask = ',.,..'
MODE = ' '
TITLE = ' '
IMPORTING
filename = p_file
RC =
EXCEPTIONS
inv_winsys = 1
no_batch = 2
selection_cancel = 3
selection_error = 4
OTHERS = 5.
START OF SELECTION
START-OF-SELECTION.
Get all of the information held on the spreadsheets.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
filename = p_file
filetype = 'DAT'
TABLES
data_tab = t_data
EXCEPTIONS
OTHERS = 1.
IF sy-subrc <> 0.
WRITE :/ 'Failed to Open Input file', p_file.
EXIT.
ENDIF.
REFRESH bdcdata.
CALL FUNCTION 'BDC_OPEN_GROUP'
EXPORTING
client = sy-mandt
group = p_sess
user = sy-uname
keep = 'X'.
PERFORM load_bdcdata.
CALL FUNCTION 'BDC_CLOSE_GROUP'.
WRITE: /
'Batch input session', p_sess, 'created: process session via SM35'.
END-OF-SELECTION.
*& Form LOAD_BDCDATA
Load the BDCDATA fields depending
FORM load_bdcdata.
CLEAR: w_first, w_second.
CLEAR bdcdata.
LOOP AT t_data.
IF sy-tabix = 1.
PERFORM bdc_dynpro USING 'SAPMF05A' '0100'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWKO'.
PERFORM format_date USING p_bldat.
PERFORM bdc_field USING 'BKPF-BLDAT'
w_date.
PERFORM bdc_field USING 'BKPF-BLART'
p_blart.
PERFORM bdc_field USING 'BKPF-BUKRS'
t_data-bukrs.
PERFORM format_date USING p_budat.
PERFORM bdc_field USING 'BKPF-BUDAT'
w_date.
PERFORM bdc_field USING 'BKPF-WAERS'
p_waers.
PERFORM bdc_field USING 'BKPF-MONAT'
PERFORM bdc_field USING 'BKPF-BKTXT'
p_bktxt.
PERFORM bdc_field USING 'BKPF-XBLNR'
p_xblnr.
PERFORM bdc_field USING 'RF05A-NEWBS'
t_data-newbs.
PERFORM bdc_field USING 'RF05A-NEWKO'
t_data-newko.
ELSE.
PERFORM bdc_dynpro USING 'SAPMF05A' '0300'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWKO'.
PERFORM bdc_field USING 'RF05A-NEWBS'
t_data-newbs.
PERFORM bdc_field USING 'RF05A-NEWKO'
t_data-newko.
PERFORM bdc_field USING 'RF05A-NEWBK'
t_data-bukrs.
PERFORM bdc_dynpro USING 'SAPLKACB' '0002'.
PERFORM bdc_field USING 'BDC_OKCODE' 'ENTE'.
ENDIF.
IF t_data-newbs = '31' .
w_second = '1'.
PERFORM bdc_dynpro USING 'SAPMF05A' '0302'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BDC_CURSOR'
'BSEG-SGTXT'.
PERFORM bdc_field USING 'BSEG-WRBTR'
t_data-wrbtr.
PERFORM bdc_field USING 'BSEG-SGTXT'
t_data-sgtxt.
PERFORM bdc_field USING 'RF05A-NEWBS'
t_data-newbs.
PERFORM bdc_field USING 'RF05A-NEWKO'
t_data-newko.
IF NOT t_data-kostl IS INITIAL.
PERFORM bdc_field USING 'COBL-KOSTL'
t_data-kostl.
ELSEIF NOT t_data-ps_posid IS INITIAL.
PERFORM bdc_field USING 'COBL-PS_POSID'
t_data-ps_posid.
ELSEIF NOT t_data-aufnr IS INITIAL.
PERFORM bdc_field USING 'COBL-AUFNR'
t_data-aufnr.
ENDIF.
*...start of Amendment MW1
IF p_waers ne 'GBP'.
PERFORM bdc_field USING 'BSEG-DMBTR'
t_data-dmbtr.
ENDIF.
ENDIF.
*...end of Amendment MW1 ENDIF.
IF t_data-newbs = '40' .
PERFORM bdc_dynpro USING 'SAPMF05A' '0300'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BDC_CURSOR'
'BSEG-SGTXT'.
PERFORM bdc_field USING 'BSEG-WRBTR'
t_data-wrbtr.
PERFORM bdc_field USING 'BSEG-SGTXT'
t_data-sgtxt.
PERFORM bdc_dynpro USING 'SAPLKACB' '0002'.
PERFORM bdc_field USING 'BDC_OKCODE' 'ENTE'.
IF NOT t_data-kostl IS INITIAL.
PERFORM bdc_field USING 'COBL-KOSTL'
t_data-kostl.
ELSEIF NOT t_data-ps_posid IS INITIAL.
PERFORM bdc_field USING 'COBL-PS_POSID'
t_data-ps_posid.
ELSEIF NOT t_data-aufnr IS INITIAL.
PERFORM bdc_field USING 'COBL-AUFNR'
t_data-aufnr.
ENDIF.
PERFORM bdc_field USING 'BSEG-MWSKZ'
t_data-mwskz.
*...start of Amendment MW1
IF p_waers ne 'GBP'.
PERFORM bdc_field USING 'BSEG-DMBTR'
t_data-dmbtr.
ENDIF.
*...end of Amendment MW1
ENDIF.
AT FIRST.
calculate the tax
PERFORM bdc_field USING 'BKPF-XMWST' 'X'.
ENDAT.
IF t_data-newbs = '40' .
PERFORM bdc_field USING 'DKACB-FMORE'
'X'.
PERFORM bdc_dynpro USING 'SAPLKACB' '0002'.
PERFORM bdc_field USING 'BDC_OKCODE'
'ENTE'.
IF NOT t_data-kostl IS INITIAL.
PERFORM bdc_field USING 'COBL-KOSTL'
t_data-kostl.
ELSEIF NOT t_data-ps_posid IS INITIAL.
PERFORM bdc_field USING 'COBL-PS_POSID'
t_data-ps_posid.
ELSEIF NOT t_data-aufnr IS INITIAL.
PERFORM bdc_field USING 'COBL-AUFNR'
t_data-aufnr.
ENDIF.
ENDIF.
ENDLOOP.
IF w_second = '1'.
PERFORM bdc_dynpro USING 'SAPMF05A' '0302'.
ELSE.
PERFORM bdc_dynpro USING 'SAPMF05A' '0300'.
ENDIF.
PERFORM bdc_field USING 'BDC_OKCODE'
'BU'.
PERFORM bdc_field USING 'BDC_CURSOR'
'BSEG-WRBTR'.
PERFORM bdc_dynpro USING 'SAPLKACB' '0002'.
PERFORM bdc_field USING 'BDC_OKCODE'
'ENTE'.
CALL FUNCTION 'BDC_INSERT'
EXPORTING
tcode = 'F-02'
TABLES
dynprotab = bdcdata.
REFRESH bdcdata.
CLEAR bdcdata.
ENDFORM. " LOAD_BDCDATA
Start of screen
FORM bdc_dynpro USING program dynpro.
CLEAR bdcdata.
bdcdata-program = program.
bdcdata-dynpro = dynpro.
bdcdata-dynbegin = 'X'.
APPEND bdcdata.
ENDFORM. "BDC_DYNPRO
insert field
FORM bdc_field USING fnam fval.
CLEAR bdcdata.
bdcdata-fnam = fnam.
bdcdata-fval = fval.
APPEND bdcdata.
ENDFORM. "BDC_FIELD
*& Form format_date
text
FORM format_date USING p_date.
CLEAR w_date.
w_date(2) = p_date+6(2).
w_date+2(1) = '.'.
w_date3(2) = p_date4(2).
w_date+5(1) = '.'.
w_date+6(4) = p_date(4).
ENDFORM. " format_dateIF item-newbs = '09'
OR item-newbs = '19'
OR item-newbs = '29'
OR item-newbs = '39'.
IF item-newum = 'A' OR
item-newum = 'V' OR
item-newum = '1' OR
item-newum = '2' OR
item-newum = '3' OR
item-newum = '5' OR
item-newum = '6' OR
item-newum = 'B' .
PERFORM bdc_dynpro USING 'SAPMF05A' '0304'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWUM'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BSEG-WRBTR'
item-wrbtr.
PERFORM bdc_field USING 'BSEG-gsber'
item-gsber.
PERFORM bdc_field USING 'BSEG-PRCTR'
item-prctr.
PERFORM bdc_field USING 'BSEG-ZFBDT'
item-zfbdt1.
PERFORM bdc_field USING 'BSEG-ZUONR'
item-zuonr.
PERFORM bdc_field USING 'BSEG-SGTXT'
item-sgtxt.
IF idx1 = '002' .
EXIT.
ENDIF.
idx = idx + 1.
READ TABLE item INDEX idx .
PERFORM bdc_field USING 'RF05A-NEWBS'
item-newbs.
PERFORM bdc_field USING 'RF05A-NEWKO'
item-newko.
PERFORM bdc_field USING 'RF05A-NEWUM'
item-newum.
PERFORM bdc_field USING 'RF05A-NEWBW'
item-newbw.
CONTINUE.
ENDIF.
ENDIF.
IF item-newbs = '09'
OR item-newbs = '19'
OR item-newbs = '29'
OR item-newbs = '39' .
IF item-newum = 'H'
OR item-newum = '4'
OR item-newum = '6'
OR item-newum = '7'
OR item-newum = '8'
OR item-newum = '9'
OR item-newum = 'C'
OR item-newum = 'D'
OR item-newum = 'E'
OR item-newum = 'I'
OR item-newum = 'K'
OR item-newum = 'L'
OR item-newum = 'M'
OR item-newum = 'O'
OR item-newum = 'Q'
OR item-newum = 'R'
OR item-newum = 'T'
OR item-newum = 'U'.
PERFORM bdc_dynpro USING 'SAPMF05A' '0303'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWKO'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BSEG-WRBTR'
item-wrbtr.
PERFORM bdc_field USING 'BSEG-GSBER'
item-gsber.
PERFORM bdc_field USING 'BSEG-ZFBDT'
item-zfbdt1.
PERFORM bdc_field USING 'BSEG-ZUONR'
item-zuonr.
PERFORM bdc_field USING 'BSEG-SGTXT'
item-sgtxt.
IF idx1 = '002' .
EXIT.
ENDIF.
idx = idx + 1 .
READ TABLE item INDEX idx .
PERFORM bdc_field USING 'RF05A-NEWBS'
item-newbs.
PERFORM bdc_field USING 'RF05A-NEWKO'
item-newko.
PERFORM bdc_field USING 'RF05A-NEWUM'
item-newum.
PERFORM bdc_field USING 'RF05A-NEWBW'
item-newbw.
CONTINUE.
ENDIF.
ENDIF.
IF item-newbs = '29' OR item-newbs = '39'.
IF item-newum = '7'.
PERFORM bdc_dynpro USING 'SAPMF05A' '0303'.
PERFORM bdc_field USING 'BDC_CURSOR'
'BSEG-ZFBDT'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ZK'.
PERFORM bdc_field USING 'BSEG-WRBTR'
item-wrbtr.
PERFORM bdc_field USING 'BSEG-GSBER'
item-gsber.
PERFORM bdc_field USING 'BSEG-ZFBDT'
item-zfbdt1.
PERFORM bdc_field USING 'BSEG-ZUONR'
item-zuonr.
PERFORM bdc_field USING 'BSEG-SGTXT'
item-sgtxt.
PERFORM bdc_dynpro USING 'SAPMF05A' '0332'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWKO'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BSEG-BEWAR'
item-ttype.
IF idx1 = '002' .
EXIT.
ENDIF.
idx = idx + 1 .
READ TABLE item INDEX idx .
PERFORM bdc_field USING 'RF05A-NEWBS'
item-newbs.
PERFORM bdc_field USING 'RF05A-NEWKO'
item-newko.
PERFORM bdc_field USING 'RF05A-NEWUM'
item-newum.
PERFORM bdc_field USING 'RF05A-NEWBW'
item-newbw.
CONTINUE.
ENDIF.
ENDIF.
IF item-newbs = '01' OR item-newbs = '11'
OR item-newbs = '05' OR item-newbs = '15'.
PERFORM bdc_dynpro USING 'SAPMF05A' '0301'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWKO'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BSEG-WRBTR'
item-wrbtr.
PERFORM bdc_field USING 'BSEG-GSBER'
item-gsber.
PERFORM bdc_field USING 'BSEG-ZTERM'
item-zterm.
PERFORM bdc_field USING 'BSEG-ZFBDT'
item-zfbdt.
PERFORM bdc_field USING 'BSEG-ZUONR'
item-zuonr.
PERFORM bdc_field USING 'BSEG-SGTXT'
item-sgtxt.
IF idx1 = '002' .
EXIT.
ENDIF.
idx = idx + 1 .
READ TABLE item INDEX idx .
PERFORM bdc_field USING 'RF05A-NEWBS'
item-newbs.
PERFORM bdc_field USING 'RF05A-NEWKO'
item-newko.
PERFORM bdc_field USING 'RF05A-NEWUM'
item-newum.
PERFORM bdc_field USING 'RF05A-NEWBW'
item-newbw.
CONTINUE.
ENDIF.
IF item-newbs = '21' OR item-newbs = '31'
OR item-newbs = '25' OR item-newbs = '35'.
PERFORM bdc_dynpro USING 'SAPMF05A' '0302'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWKO'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BSEG-WRBTR'
item-wrbtr.
PERFORM bdc_field USING 'BSEG-SECCO'
''. "'1000'.
PERFORM bdc_field USING 'BSEG-GSBER'
item-gsber.
PERFORM bdc_field USING 'BSEG-ZTERM'
item-zterm.
PERFORM bdc_field USING 'BSEG-ZFBDT'
item-zfbdt.
PERFORM bdc_field USING 'BSEG-ZUONR'
item-zuonr.
PERFORM bdc_field USING 'BSEG-SGTXT'
item-sgtxt.
IF idx1 = '002' .
EXIT.
ENDIF.
idx = idx + 1.
READ TABLE item INDEX idx.
PERFORM bdc_field USING 'RF05A-NEWBS'
item-newbs.
PERFORM bdc_field USING 'RF05A-NEWKO'
item-newko.
PERFORM bdc_field USING 'RF05A-NEWUM'
item-newum.
PERFORM bdc_field USING 'RF05A-NEWBW'
item-newbw.
CONTINUE.
ENDIF.
IF item-newbs = '70' OR item-newbs = '75'.
PERFORM bdc_dynpro USING 'SAPMF05A' '0305'.
PERFORM bdc_field USING 'BDC_CURSOR'
'BSEG-WRBTR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BSEG-WRBTR'
item-wrbtr.
PERFORM bdc_field USING 'DKACB-FMORE'
'X'.
PERFORM bdc_dynpro USING 'SAPLKACB' '0002'.
PERFORM bdc_field USING 'BDC_CURSOR'
'COBL-PRCTR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ENTE'.
PERFORM bdc_field USING 'COBL-GSBER'
item-gsber.
PERFORM bdc_field USING 'COBL-KOSTL'
item-kostl.
PERFORM bdc_field USING 'COBL-PRCTR'
item-prctr.
PERFORM bdc_dynpro USING 'SAPMF05A' '0305'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWBW'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BSEG-WRBTR'
item-wrbtr.
PERFORM bdc_field USING 'BSEG-BZDAT'
'01.04.2005'.
IF idx1 = '002' .
EXIT.
ENDIF.
idx = idx + 1 .
READ TABLE item INDEX idx .
PERFORM bdc_field USING 'RF05A-NEWBS'
item-newbs.
PERFORM bdc_field USING 'RF05A-NEWKO'
item-newko.
PERFORM bdc_field USING 'RF05A-NEWUM'
item-newum.
PERFORM bdc_field USING 'RF05A-NEWBW'
item-newbw.
CONTINUE.
ENDIF.
ENDLOOP.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BU'.
PERFORM bdc_transaction USING 'F-02'.
DELETE item INDEX 1.
DELETE item INDEX 1.
ix = ix + 2 .
ENDDO.
PERFORM close_group. -
BDC Recording for Sorting a coloum
Hi All,
I have to do BDC Recording for a transaction.During recording i have to select a coloum and sort it ascending and then do further processing.
BDC recording happens for sorting but not for selecting coloum.
and hence it gives error when we process the recording that "Select a coloum".
can u plz tell me how to add seelcting coloum in BDC recorording.
ThanksHi,
You should try to incorporate your functionality using FIND or POSITION button instead of going for sort option.
Find or position button work very good in this scenerio. With find button you can find the desired entry easily.
Hope this will solve your problem.
Regards,
Brajvir -
Hi all, I upgraded my MBP to Lion , but on the screen where i need to type my password, click on my photo and it does not appear the place for me to type my password and it stay stuck there. Can anyone solve this problem for me?
Reboot the machine holding Command and r keys down, you'll boot into Lion Recovery Partition
In there will be Disk Utility, use that to select your Lion OS X Partition and Repair Permissions.
After that is done reboot the machine and see if you can log in.
If not repeat the above steps to get into Lion Recovery, get online and reinstall Lion again, it will overwrite the installed version and hopefully after that it wil work.
Reboot and try again.
If not follow my steps to create a Snow Leopard Data Recovery drive, then option boot from it and grab a copy of your files off the machine.
Then reinstall all your programs onto the external drive like setting up a new machine, then use Disk Utility to erase the entire internal boot drive (select the drive media on the far left, not the partiton slightly indented) format Option: GUID , 1 partition OS X Extended and then use Carbon Copy Cloner to clone the external to the newly formatted internal drive. Once that is finished reboot and disconnect the external drive.
Once you go that, boot into Snow Leopard and update to 10.6.8, use the AppStore and option click on Purchases and download Lion again and install.
Lots of work, but there is no Lion disks.
https://discussions.apple.com/message/16276201#16276201 -
Hi team , I have some questions/Problem for my product apple (iPad,) , I want to employee that can speak or response me in thai language
1. ผม อาคเนย์ พำนักอยู่ประเทศไทย กรุงเทพฯ มีปัญหาสอบถาม ดังต่อไปนี้
- กระผมได้ทำการตัดบัตร เครดิต เพื่อซื้อเกมส์ผ่าน itune store ผ่าน apple itune ID : misskor.yaprom@*** เพื่อซื้อเกมส์ Eleves Realm ในวันที่18 ก.ค. 56 เวลา 17.07น. ซึ่งทางบัตรเครดิตได้แจ้งเรียกเก็บเงินมายอดเงิน 39.99$ ซึ่งในระบบจริงๆ ทางกระผมต้องการตัดในยอด 99.99$ แต่พอได้ประสานงานไปยังธนาคาร ได้รับการแจ้งกลับมาว่า ได้ทำการตัดบัตรในยอดเงิน 39.99$ ซึ่งในความเป็นจริงนั้น กระผมไม่ได้สั่งซื้อเกมส์ในยอด 39.99$ ซึ่งในยอด 99.99$ นั้นพยายามตัดในระบบบัตรเครดิตอยู่ แต่ทางกระผมได้ยืนยันกลับไปว่าไม่ให้ระบบตัดนะครับ เพราะว่าเนื่องจากมีปัญหาในการชำระเงินระหว่าง Apple itune store อยู่
- ทั้งนี้ขอให้ทางเจ้าหน้าที่ประสานงานตรวจสอบ apple itune ID : misskor.yaprom@*** เพื่อซื้อเกมส์ Eleves Realm ตามที่ได้ให้รายละเอียดโดยด่วนว่าเป็นเพราะว่าระบบมีปัญหาหรือว่ามีอะไรเกิดขึ้นในข ั้นตอนการชำระเงินครับ
รบกวนประสานงานกลับมายังกระผม อาคเนย์ ที่หมายเลขโทรศัพท์มือถือ +**** / reply feedback email : lekod1@*** โดยด่วน ในวันศุกร์ที่ 19 ก.ค. 2556 ครับ
ขอบคุณครับ
อาคเนย์ อุดปิน
กด
<Edited By Host>Google translation:
พนักงานของ iTunes Store จะไม่ได้อ่านข้อความในเว็บบอร์ดนี้ ถ้าคุณต้องการความช่วยเหลือสำหรับปัญหาที่มีใน iTunes Store, คุณจะต้องติดต่อกับพวกเขาผ่านทางแบบฟอร์มเว็บนี้:
http://www.apple.com/emea/support/itunes/contact.html -
Problem for releasing blocked sales order on Creditlimit
Hi Gurus,
I a hve a problem for releasing blocked sales orders
what i have done: 1)i have blocked sales order based on exceeded creditlimit
(i have change SDType in 'OVAK' is 'C')
2)now i have to release for furthur processing so i have done following steps
3)Goto VKM3/VKM1 T.Code and then release what order that is blocked.
4) order will appear in the list.
5)Select that one.
6)Click on the green flag that appears on the left hand side.
7)Click on save.
8)click on back it will ask for "Leave list".
9)Click on yes.
10)It said that Sales orer has been released
Still what my problem is:
Problem: 1)So i'm trying to create deliver for Sales order but it shows an error
2)"Sales order is blocked for delivery: Credit limits" Even it was released
Plz kindly help me what i do....
Thanks In Advance
sivakumarsorry i was unfotunately put this thread here over in SD
-
I have been using Elements 12 without a problem for 9 months. Now when I try to open the program, I get an error message "Adobe Photoshop Elements 12 quit unexpectedly" and it will not open at all. What can I do to open the program?
Thank you for responding. Nothing actually worked! After reading the posts online, I called Apple. They indicated they have seen problems with some software after their upgrades. The technician was able to fix the problem on my computer remotely, but I have no clue what he did! But, it was definitely related to their recent upgrade to my computer.
Maybe you are looking for
-
I cannot update Photoshop CS5, Bridge Extended after a fresh reinstall.
It's running in 32 and 64, but there's all these quirks.Like Bridge crashing in 64 but not 32. Raw also.The ATI Radeon5450 is often problematic (not capable of Open GL) In fact, I've been unable to work for a month now. Also, I can't tell if I've got
-
Adobe Reader 11.0.6.70 Crashing Consistently
We have a call center with 825 users. During the workflow of the call, the users are filling out a PDF form created by one of our technical writers. Certain answers will cause the CSR to open a second form and fill in questions on that from answe
-
hi all, I am doing a table import using impdp and getting the following error. both the Source and Target database have the same Oracle Anyversion 11.2.0.1.0,same Characterset and same IBM AIX 5.3 Servers. Below is the parfile: Userid=system DUMPFILE
-
what happns when a static function is used from several classes simultaneously,,,,,,... will it be multithreaded or synchronized or will it become unstable
-
Hi Normally creating Master SLD in Dev and syncing it to the QA , Prod landscapes looks more common approach towards SLD definition and transport mgmt.One suggestion that has come to my notice is to restrict Dev SLD to Systems used in Dev and QA, whi