How to find Payer field is coming from which table

when i am pressing F1 in va02 trasaction on payr field it is showing kugrv table kunnr field and data element is kunrg .
May i know which table payr is coming as per above requirement.

vbak-kunnr, CUSTOMER
vbrk-kunrg. "PAYER
vrkpa-kunde. "PAYER index on VBPA
Regards
Edited by: Raymond Giuseppi on Feb 10, 2008 11:01 AM

Similar Messages

How to get Essential and additional qualifications ,From which table

Hi all,
In one of my requirement, the report should show the Qualifications and Essential qualifications columns in the output.
Requirement is :
1. I have brought qualifications of Applicant from PB0024 table.
2. I need to compare these with the Qualifications maintained in Job for the pernr.
3. There are two types of Qualifications namely essential Qualifications and additional Qualifications.
4.
How do we get the Qualifications maintained for a job/Position?
How can we distinguish between Qualifications and essential Qualifications maintained for a job at the database table level ?
Please reply ASAP.
Regards,
Rama.P

Hi Dilek Ersoz Adak,
How can we get the jobs assigned to a position ,from which table ?
Actually i am doing a custom recruitment report which displayes several fields along with the qualificaions and additional qualifications.
For the two fileds: in the spec it is given as:
14.     Qualification (This is maintained in HRPE_PROFQ_TBJID-infotype 0024 of the employee. Thus, check Position maintained for the employee in P4002_OBJID, against this position check for Essential Qualification, related object type u2018Qu2019 HRPE_PROFQ_ESSENTIAL, compare this with the qualifications maintained for the employee in Infotype 0024, and display wherever these maintained.)
15.     Additional Qualification (This is maintained in HRPE_PROFQ_TBJID-infotype 0024 of the employee. Thus, check Position maintained for the employee in P4002_OBJID, against this position check for Essential Qualification, related object type u2018Qu2019, compare this with the qualifications maintained for the employee in Infotype 0024, and display all qualifications for which HRPE_PROFQ_ESSENTIAL is not maintained.)
16.     Proficiency (HRPE_PROFQ_PROFC_TEXT)
in clear :
1.       Positions (Object Type S) are linked to Job through relationship A 007
2.       In APDISCOM scenario, Qualifications (Object Type Q) are attached to Object u2018Jobu2019 (Object Type C) through Transaction Code PPPM
3.       Now, for a Job there can two types of qualifications maintained Essential Qualifications (ii) Additional Qualifications
4.       For essential qualifications: Against a Qualification we can maintain u201Cessential check boxu201D HRPE_PROFQ
5.       For additional qualifications: Those qualifications for which HRPE_PROFQ is not maintained
6.       Now, for an applicant, Qualifications are maintained in Infotype 0024, wherein the necessary qualifications would be selected.
7.       In the report for field of u201Cessential qualificationu201D, check for qualifications maintained in Infotype 0024 and compare it with qualifications maintained in Job (through Position assigned to the applicant in P4002_OBJID)
8.       Check for essential qualification HRPE_PROFQ maintained in Job and check whether the same Q is maintained in Infotype 0024 for the applicant, if yes, then generated Text of the Q
9.       If there are any additional qualifications which are maintained in the job and not maintained in Infotype 0024, DONu2019T GENERATE ANYTHING IN FIELD
10.   If there are any additional qualifications which are maintained in the job and if same are maintained in Infotype 0024, generate Q text under field of u201CAdditional Qualificationsu201D in the report
11.   If there are any extra qualifications in infotype 0024, which are not maintained in Job, then generate Q text under field of u201CAdditional Qualificationsu201D in the report
Please provide the procedure.(For clarity copy and paste the text in a MS-word)
Please reply ASAP.
Regards,
Rama.P
Edited by: Rama Chary on Dec 9, 2009 1:28 AM

How to find out sub site name from which sub site template is created - in solution gallery

hi,
i am having an issue in my "save site as a template". i have created a subsite few weeks back with doc libs and splists, disc.forum and based on the template subsite I have created new subsites. now
as per my new requirement i need to add new doclibs and few columns in these doc lib. But I am unable to find which sub site was taken as a template.since i have many subsites with different names, I forgott
to make meaningful names, i gave some datetime for the templatesubsites,
like project_27_jul_2pm,project_20_jul_7pm, etc etc.
So would like to know, is it possible to find out from which subsite I have taken/prepared the template subsite.
any APIs are available or any power shell scripts. such that i can find out from which subsite i have created this sub site template.

check this
http://social.msdn.microsoft.com/Forums/en-US/3c492adb-e7cb-4f5c-8c29-386a21c3498e/how-to-find-out-a-list-of-sites-created-from-a-template?forum=sharepointgeneralprevious

Oracle tuning: How to find percentage rows being accessed from a table

Oracle recommends that full table scan on a large table is good if the number of rows being accessed is more than 20%. My question is how to I find out how many rows of the table is being accessed if I have a complex SQL which involves 10 other tables.

Hi,
there are two approaches to SQL tuning. One is to list all things that could possibly be wrong with the database, search for typical solutions, and try them all one by one.
The other is to find out what is taking all the time and work on it.
As I'm sure you've already figured by now, the first approach is unreliable, error-prone, inefficient. In one word, wrong. The only reason it's still around is because:
1) 10 years ago Oracle diagnostic tools weren't as advanced as they are now,
2) some people never learn
3) there's no way to stop these people from writing stupid things on the internet.
So forget all about these unreset HWM, low ratios and other dreadful things that could be wrong with your database code, and focus on things that are wrong. Follow instructions in this forum's FAQ to find the root cause of the problem (if you have questions along the way, post them here, we'd be happy to help). If this leads you to HWM, then fix it. If it doesn't, don't waste your time on it.
Best regards,
Nikolay

How to find that from which table data is coming in datasource?

Hi friends
I want to find that from which tables data is coming into datasource 2LIS_04_P_COMP,2LIS_04_P_MATNR..
I have searched in forums.. I also have checked in sap.help.. but I didnt get any tablename in field "Table of origin"..
Please tell me how can I find that data is coming from which table into these datasources..
I dont want name of the setup tables.. I want name of the original tables (in R/3)which has data..
Regards
Swati

Hi......
For data source 2LIS_04_P_COMP............MCAFKO, MCAFPO, MCCOMP are the R3 communication structures...........
Check these commonication Structure in SE11............I think u will get the required information........
2LIS_04_P_MATNR is Material View from PP/PP-PI ..........check this..........
http://help.sap.com/saphelp_nw70/helpdata/EN/88/7fc73c0c52085be10000000a114084/frameset.htm
Check this each field in SE11....from there try to find out these fields belongs to which table..........as I hav explained u in another thread..........
May be the extractor is using these fields from different tables.....
Regards,
Debjani........

From which tables the data is coming in to transaction fields, how to find?

Hi abapers,
I am new to abap,
I have some data in one transaction.
I want to know that one particular record in a field from which table the data is coming, how do i know?
How to find that for the transaction is haveing header and item tables?
How to find that what are tables used for that transaction?
by presseing f1 on a field we can find table name or structure name along with field name of that particular field?
If structrure means how to find that field from which table it is coming?
I found table name for some of the fields like this by pressing f1,double clicking on structure name?
but some fields in another transaction does not showing the table names only structure it is showing?
Moderator Message: Basic Question. Please search.
Edited by: kishan P on Nov 13, 2010 3:20 PM

hi ,
you can do that by Transation st05
where you have to 1) activate trace ,
2) execute transaction
3) deactivate trace after transaction complete
4) display trace
there you can find all step by step flow from where data has been retirved and tables also .
if you dont no take help from Basis People .
Regards
Deepak.

How to Find out the from which table we can get the following fields?

The following fields are from invoice data
How to know or from which table we get the following fields:
Header Details:
Manifest:, Finance Control #:, Alternate SID:, Carrier:, Container/Trailer #:, Hazmat Code:, Harmonizing Code, Freight Forwarder, Fiscal Rep., Ship From, Notify Party
Item Details:
VAT/Tax Rate %, VAT/Tax Amount, Measurements, Net Weight, Gross Weight
thanks

Dear Krishnama
Place your mouse on the required fields and press F1. A box with header Performance Assistant will appear in front of you where you select "Technical information" (icon like hammer and spanner).
You can now see what table it is.
thanks
G. Lakshmipathi

How to find from which table we r fetching the data

Hi friends,
i got a requirement to design a query,in my transfer rules i check the info object related to the fiels.but in my crm the field name is different.
how to find from which table the field is fetched........
please tell me........
Regards
sridath

Dear Sridath,
In ST05 switch on the SQL Trace.
Goto RSA3.
Give your DataSource name > Execute
Goto ST05...Switch OFF the Trace
Analyze the Trace file
Gives you details about the fields and Tables from where you are fetching.
OR
Goto LBWE
Find your DataSource > Maintenance > Display mode
In right side window...expand ALL list box...
Exclude MC and take other words...they are the Source Tables.
Regards,
Ramkumar.

From which tables i would find the delivery and billing document field..??

I need to create an ALV report which displays the following details in the output.
Order No Item No     Material     Order Qty     Item Category     Plant     Delivery     Billing Document     Sales Org     Dist Channel     Division     Created By     Created On      Changed On
For(Order No Item No     Material     Order Qty     Item Category     Plant) i took the fields from vbap and
for(Sales Org     Dist Channel     Division     Created By     Created On      Changed On)i took the fields from vbak..
From which tables i would find the delivery and billing document field related to sales document.??
need help...
Moderator message : Requirements dumping not allowed, thread locked.
Edited by: Vinod Kumar on Mar 6, 2012 2:53 PM

i am new to abap...so i dont have idea about sd table relationship.
so please reply how to add delivery and billing doc in my coding below..
*& Report ZINAA_SD
REPORT zinaa_sd.
TABLES: vbap, vbak, vbfa.
TYPE-POOLS: slis.
CONSTANTS: c_x TYPE char1 VALUE 'X'.
TYPES:
        BEGIN OF st_vbap,
         vbeln TYPE vbap-vbeln,
         posnr TYPE vbap-posnr,
         matnr TYPE vbap-matnr,
         pstyv TYPE vbap-pstyv,
         kwmeng TYPE vbap-kwmeng,
         werks TYPE vbap-werks,
        END OF st_vbap,
        BEGIN OF st_vbak,
          vbeln TYPE vbak-vbeln,
          erdat TYPE vbak-erdat,
          ernam TYPE vbak-ernam,
          vkorg TYPE vbak-vkorg,
          vtweg TYPE vbak-vtweg,
          spart TYPE vbak-spart,
          aedat TYPE vbak-aedat,
        END OF st_vbak,
       BEGIN OF st_final,
         vbeln TYPE vbap-vbeln,
         posnr TYPE vbap-posnr,
         matnr TYPE vbap-matnr,
         pstyv TYPE vbap-pstyv,
         kwmeng TYPE vbap-kwmeng,
         werks TYPE vbap-werks,
         erdat TYPE vbak-erdat,
         ernam TYPE vbak-ernam,
         vkorg TYPE vbak-vkorg,
         vtweg TYPE vbak-vtweg,
         spart TYPE vbak-spart,
         aedat TYPE vbak-aedat,
       END OF st_final.
DATA:
      lt_vbap TYPE TABLE OF st_vbap,
      ls_vbap TYPE st_vbap,
      lt_vbak TYPE TABLE OF st_vbak,
      ls_vbak TYPE st_vbak,
      lt_final TYPE TABLE OF st_final,
      ls_final TYPE st_final,
      lt_fieldcat TYPE slis_t_fieldcat_alv,
      ls_fieldcat TYPE slis_fieldcat_alv,
      layout TYPE slis_layout_alv,
      lt_sort TYPE slis_t_sortinfo_alv,
      ls_sort TYPE slis_sortinfo_alv.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: s_vbeln FOR vbap-vbeln,
                s_erdat FOR vbap-erdat.
SELECTION-SCREEN END OF BLOCK b1.
PERFORM select_data.
PERFORM loop_final.
PERFORM sort.
PERFORM a USING:
      'VBELN' TEXT-002,
      'POSNR' TEXT-003,
      'MATNR' TEXT-004,
      'KWMENG' TEXT-005,
      'PSTYV' TEXT-006,
      'WERKS' TEXT-007,
      'VKORG' TEXT-008,
      'VTWEG' TEXT-009,
      'SPART' TEXT-010,
      'ERNAM' TEXT-011,
      'ERDAT' TEXT-012,
      'AEDAT' TEXT-013.
PERFORM display.
*&      Form SELECT_DATA
      text
FORM select_data.
SELECT
   vbeln
   vkorg
   vtweg
   spart
   ernam
   erdat
   aedat
   INTO CORRESPONDING FIELDS OF TABLE lt_vbak
   FROM vbak
   WHERE vbeln IN s_vbeln AND erdat IN s_erdat.
IF sy-subrc = 0.
    SORT lt_vbak by vbeln.
ENDIF.
SELECT
   vbeln
   posnr
   matnr
   kwmeng
   pstyv
   werks
   INTO CORRESPONDING FIELDS OF TABLE lt_vbap
   FROM vbap
   FOR ALL ENTRIES IN lt_vbak
   WHERE vbeln = lt_vbak-vbeln.
IF sy-subrc = 0.
    SORT lt_vbap by vbeln.
ENDIF.
ENDFORM.                    "SELECT_DATA
*&      Form LOOP_FINAL
      text
FORM loop_final.
LOOP AT lt_vbap INTO ls_vbap.
    ls_final-vbeln = ls_vbap-vbeln.
    ls_final-posnr = ls_vbap-posnr.
    ls_final-matnr = ls_vbap-matnr.
    ls_final-kwmeng = ls_vbap-kwmeng.
    ls_final-pstyv = ls_vbap-pstyv.
    ls_final-werks = ls_vbap-werks.
    READ TABLE lt_vbak INTO ls_vbak WITH KEY vbeln = ls_vbap-vbeln BINARY SEARCH.
    ls_final-vkorg = ls_vbak-vkorg.
    ls_final-vtweg = ls_vbak-vtweg.
    ls_final-spart = ls_vbak-spart.
    ls_final-ernam = ls_vbak-ernam.
    ls_final-erdat = ls_vbak-erdat.
    ls_final-aedat = ls_vbak-aedat.
    APPEND ls_final TO lt_final.
    CLEAR ls_final.
ENDLOOP.
ENDFORM.                    "LOOP_FINAL
*&      Form SORT
      text
FORM sort.
ls_sort-spos = '01' .
ls_sort-fieldname = 'VBELN'.
ls_sort-tabname = 'LT_FINAL'.
ls_sort-up = c_x.
ls_sort-subtot = c_x.
APPEND ls_sort TO lt_sort .
ENDFORM.                    "SORT
*&      Form A
      text
     -->FNAME      text
     -->SELTEXT    text
     -->EMPHA      text
FORM a USING fname TYPE string seltext TYPE string.
IF fname = 'KWMENG'.
    ls_fieldcat-do_sum = c_x.
ENDIF.
ls_fieldcat-fieldname = fname.
ls_fieldcat-seltext_m = seltext.
APPEND ls_fieldcat TO lt_fieldcat.
CLEAR ls_fieldcat.
ENDFORM.                    "A
*&      Form ALV
      text
FORM display.
layout-zebra = c_x.
layout-colwidth_optimize = c_x.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
I_INTERFACE_CHECK                 = ' '
I_BYPASSING_BUFFER                = ' '
I_BUFFER_ACTIVE                   = ' '
   i_callback_program                = sy-repid
I_CALLBACK_PF_STATUS_SET          = ' '
I_CALLBACK_USER_COMMAND           = ' '
I_CALLBACK_TOP_OF_PAGE            = ' '
I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
I_CALLBACK_HTML_END_OF_LIST       = ' '
I_STRUCTURE_NAME                  =
I_BACKGROUND_ID                   = ' '
I_GRID_TITLE                      =
I_GRID_SETTINGS                   =
    is_layout                         = layout
    it_fieldcat                       = lt_fieldcat
IT_EXCLUDING                      =
IT_SPECIAL_GROUPS                 =
    it_sort                           = lt_sort
IT_FILTER                         =
IS_SEL_HIDE                       =
I_DEFAULT                         = C_X
I_SAVE                            = ' '
IS_VARIANT                        =
IT_EVENTS                         =
IT_EVENT_EXIT                     =
IS_PRINT                          =
IS_REPREP_ID                      =
I_SCREEN_START_COLUMN             = 0
I_SCREEN_START_LINE               = 0
I_SCREEN_END_COLUMN               = 0
I_SCREEN_END_LINE                 = 0
I_HTML_HEIGHT_TOP                 = 0
I_HTML_HEIGHT_END                 = 0
IT_ALV_GRAPHICS                   =
IT_HYPERLINK                      =
IT_ADD_FIELDCAT                   =
IT_EXCEPT_QINFO                   =
IR_SALV_FULLSCREEN_ADAPTER        =
IMPORTING
E_EXIT_CAUSED_BY_CALLER           =
ES_EXIT_CAUSED_BY_USER            =
    TABLES
    t_outtab                          = lt_final
EXCEPTIONS
PROGRAM_ERROR                     = 1
OTHERS                            = 2
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM.                    "ALV

How to know querry level fields from which tables in the source system

Hi Experts,
let's say we've two fields in the querry e.g: Actual GI Quantity, Actual Value of GI
This fields from PP Querris level how would i know from which table we're getting data is there any easy process to find out please drop your suggestions..
Next doubt is when generate querry e.g. PM Module we don't know exatly what're the available tables & fields technical names but in my currently project using SAP Delivered Infocubes & Querries at the moment & generating querries but when we test in the Portal it's shows some fields '0', X. I've to check in source system weather it's having any values or not.
Can anybody drops your valuable words
Cheers
Suresh

Hi all,
I'm a colleague of Maarten, and I think maybe we didn't explain well enough what we want. So let me try to elaborate:
We want to obtain the reference (within the SOAP-Body of the XI-message) to the attachment which contains the main payload (at least, in XI itself). This reference seems to have gone missing, once our adapter module (after having gone through XI) is entered (and, by the way, before we enter the SOAP-receiver-adapter).
The JAVA-representation of the XI-message seems to hide the fact that in XI itself, the main payload is an attachment, referenced from within the SOAP-Body.
Nevertheless, we would like to obtain/retain(?) that reference, in order to put it in our own to-be-created-additional-attachment, which would go (via the PayloadSwapBean-module of SAP) into the SOAP-body of the final SOAP-call, and should then reference the 'new attachment' (which was (in XI itself) the main payload).
So, I think both answers (up to now) don't help us much (however: thanks for your reaction anyway of course).
So, maybe someone has another idea?
Regards, Fred

How come there is no sound coming from itunes 10.3.1?

how come there is no sound coming from itunes 10.3.1? i have tried various time installing & unistalling the program.
i tried looking to find ways to fix this problem but nothing has seemed to work with the problem. I also tried restarting my computer and its still the same problem. this all started when i updated my itunes to the newer version of itunes. the player shows the song i have selected & it shows the song playing but there is no sound. please anything will help.

Try some of these suggestions:
http://h10025.www1.hp.com/ewfrf/wc/document?docname=c01912228&lc=en&cc=us&dlc=en
Reminder: Please select the "Accept as Solution" button on the post that best answers your question. Also, you may click on the white star in the "Kudos" button for any helpful post to give that person a quick thanks. These feedback tools help keep our community active, so you receive better answers faster.

How to find BADI Defination and Implemantation from Method of BADI?

HI,
   can anyone tell me that how to find BADI Defination and Implemantation from Method of BADI?

& Report ZPJA_PM002 (V2)                                            &
& Text Elements:                                                     &
& P_DEVC Show user-exits from development class                      &
& P_LIMIT Limit submit program selection                             &
& P_FUNC Show function modules                                       &
& P_SUBM Show submit programs                                        &
& S01    Selection data (TCode takes precedence over program name) &
report zpja_pm002
no standard page heading
line-size 158.
*tables: enlfdir.     "Additional Attributes for Function Modules
data: tabix      like sy-tabix,
      w_linnum   type i,
      w_off      type i,
      w_index    like sy-tabix,
      w_include like trdir-name,
      w_prog     like trdir-name,
      w_incl     like trdir-name,
      w_area     like rs38l-area,
      w_level,
      w_str(50) type c,
      w_funcname like tfdir-funcname.
constants: c_fmod(40) type c value 'Function modules selected: ',
           c_subm(40) type c value 'Submit programs selected: ',
           c_col1(12) type c value 'Enhanmt Type',
           c_col2(40) type c value 'Enhancement',
           c_col3(30) type c value 'Program/Include',
           c_col4(20) type c value 'Enhancement Name',
           c_col5(40) type c value 'Enhancement Description'.
Work Areas: ABAP Workbench
data: begin of wa_d010inc.
data: master type d010inc-master.
data: end of wa_d010inc.
data: begin of wa_tfdir.
data: funcname type tfdir-funcname,
      pname    type tfdir-pname,
      include type tfdir-include.
data: end of wa_tfdir.
data: begin of wa_tadir.
data: devclass type tadir-devclass.
data: end of wa_tadir.
data: begin of wa_tstc.
data: pgmna type tstc-pgmna.
data: end of wa_tstc.
data: begin of wa_tstcp.
data: param type tstcp-param.
data: end of wa_tstcp.
data: begin of wa_enlfdir.
data: area type enlfdir-area.
data: end of wa_enlfdir.
Work Areas: BADIs
data: begin of wa_sxs_attr.
data: exit_name type sxs_attr-exit_name.
data: end of wa_sxs_attr.
data: begin of wa_sxs_attrt.
data: text type sxs_attrt-text.
data: end of wa_sxs_attrt.
Work Areas: Enhancements
data: begin of wa_modsap.
data: member type modsap-member.
data: end of wa_modsap.
data: begin of wa_modsapa.
data: name type modsapa-name.
data: end of wa_modsapa.
data: begin of wa_modsapt.
data: modtext type modsapt-modtext.
data: end of wa_modsapt.
Work Areas: Business Transaction Events
data: begin of wa_tbe01t.
data: text1 type tbe01t-text1.
data: end of wa_tbe01t.
data: begin of wa_tps01t.
data: text1 type tps01t-text1.
data: end of wa_tps01t.
user-exits
types: begin of t_userexit,
      type(12) type c,
      pname    like trdir-name,
      txt(300),
      level    type c,
      modname(30) type c,
      modtext(40) type c,
end of t_userexit.
data: i_userexit type standard table of t_userexit with header line.
Function module developmnet classes
types: begin of t_devclass,
      clas   like trdir-clas,
end of t_devclass.
data: i_devclass type standard table of t_devclass with header line.
Submit programs
types: begin of t_submit,
      pname     like trdir-name,
      level,
      done,
end of t_submit.
data: i_submit type standard table of t_submit with header line.
Source code
types: begin of t_sourcetab,                        "#EC * (SLIN lügt!)
        line(200),                                  "#EC * (SLIN lügt!)
      end of t_sourcetab.                           "#EC * (SLIN lügt!)
data: sourcetab type standard table of t_sourcetab with header line.
data c_overflow(30000) type c.
Description of an ABAP/4 source analysis token
data: i_stoken type standard table of stokex with header line.
data wa_stoken like i_stoken.
Description of an ABAP/4 source analysis statement
data: i_sstmnt type standard table of sstmnt with header line."#EC
keywords for searching ABAP code
types: begin of t_keywords,
      word(30),
end of t_keywords.
data: keywords type standard table of t_keywords with header line.
function modules within program
types: begin of t_fmodule,
      name   like rs38l-name,
      pname like trdir-name,
      pname2 like trdir-name,
      level,
      bapi,
      done,
end of t_fmodule.
data: i_fmodule type standard table of t_fmodule with header line.
& Selection Options                                                  &
selection-screen begin of block selscr1 with frame title text-s01.
parameter: p_pname like trdir-name memory id rid,
           p_tcode like syst-tcode,
           p_limit(4) type n default 100,
           p_devc like rihea-dy_ofn default ' ',
           p_func like rihea-dy_ofn default ' ',
           p_subm like rihea-dy_ofn default ' '.
selection-screen end of block selscr1.
& START-OF-SELECTION                                                 &
start-of-selection.
if p_pname is initial and p_tcode is initial.
    message e008(hrfpm). "Make entry on the selection screen
    stop.
endif.
ensure P_LIMIT is not zero.
if p_limit = 0.
    p_limit = 1.
endif.
perform data_select.
perform get_submit_data.
perform get_fm_data.
perform get_additional_data.
perform data_display.
& Form DATA_SELECT                                                   &
form data_select.
data selection message to sap gui
call function 'SAPGUI_PROGRESS_INDICATOR'
    destination 'SAPGUI'
    keeping logical unit of work
    exporting
      text                  = 'Get programs/includes'       "#EC NOTEXT
    exceptions
      system_failure
      communication_failure
    .                                                       "#EC *
determine search words
keywords-word = 'CALL'.
append keywords.
keywords-word = 'FORM'.
append keywords.
keywords-word = 'PERFORM'.
append keywords.
keywords-word = 'SUBMIT'.
append keywords.
keywords-word = 'INCLUDE'.
append keywords.
if not p_tcode is initial.
get program name from TCode
    select single pgmna from tstc into wa_tstc-pgmna
                 where tcode eq p_tcode.
    if not wa_tstc-pgmna is initial.
      p_pname = wa_tstc-pgmna.
TCode does not include program name, but does have refereve TCode
    else.
      select single param from tstcp into wa_tstcp-param
                   where tcode eq p_tcode.
      if sy-subrc = 0.
        check wa_tstcp-param(1)   = '/'.
        check wa_tstcp-param+1(1) = '*'.
        if wa_tstcp-param ca ' '.
        endif.
        w_off = sy-fdpos + 1.
        subtract 2 from sy-fdpos.
        if sy-fdpos gt 0.
          p_tcode = wa_tstcp-param+2(sy-fdpos).
        endif.
        select single pgmna from tstc into wa_tstc-pgmna
               where tcode eq p_tcode.
        p_pname = wa_tstc-pgmna.
        if sy-subrc <> 0.
          message e110(/saptrx/asc) with 'No program found for: '
p_tcode."#EC NOTEXT
          stop.
        endif.
      else.
        message e110(/saptrx/asc) with 'No program found for: ' p_tcode.
"#EC NOTEXT
        stop.
      endif.
    endif.
endif.
Call customer-function aus Program coding
read report p_pname into sourcetab.
if sy-subrc > 0.
    message e017(enhancement) with p_pname raising no_program."#EC *
endif.
scan abap-source sourcetab tokens     into i_stoken
                             statements into i_sstmnt
                             keywords   from keywords
                             overflow into c_overflow
                             with includes.
                             WITH ANALYSIS.
if sy-subrc > 0. "keine/syntakt. falsche Ablauflog./Fehler im Skanner
    message e130(enhancement) raising syntax_error.         "#EC *
endif.
check I_STOKEN for entries
clear w_linnum.
describe table i_stoken lines w_linnum.
if w_linnum gt 0.
    w_level = '0'.
    w_prog = ''.
    w_incl = ''.
    perform data_search tables i_stoken using w_level w_prog w_incl.
endif.
endform.                        "DATA_SELECT
& Form GET_FM_DATA                                                   &
form get_fm_data.
data selection message to sap gui
call function 'SAPGUI_PROGRESS_INDICATOR'
    destination 'SAPGUI'
    keeping logical unit of work
    exporting
      text                  = 'Get function module data'    "#EC NOTEXT
    exceptions
      system_failure
      communication_failure
    .                                                       "#EC *
Function module data
sort i_fmodule by name.
delete adjacent duplicates from i_fmodule comparing name.
loop at i_fmodule where done ne 'X'.
    clear:   i_stoken, i_sstmnt, sourcetab, wa_tfdir, w_include .
    refresh: i_stoken, i_sstmnt, sourcetab.
    clear wa_tfdir.
    select single funcname pname include from tfdir into wa_tfdir
                            where funcname = i_fmodule-name.
    check sy-subrc = 0.
    call function 'FUNCTION_INCLUDE_SPLIT'
      exporting
        program = wa_tfdir-pname
      importing
        group   = w_area.
    concatenate 'L' w_area 'U' wa_tfdir-include into w_include.
    i_fmodule-pname = w_include.
    i_fmodule-pname2 = wa_tfdir-pname.
    modify i_fmodule.
    read report i_fmodule-pname into sourcetab.
    if sy-subrc = 0.
      scan abap-source sourcetab tokens     into i_stoken
                                 statements into i_sstmnt
                                 keywords   from keywords
                                 with includes.
      if sy-subrc > 0.
        message e130(enhancement) raising syntax_error.
      endif.
check i_stoken for entries
      clear w_linnum.
      describe table i_stoken lines w_linnum.
      if w_linnum gt 0.
        w_level = '1'.
        w_prog = i_fmodule-pname2.
        w_incl = i_fmodule-pname.
        perform data_search tables i_stoken using w_level w_prog w_incl.
      endif.
    endif.
endloop.
if p_devc = 'X'.
    loop at i_fmodule.
      clear: wa_tadir, wa_enlfdir.
      select single area from enlfdir into wa_enlfdir-area
                            where funcname = i_fmodule-name.
      check not wa_enlfdir-area is initial.
      select single devclass into wa_tadir-devclass
                      from tadir where pgmid    = 'R3TR'
                                   and object   = 'FUGR'
                                   and obj_name = wa_enlfdir-area.
      check not wa_tadir-devclass is initial.
      move wa_tadir-devclass to i_devclass-clas.
      append i_devclass.
      i_fmodule-done = 'X'.
      modify i_fmodule.
    endloop.
    sort i_devclass.
    delete adjacent duplicates from i_devclass.
endif.
endform.                        "GET_FM_DATA
& Form GET_SUBMIT_DATA                                               &
form get_submit_data.
data selection message to sap gui
call function 'SAPGUI_PROGRESS_INDICATOR'
    destination 'SAPGUI'
    keeping logical unit of work
    exporting
      text                  = 'Get submit data'             "#EC NOTEXT
    exceptions
      system_failure
      communication_failure
    .                                                       "#EC *
sort i_submit.
delete adjacent duplicates from i_submit comparing pname.
w_level = '0'.
loop at i_submit where done ne 'X'.
    clear:   i_stoken, i_sstmnt, sourcetab.
    refresh: i_stoken, i_sstmnt, sourcetab.
    read report i_submit-pname into sourcetab.
    if sy-subrc = 0.
      scan abap-source sourcetab tokens     into i_stoken
                                 statements into i_sstmnt
                                 keywords   from keywords
                                 with includes.
      if sy-subrc > 0.
       message e130(enhancement) raising syntax_error.
        continue.
      endif.
check i_stoken for entries
      clear w_linnum.
      describe table i_stoken lines w_linnum.
      if w_linnum gt 0.
        w_prog = i_submit-pname.
        w_incl = ''.
        perform data_search tables i_stoken using w_level w_prog w_incl.
      endif.
    endif.
restrict number of submit program selected for processing
    describe table i_submit lines w_linnum.
    if w_linnum ge p_limit.
      w_level = '1'.
    endif.
    i_submit-done = 'X'.
    modify i_submit.
endloop.
endform.                       "GET_SUBMIT_DATA
& Form DATA_SEARCH                                                   &
form data_search tables p_stoken structure stoken
                        using p_level p_prog p_incl.
loop at p_stoken.
    clear i_userexit.
    tabix = sy-tabix + 1.
    i_userexit-level = p_level.
    if i_userexit-level = '0'.
      if p_incl is initial.
        i_userexit-pname = p_pname.
      else.
        concatenate p_pname '/' p_incl into i_userexit-pname.
      endif.
    else.
      if p_incl is initial.
        i_userexit-pname = p_prog.
      else.
        concatenate p_prog '/' p_incl into i_userexit-pname.
      endif.
    endif.
Include
    if p_stoken-str eq 'INCLUDE'.
      check p_level eq '0'.    " do not perform for function modules
*(2nd pass)
      w_index = sy-tabix + 1.
      read table p_stoken index w_index into wa_stoken.
      check not wa_stoken-str cs 'STRUCTURE'.
      check not wa_stoken-str cs 'SYMBOL'.
      read table i_submit with key pname = wa_stoken-str.
      if sy-subrc <> 0.
        i_submit-pname = wa_stoken-str.
        i_submit-level = p_level.
        append i_submit.
      endif.
    endif.
Enhancements
    if p_stoken-str eq 'CUSTOMER-FUNCTION'.
      clear w_funcname.
      read table p_stoken index tabix.
      translate p_stoken-str using ''' '.
      condense p_stoken-str.
      if p_prog is initial.
        concatenate 'EXIT' p_pname p_stoken-str into w_funcname
                     separated by '_'.
      else.
        concatenate 'EXIT' p_prog p_stoken-str into w_funcname
               separated by '_'.
      endif.
      select single member from modsap into wa_modsap-member
            where member = w_funcname.
      if sy-subrc = 0.   " check for valid enhancement
        i_userexit-type = 'Enhancement'.
        i_userexit-txt = w_funcname.
        append i_userexit.
      else.
        clear wa_d010inc.
        select single master into wa_d010inc-master
              from d010inc
                 where include = p_prog.
        concatenate 'EXIT' wa_d010inc-master p_stoken-str into
w_funcname
               separated by '_'.
        i_userexit-type = 'Enhancement'.
        i_userexit-txt = w_funcname.
      endif.
    endif.
BADIs
    if p_stoken-str cs 'cl_exithandler='.
      w_index = sy-tabix + 4.
      read table p_stoken index w_index into wa_stoken.
      i_userexit-txt = wa_stoken-str.
      replace all occurrences of '''' in i_userexit-txt with space.
      i_userexit-type = 'BADI'.
      append i_userexit.
    endif.
Business transaction events
    if p_stoken-str cs 'OPEN_FI_PERFORM'.
      i_userexit-type = 'BusTrEvent'.
      i_userexit-txt = p_stoken-str.
      replace all occurrences of '''' in i_userexit-txt with space.
      i_userexit-modname = i_userexit-txt+16(8).
      case i_userexit-txt+25(1).
        when 'E'.
          clear wa_tbe01t.
          select single text1 into wa_tbe01t-text1 from tbe01t
                           where event = i_userexit-txt+16(8)
                             and spras = sy-langu.
          if wa_tbe01t-text1 is initial.
            i_userexit-modtext = ''.            "#EC NOTEXT
          else.
            i_userexit-modtext = wa_tbe01t-text1.
          endif.
          i_userexit-modname+8 = '/P&S'.                    "#EC NOTEXT
        when 'P'.
          clear wa_tps01t.
          select single text1 into wa_tps01t-text1 from tps01t
                           where procs = i_userexit-txt+16(8)
                             and spras = sy-langu.
          i_userexit-modtext = wa_tps01t-text1.
          i_userexit-modname+8 = '/Process'.
      endcase.
      append i_userexit.
    endif.
Program exits
    if p_stoken-str cs 'USEREXIT_'.
      i_userexit-type = 'Program Exit'.
      i_userexit-txt = p_stoken-str.
      replace all occurrences of '''' in i_userexit-txt with space.
      append i_userexit.
    endif.
Submit programs
    if p_stoken-str cs 'SUBMIT'.
      check p_level eq '0'.    " do not perform for function modules
*(2nd pass)
      check not p_stoken-str cs '_'.   " ensure not SUBMIT_XXX
      w_index = sy-tabix + 1.
      read table p_stoken index w_index into wa_stoken.
      check not wa_stoken-str cs '_'.   " ensure not SUBMIT_XXX
      replace all occurrences of '''' in wa_stoken-str with space.
      read table i_submit with key pname = wa_stoken-str.
      if sy-subrc <> 0.
        i_submit-pname = wa_stoken-str.
        i_submit-level = p_level.
        append i_submit.
      endif.
    endif.
Perform routines (which reference external programs)
    if p_stoken-str cs 'PERFORM'.
      check p_level eq '0'.    " do not perform for function modules
*(2nd pass)
      w_index = sy-tabix + 1.
      read table p_stoken index w_index into wa_stoken.
      if not wa_stoken-ovfl is initial.
        w_off = wa_stoken-off1 + 10.
        w_str = c_overflow+w_off(30).
        find ')' in w_str match offset w_off.
        w_off = w_off + 1.
        wa_stoken-str = w_str(w_off).
      endif.
      check wa_stoken-str cs '('.
      w_off = 0.
      while sy-subrc = 0.
        if wa_stoken-str+w_off(1) eq '('.
          replace section offset w_off length 1 of wa_stoken-str with ''
          replace all occurrences of ')' in wa_stoken-str with space.
          read table i_submit with key pname = wa_stoken-str.
          if sy-subrc <> 0.
            i_submit-pname = wa_stoken-str.
            append i_submit.
          endif.
          exit.
        else.
          replace section offset w_off length 1 of wa_stoken-str with ''
          shift wa_stoken-str left deleting leading space.
        endif.
      endwhile.
    endif.
Function modules
    if p_stoken-str cs 'FUNCTION'.
      clear i_fmodule.
      check p_level eq '0'.    " do not perform for function modules
*(2nd pass)
      w_index = sy-tabix + 1.
      read table p_stoken index w_index into wa_stoken.
     if wa_stoken-str cs 'WF_'.
     if wa_stoken-str cs 'IF_'.
       break-point.
     endif.
      if wa_stoken-str cs 'BAPI'.
        i_fmodule-bapi = 'X'.
      endif.
      replace first occurrence of '''' in wa_stoken-str with space.
      replace first occurrence of '''' in wa_stoken-str with space.
      if sy-subrc = 4.   " didn't find 2nd quote (ie name truncated)
        clear wa_tfdir.
        concatenate wa_stoken-str '%' into wa_stoken-str.
        select single funcname into wa_tfdir-funcname from tfdir
                     where funcname like wa_stoken-str.
        if sy-subrc = 0.
          i_fmodule-name = wa_tfdir-funcname.
        else.
          continue.
        endif.
      else.
        i_fmodule-name = wa_stoken-str.
      endif.
      i_fmodule-level = p_level.
      append i_fmodule.
    endif.
endloop.
endform.                        "DATA_SEARCH
& Form GET_ADDITIONAL_DATA                                           &
form get_additional_data.
data selection message to sap gui
call function 'SAPGUI_PROGRESS_INDICATOR'
    destination 'SAPGUI'
    keeping logical unit of work
    exporting
      text                  = 'Get additional data'         "#EC NOTEXT
    exceptions
      system_failure
      communication_failure
    .                                                       "#EC *
loop at i_userexit.
Enhancement data
    if i_userexit-type cs 'Enh'.
      clear: wa_modsapa.
      select single name into wa_modsapa-name from modsap
                        where member = i_userexit-txt.
      check sy-subrc = 0.
      i_userexit-modname = wa_modsapa-name.
      clear wa_modsapt.
      select single modtext into wa_modsapt-modtext from modsapt
                        where name = wa_modsapa-name
                                     and sprsl = sy-langu.
      i_userexit-modtext = wa_modsapt-modtext.
    endif.
BADI data
    if i_userexit-type eq 'BADI'.
      clear wa_sxs_attr.
      select single exit_name into wa_sxs_attr-exit_name from sxs_attr
                                    where exit_name = i_userexit-txt.
      if sy-subrc = 0.
        i_userexit-modname = i_userexit-txt.
      else.
        i_userexit-modname = 'Dynamic call'.                "#EC NOTEXT
      endif.
      clear wa_sxs_attrt.
      select single text into wa_sxs_attrt-text from sxs_attrt
                                     where exit_name =
wa_sxs_attr-exit_name
                                       and sprsl = sy-langu.
      i_userexit-modtext = wa_sxs_attrt-text.
    endif.
    modify i_userexit.
endloop.
get enhancements via program package
clear wa_tadir.
select single devclass into wa_tadir-devclass from tadir
                             where pgmid    = 'R3TR'
                               and object   = 'PROG'
                               and obj_name = p_pname.
if sy-subrc = 0.
    clear: wa_modsapa, wa_modsapt.
    select name from modsapa into wa_modsapa-name
                          where devclass = wa_tadir-devclass.
      select single modtext from modsapt into wa_modsapt-modtext
                          where name = wa_modsapa-name
                            and sprsl = sy-langu.
      read table i_userexit with key modname = wa_modsapa-name.
      if sy-subrc <> 0.
        i_userexit-modtext = wa_modsapt-modtext.
        i_userexit-type = 'Enhancement'.                    "#EC NOTEXT
        i_userexit-modname = wa_modsapa-name.
        i_userexit-txt = 'Determined from program DevClass'."#EC NOTEXT
        i_userexit-pname = 'Unknown'.                       "#EC NOTEXT
        append i_userexit.
      endif.
    endselect.
endif.
endform.                        "GET_ADDITIONAL_DATA
& Form DATA_DISPLAY                                                  &
form data_display.
data selection message to sap gui
call function 'SAPGUI_PROGRESS_INDICATOR'
    destination 'SAPGUI'
    keeping logical unit of work
    exporting
      text                  = 'Prepare screen for display' "#EC NOTEXT
    exceptions
      system_failure
      communication_failure
    .                                                       "#EC *
sort i_userexit by type txt modname.
delete adjacent duplicates from i_userexit comparing txt modname.
format headings
write: 'Enhancements from main program'.                  "#EC NOTEXT
write: /.
uline.
format color col_heading.
write: /    sy-vline,
         (12) c_col1,                    "Enhanmt Type
              sy-vline,
         (40) c_col2,                    "Enhancement
              sy-vline,
         (30) c_col3,                    "Program/Include
              sy-vline,
         (20) c_col4,                    "Enhancement name
              sy-vline,
         (40) c_col5,                    "Enhancement description
              sy-vline.
format reset.
uline.
format lines
loop at i_userexit.
set line colour
    case i_userexit-type.
      when 'Enhancement'.
        format color 3 intensified off.
      when 'BADI'.
        format color 4 intensified off.
      when 'BusTrEvent'.
        format color 5 intensified off.
      when 'Program Exit'.
        format color 6 intensified off.
      when others.
        format reset.
    endcase.
    write: / sy-vline,
             i_userexit-type,
             sy-vline,
             i_userexit-txt(40),
             sy-vline,
             i_userexit-pname(30),
             sy-vline,
             i_userexit-modname(20),
             sy-vline,
             i_userexit-modtext(40),
             sy-vline.
endloop.
format reset.
uline.
user-exits from development class of function modules
if p_devc = 'X'.
    write: /.
    write: / 'User-exits from function module development class'."#EC
*NOTEXT
    write: 157''.
    uline (90).
    write: 157''.
    loop at i_devclass.
      clear wa_modsapa.
      select name from modsapa into wa_modsapa
                   where devclass = i_devclass-clas.
     select single name modtext into corresponding fields of wa_modsapt
                                   from modsapt
                                     where name = wa_modsapa-name
                                       and sprsl = sy-langu.
        format color 3 intensified off.
        write: / sy-vline,
                 (12) 'Enhancement',
                 sy-vline,
                wa_modsapa-name,
                sy-vline,
                wa_modsapt-modtext,
                sy-vline.
      endselect.
    endloop.
    uline (90).
    format reset.
endif.
describe table i_fmodule lines w_linnum.
write: / c_fmod , at 35 w_linnum.                         "#EC NOTEXT
write: 157''.
if p_func = 'X'.
display fuction modules used in program
    uline (38).
    write: 157''.
    loop at i_fmodule.
      write: sy-vline,
             i_fmodule-name,
             sy-vline,
             i_fmodule-bapi,
             sy-vline.
      write: 157''.
    endloop.
    uline (38).
endif.
describe table i_submit lines w_linnum.
write: / c_subm , at 35 w_linnum.                         "#EC NOTEXT
write: 157''.
if p_subm = 'X'.
display submit programs used in program
    uline (44).
    write: 157''.
    loop at i_submit.
      write: sy-vline,
             i_submit-pname,
             sy-vline.
      write: 157''.
    endloop.
    uline (44).
endif.
issue message with number of user-exits displayed
describe table i_userexit lines w_linnum.
message s697(56) with w_linnum.
endform.                        "DATA_DISPLAY
reward points if it helps
gunjan

How to find a next bigger no from the list of random numbers

hi abapers
can u plz tell me how to find the next bigger no from the given list if some input is given
the list is 1,2,3,4,8,9
the input given to the list is 5 and the output should come 8
i used select endselect but the output is coming 9 i want it 8
how to do it?

Try this way
PARAMETERS : p_num TYPE i.
TYPES : BEGIN OF ty_itab,
        num TYPE i,
       END OF ty_itab.
DATA : it_itab TYPE TABLE OF ty_itab,
          wa_itab TYPE ty_itab.
DATA : a TYPE i.
wa_itab-num = '1'.
APPEND wa_itab TO it_itab.
wa_itab-num = '2'.
APPEND wa_itab TO it_itab.
wa_itab-num = '3'.
APPEND wa_itab TO it_itab.
wa_itab-num = '4'.
APPEND wa_itab TO it_itab.
wa_itab-num = '8'.
APPEND wa_itab TO it_itab.
wa_itab-num = '9'.
APPEND wa_itab TO it_itab.
SORT it_itab ASCENDING BY num.
LOOP AT it_itab INTO wa_itab.
IF wa_itab-num GT p_num.
    a = wa_itab-num.
    EXIT.
ENDIF.
ENDLOOP.
WRITE : / a.

How to find out web-inf path from the physical drive?

How to find out web-inf path from the physical drive?
I have some user profiles in web-inf directory.SO I want to know the path from root directory like
d:/program files/allaire/jrun/appname/web-inf/profiles/username like that.
Presently I am able to get the path upto the application directory and from that I am concatinationg web-inf/profiles/username .
But it is giving problems when it is deployed under unix or linux.Because web-inf there it treats as WEB_INF
SO I want to get the path of web-inf directory with out hard coding.
Thanku

String path = application.getRealPath("/WEB-INF/profiles/username");
Note sure why you need this, but you don't need the real path to read the file - you can get an InputStream using the relative path. See ServletContext getResource() and getResourceAsStream().

I need below fields at my selection screen.From which table we can find the

Sales Org > only one selection field
Division > only one selection field
Channel > from u2013 to fields
Sales Office Channel > from u2013 to fields
Sales Rep Channel > from u2013 to fields
User ID of the CSR Channel > from u2013 to fields
Customer Channel > from u2013 to fields
Material Channel > from u2013 to fields
Date: Channel > from u2013 to fields
I need these fields at my selection screen.From which tables I find these things.I need this logic also.

I need help

How to find Payer field is coming from which table

Similar Messages

Maybe you are looking for