Dynamic select of unknown fields

Hello,
I just started abap last monday and I'm still very new in it. I have a problem and i would appreciate if some one could detaily tell me how I could solve this problem. I have search in this forum but I haven't found any thing close to what I really want to do.
Many contracts could be tied to a single projet and also many payments could be tied to a single contract.
I am looking for a way so that I could dynamically determine the number of all contracts belonging to a particular project. There is a table called prps in sap. this table contains all projects data. There is also another table called prhi which contains all the contracts to a project. The field in prps is prps-posid for the the project number. The contract field in prhi is prhi-posnr
I have put all the project numers in a range r_projetnr for prhi-up.
Now my problem is how could I dynamically select all the contracts belonging to a project.
I would appreciate any tips on how to do this.
Thanks
Claudi

Thanks you all for your respond. I think I need to be more precise. I have all the project numbers packed in a range r_projectnr.
With all the project numbers packed in a range I have selected all the contracts already like this:
data: lt_prhi
SELECT * FROM prhi INTO CORRESPONDING FIELDS OF TABLE lt_prhi
 WHERE up IN r_projectnr.
IF sy-subrc <> 0.
 EXIT.
ELSE.
* out put the data dynamically to alv output.
clear w_output.
CLEAR w_output.
* t_output is my output structure which already has some fields among them the projectnr.
* I have already selected the projectnr and outputed it to
* t_output.
 LOOP AT t_ouput INTO w_output.
 CLEAR w_prhi.
 w_tabix_1 = 0.
 SORT lt_prhi.
 LOOP AT t_prhi INTO w_prhi WHERE psphi = w_output-projectnr.
 w_tabix_1 = w_tabix_1 + 1.
 CASE w_tabix_1.
WHEN 1.
* assign first contract to t_output
 w_outpu-contractnr1 = w_prhi-posnr.
* some more constants data come here
WHEN 2.
 w_output-contractnr2 = w_prhi-posnr.
* some more constant data would come here.
WHEN 3.
WHEN 4
ENDCASE
This way may be good if only a certain number of contracts are expected to be outputed. But in a case like mine where I want to output all contracts belonging to a particular project, I need a dynamic way of doing this. I have a structure defined with 4 contracts but I would also need to know a way of dynamically expanding this structure depending on the number of contracts found in one project. I hope this explains my difficult situation as a freshman in abap.
Thank you
Claudi Tim
Message was edited by:
 Tim claudi
Message was edited by:
 Tim claudi
Message was edited by:
 Tim claudi

Similar Messages

Extend dynamic selection for a field added on PRPS table

Hi Gurus,
I want to see the field that I've added in PRPS table as part of dynamic selection on the reports like S_ALR_87013542/ S_ALR_87013532. The LDB for project systems is PSJ. How do I make it appear as a dynamic selection on the selection-screen criteria for these reports?
Thanks...

Hi,
We have done this a lot on my project. Follow these steps:
(1) Transaction SE36 for logical database PSJ
(2) Choose menu path Extras -> Selection views (Ctrl+F7)
(3) Change the "Origin of view" to SAP
(4) Find the PRPS_R node in the top, right "Tables/nodes" view.
(5) Double-click PRPS_R.
(6) Find your custom field that you added in PRPS (in the bottom "Table fields/node fields" view.
(7) Choose and enter a 2-character Function Group ID (see the top, left view) next to the new field.
(8) Save and transport...
Best Regards,
James Gaddis

Dynamic Selection using Summarization Fields Missing in TCODE CN43N

If Using TCODE CN43 I can select using Summarization Fiields from PSMERK via Dynamic Selections.
However, when I use TCODE CN43N the "Summarization Fields" node is not displayed.
Does anyone know if it is possible to activate this option for CN43N.

Hi,
Please refer sap note 679705.
hope it will be helpful
thanks
abdul

Dynamic selection field display

Hi
Can we display field values for a field from Dynamic selection ?

Hi,
Yes, you can display field values in dynamic selection field.
If I understood your question correctly, you are talking about the dynamic selection used in reports ( For eg. ME2N). The field which are appearing in dynamic selection shows the field values. ( you can press F4 and check the field values).
Rajesh.

Need to Add BKTXT in the dynamic selection in FB03

Hi Gurus,
In the dynamic selection FB03, the field BKTXT is not included in the dynamic selection. Would it be possible to add this field?
Youre inputs would be greatly appreciated.
Thanks and best regards,
JeCCas_DJ

Hi,
You wants to add the BKTXT field on the selection screen of FB03?
Why? for what purpose?
Better copy the program related FB03 to some Zprogram and modify it by writing a select statement to get this BKTXT firld form BKPF/BSEG tables.
SInce this is a text field, normally we don't put onthe selection screen.
Regards,
Anji

DYNAMIC SELECTIONS IN SELECTION SCREEN

I DONNO ANYTHING ABT DYNAMIC SELECTIONS. CUD U PLZ TELL ME HOW TO GIVE DYNAMIC SELECTIONS FOR ANY FIELD?

hi
good
check this
The statement
SELECTION-SCREEN DYNAMIC SELECTIONS FOR NODE|TABLE <node>.
declares a node <node> of a logical database for dynamic selections in the selection include.
To use the dynamic selections in the SELECT statements of the subroutine PUT_<node>, you must use the data object DYN_SEL. The data object DYN_SEL is automatically generated in the logical database program as follows:
TYPE-POOLS RSDS.
DATA DYN_SEL TYPE RSDS_TYPE.
You do not have to program these lines yourself. The data object DYN_SEL is available in the database program but not in a connected executable program.
The type RSDS_TYPE of the data object is defined in the type group RSDS as follows:
TYPE-POOL RSDS.
WHERE-clauses ------------------------------
TYPES: RSDS_WHERE_TAB LIKE RSDSWHERE OCCURS 5.
TYPES: BEGIN OF RSDS_WHERE,
 TABLENAME LIKE RSDSTABS-PRIM_TAB,
 WHERE_TAB TYPE RSDS_WHERE_TAB,
 END OF RSDS_WHERE.
TYPES: RSDS_TWHERE TYPE RSDS_WHERE OCCURS 5.
Expressions Polish notation ---------------
TYPES: RSDS_EXPR_TAB LIKE RSDSEXPR OCCURS 10.
TYPES: BEGIN OF RSDS_EXPR,
 TABLENAME LIKE RSDSTABS-PRIM_TAB,
 EXPR_TAB TYPE RSDS_EXPR_TAB,
 END OF RSDS_EXPR.
TYPES: RSDS_TEXPR TYPE RSDS_EXPR OCCURS 10.
Selections as RANGES-tables -----------------
TYPES: RSDS_SELOPT_T LIKE RSDSSELOPT OCCURS 10.
TYPES: BEGIN OF RSDS_FRANGE,
 FIELDNAME LIKE RSDSTABS-PRIM_FNAME,
 SELOPT_T TYPE RSDS_SELOPT_T,
 END OF RSDS_FRANGE.
TYPES: RSDS_FRANGE_T TYPE RSDS_FRANGE OCCURS 10.
TYPES: BEGIN OF RSDS_RANGE,
 TABLENAME LIKE RSDSTABS-PRIM_TAB,
 FRANGE_T TYPE RSDS_FRANGE_T,
 END OF RSDS_RANGE.
TYPES: RSDS_TRANGE TYPE RSDS_RANGE OCCURS 10.
Definition of RSDS_TYPE
TYPES: BEGIN OF RSDS_TYPE,
 CLAUSES TYPE RSDS_TWHERE,
 TEXPR TYPE RSDS_TEXPR,
 TRANGE TYPE RSDS_TRANGE,
 END OF RSDS_TYPE.
http://help.sap.com/saphelp_nw04/helpdata/en/67/93b80914a911d2953c0000e8353423/content.htm
reward point if helpful.
thanks
mrutyun^

Dynamic Selection for FBL1N and FBL5N reports

Dear all,
is it possible to show more fields in Dynamic Selection for FBL1N and FBL5N reports?
Thanks in advance
Alberto

Dear Alberto,
Please refer to the SAP note 310886. In the note you should be able
to see how to add fields in to the dynamic selection , and the fields,
which are available for this.
I hope this can help You.
Mauri

Problems creating dynamic selection screen

Hi all,
i'm trying to dynamically generate a selection screen and show it as subscreen using the two function modules FREE_SELECTIONS_INIT and FREE_SELECTIONS_DIALOG. I call the function modules in the PBO of the therefor defined subscreen. The FREE_SELECTIONS_DIALOG fm has the two import parameter "as_subscreen" and "as_window". If i use the "as_window" parameter the selection screen comes up as popup. If i use the "as_subscreen" parameter, i can't see anything in my defined subscreen.
Any suggestions ?
Thanks in Advance
Dirk

Hi,
The above requirement is not possible without using logical database.
The reason is that the compiler identifies the below syntax only inside a LDB program .
SELECTION-SCREEN DYNAMIC SELECTIONS
                 FOR {NODE|TABLE} node [ID id].
The above syntax creates a subscreen container on the standard selection screen of the program during generation
and we are able to view the dynamic selections icon on the selection screen.
Hence it is not possible to use the FM 'FREE_SELECTIONS_DIALOG' as a subscreen without using a
logical database of the relevant table.
However if you dont want to create a new LDB for each table, there is a trick which needs to be performed
once in your SAP system and all custom programs can use this FM to create a dynamic selection screen
as a subscreen of the standard selection screen.
The prerequisite steps are as follows:
1: Create a dummy / test database table in SE11 with a single field i.e. for example mandt , matnr
2: Create a new logical database program for this table in SE36. Save and activate.
This will create dynamic selections for the fields of the table created in step 1.
Steps to be followed in the required custom ABAP program to create the dynamic selection screen as a subscreen.
A: Include the LDB program created in step 2, in the attributes of the custom ABAP program.
Now when you execute the program, you can see the dynamic selection icon for the dummy table created in step 1.
B: In your custom program we need to suppress the icon for 'Dynamic Selections' from the standard selection screen.
   We need to perform this action, because the 'Dynamic Selections' icon always triggers a call to the
   dynamic selection screen of the included LDB progam. ( In our case a dummy table created in step 1 ).
   Whereas we want to trigger a call of the dynamic selection screen of our desired table.
   Logic is as follows:
   In 'AT SELECTION-SCREEN OUTPUT' event call the FM RS_SET_SELSCREEN_STATUS to exclude the fcode 'DYNS'.
C: Add a pushbutton / checkbox on your selection screen to trigger a call to the FM 'FREE_SELECTIONS_INIT' &
   'FREE_SELECTIONS_DIALOG' in the 'AT SELECTION-SCREEN' event.
D: When the user clicks the pushbutton / checkbox for dynamic selections call the above 2 FM for the desired table
    with the AS_SUBSCREEN flag of FREE_SELECTIONS_DIALOG = 'X'
Result: Your dynamic selections screen will be created as a subscreen of the standard selection screen and not as a pop-up.
Advantage: With the creation of the single custom table & LDB, you are now able to create dynamic selections as subscreen
in any program in the system. All we need to do is follow the steps A, B & C in each program.
Note: Your other restrictions with dynamic selection screen ie. submit in background , save as variant still remain and
you need to handle them accordingly.
let me know if you need sample code.
Regards,
Bhawit Kumar

Dynamic Selection Screen Fields

Hi All,
I have made a copy of the program FI_RFSOPO00. This report uses dynamic selection screen. I wanted to know the names of these dynamic selection screen. As I have to make some database selections based on the user entries in these fields.
Is there a way to find this out?
Regards,
Stephen

Hi Stephen,
1) FI_RFSOPO00 is unknown- i think you mean RFSOPO00
2) RFSOPO00 uses logical datbase SDF, which uses
free or dynmaic selections from the tables ska1,skb1
and bsis.
see F1 to SELECTION-SCREEN DYNAMIC SELECTIONS FOR TABLE dbtab and ta SE36 to SDF too.
regards Andreas

How to add a field in dynamic selections

HI,
There is a requirement in which i need to add a field in existing program of dynamic selections.
I have added a field in the screen.But I was not able to write the label and is not displaying.
I ahve copied evrything from existing coding.but still.
In the program ,Field groups are being used.
I have inserted my field in that header and item of field groups.
But i was not able to select the data based on this selection.
i will attach my code here for reference.
can anyone please help me how to use these filed symbols.
If possible send me the document on Dynamic selections.
the field i need to add is bkpf-bktxt
TABLES:
tcurx,
lfa1,
kna1,
bhdgd,
bkpf,
bseg,
bsega,
b0sg,
fimsg,
sarkey,
t001,
vbset,
sscrfields.
 Selektionsparameter *
begin_of_block 1.
PARAMETERS:
par_nbel LIKE rfpdo-bpetnbel, "Normale Belege
par_vbel LIKE rfpdo-epojvbel, "Vorerfaßte Belege
par_sbel LIKE rfpdo-bpetsbel, "Statistischen Belege
par_mbel LIKE rfpdo-epojmbel, "Musterbelege
par_dbel LIKE rfpdo1-korbdbel. "Dauerbuchungsurbelege
end_of_block 1.
begin_of_block 2.
PARAMETERS:
par_summ LIKE rfpdo1-allgsumm, "nur Summenausgabe
par_hkto LIKE rfpdo2-beljhkto, "Hauptbuch- statt Personenkonto
par_altk LIKE rfpdo1-allgaltk, "alternative Kontonummer
par_lsep LIKE rfpdo-allglsep, "Listseparation
par_mikf LIKE rfpdo-allgmikf, "Mikrofiche-Zeile
par_line LIKE rfpdo1-allgline. "Zusatztitel
Eingaben für optische Archivierung
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: arc LIKE rfpdo1-allgarch.
SELECTION-SCREEN COMMENT 3(29) text-103 FOR FIELD arc.
SELECTION-SCREEN POSITION POS_LOW.
PARAMETERS: arc_msg1(10) MODIF ID arc.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN POSITION POS_LOW.
PARAMETERS: arc_msg2(10) MODIF ID arc.
SELECTION-SCREEN END OF LINE.
end_of_block 2.
PARAMETERS: arc_mem LIKE arc_params NO-DISPLAY.
 Felder und Feldleisten *
CONSTANTS:
con_true TYPE i VALUE 1,
con_false TYPE i VALUE 2,
con_hash TYPE i VALUE 1,
con_vendor TYPE c VALUE 'K',
con_cust TYPE c VALUE 'D'.
Global Data
DATA: BEGIN OF hash_totals OCCURS 25,
 bukrs LIKE t001-bukrs,
 poper(7),
 dramt LIKE bseg-wrbtr,
 cramt LIKE bseg-wrbtr,
 END OF hash_totals.
DATA:
factor TYPE i,
Zähler
cnt_bukrs(4) TYPE p, "Anzahl Buchungskreise
cnt_max LIKE sy-tfill, "Maximum der CNT_Ti
cnt_t0 LIKE sy-tfill, "Anzahl Einträge in Ti
cnt_t1 LIKE sy-tfill,
cnt_t2 LIKE sy-tfill,
cnt_t3 LIKE sy-tfill,
cnt_t4 LIKE sy-tfill,
cnt_t5 LIKE sy-tfill,
Fehler
err_altkt(1) TYPE c, "alt. Kontonummer nicht gefunden
Flags
flg_section TYPE i,
flg_vendr2 TYPE i,
flg_vendr3 TYPE i,
flg_color(1) TYPE n, "0 - intensified off
Hilfsfelder
hlp_belnr(10) TYPE c, "Anzeigefeld Belegnummer
hlp_bstat LIKE bkpf-bstat, "Status vorerfaßter Belege
hlp_buper(7) TYPE c, "Buchungsperiode mit '/'
hlp_null(1) TYPE p VALUE 0, "Betrag Null
hlp_sakan LIKE ska1-sakan, "Anzeigefeld Kontonummer
hlp_wrshb(26) TYPE c, "FW-Betrag mit Währung in Klammer
hlp_vnd_amt(43) TYPE c,
Texte
txt_line0(132) TYPE c, "Überschriften
txt_line1(132) TYPE c,
txt_line2(132) TYPE c,
txt_line(132) TYPE c, "Hilfstext
Feldleisten
BEGIN OF mikfi, "Information Mikrofiche-Zeile
 bstat LIKE bkpf-bstat,
 bukrs LIKE bkpf-bukrs,
 gjahr LIKE bkpf-gjahr,
 belnr LIKE bkpf-belnr,
END OF mikfi.
 Interne Tabellen *
DATA:
Belegkopfinformationen
BEGIN OF t0 OCCURS 4, "0 - allgemeine Angaben
 info(1) TYPE n, "1 - vorerfaßter Beleg
END OF t0, "2 - Referenz
 "3 - Storno
 "4 - gelöschter vorerfaßter Beleg
 "5 - ersetzter vorerfaßter Beleg
 "6 - Ausgleichsbeleg
 "7 - zurückgenommener Ausgleich
Personenkonteninformationen je Beleg
BEGIN OF t1 OCCURS 10,
 koart LIKE bseg-koart, "Kontoart
 ktonr LIKE bseg-kunnr, "Kontonummer(Debitor/Kreditor)
 bschl LIKE bseg-bschl, "Buchungsschlüssel
 xnegp LIKE bseg-xnegp, "Negativbuchung
 umskz LIKE bseg-umskz, "Sonderumsatzkennzeichen
 zlspr LIKE bseg-zlspr, "Payment Block Key - CR 21709
 dmshb LIKE bsega-dmshb, "Soll-Haben Betrag in Hauswährung
 wrshb LIKE bsega-dmshb, "Betrag in Fremdwährung
 xfwae(1) TYPE c, "X - Fremdwährungsinformation
 name1 LIKE lfa1-name1, "Customer/ Vendor Name
END OF t1,
Steuerinformationen je Beleg
BEGIN OF t2 OCCURS 10,
 mwskz LIKE bseg-mwskz, "Mehrwertsteuerkennzeichen
 dmshb LIKE bsega-dmshb, "Soll-Haben Betrag in Hauswährung
END OF t2,
Sachkonteninformationen je Beleg
BEGIN OF t3 OCCURS 20,
 mwskz LIKE bseg-mwskz, "Mehrwertsteuerkennzeichen
 bschl LIKE bseg-bschl, "Buchungsschlüssel
 xnegp LIKE bseg-xnegp, "Negativbuchung
 koart LIKE bseg-koart, "Kontoart
 hkont LIKE bseg-hkont, "Hauptbuchkonto
 dmshb LIKE bsega-dmshb, "Soll-Haben Betrag in Hauswährung
 kostl LIKE bseg-kostl, "Cost Center
 prctr LIKE bseg-prctr, "Profit Center
END OF t3,
Sonderhauptbuchbeträge für Debitoren (nur Ausgabe)
BEGIN OF t4 OCCURS 5,
 umskz LIKE bseg-umskz, "Sonderumsatzkennzeichen
 dmsol(9) TYPE p, "Soll-Betrag Hauswährung
 dmhab(9) TYPE p, "Haben-Betrag Hauswährung
END OF t4,
Sonderhauptbuchbeträge für Kreditoren (nur Ausgabe)
BEGIN OF t5 OCCURS 5,
 umskz LIKE bseg-umskz, "Sonderumsatzkennzeichen
 dmsol(9) TYPE p, "Soll-Betrag Hauswährung
 dmhab(9) TYPE p, "Haben-Betrag Hauswährung
END OF t5,
Summeninformationen je Buchungskreis
BEGIN OF tbukrs OCCURS 20,
 bstat LIKE bkpf-bstat, "Belegstatus
 bukrs LIKE bkpf-bukrs, "Buchungskreis
START OF CHANGE FOR CR63816 by OS0794 on 01/29/2008
 bktxt LIKE bkpf-bktxt,
END OF CHANGE FOR CR63816 by OS0794 on 01/29/2008
 gjahr LIKE bkpf-gjahr, "Buchungsjahr
 monat LIKE bkpf-monat, "Buchungsmonat
 dmsol(9) TYPE p, "Soll-Betrag Hauswährung
 dmhab(9) TYPE p, "Haben-Betrag Hauswährung
 waers LIKE t001-waers, "Währungsschlüssel (nur Ausgabe)
END OF tbukrs,
Sonderhauptbuchinformationen je Buchungskreis
BEGIN OF tbukrs_u OCCURS 20,
 bstat LIKE bkpf-bstat, "Belegstatus
 bukrs LIKE bkpf-bukrs, "Buchungskreis
START OF CHANGE FOR CR63816 by OS0794 on 01/29/2008
 bktxt LIKE bkpf-bktxt,
END OF CHANGE FOR CR63816 by OS0794 on 01/29/2008
 gjahr LIKE bkpf-gjahr, "Buchungsjahr
 monat LIKE bkpf-monat, "Buchungsmonat
 koart LIKE bseg-koart, "Kontoart
 umskz LIKE bseg-umskz, "Sonderumsatzkennzeichen
 dmsol(9) TYPE p, "Soll-Betrag Hauswährung
 dmhab(9) TYPE p, "Haben-Betrag Hauswährung
 waers LIKE t001-waers, "Währungsschlüssel (nur Ausgabe)
END OF tbukrs_u,
Summeninformationen je Hauswährung
BEGIN OF twaers OCCURS 10,
 bstat LIKE bkpf-bstat, "Belegstatus
 waers LIKE t001-waers, "Hauswährungsschlüssel
 gjahr LIKE bkpf-gjahr, "Buchungsjahr
 monat LIKE bkpf-monat, "Buchungsmonat
 dmsol(9) TYPE p, "Soll-Betrag Hauswährung
 dmhab(9) TYPE p, "Haben-Betrag Hauswährung
END OF twaers,
Sonderhauptbuchinformationen je Hauswährung
BEGIN OF twaers_u OCCURS 20,
 bstat LIKE bkpf-bstat, "Belegstatus
 waers LIKE t001-waers, "Währungsschlüssel
 gjahr LIKE bkpf-gjahr, "Buchungsjahr
 monat LIKE bkpf-monat, "Buchungsmonat
 koart LIKE bseg-koart, "Kontoart
 umskz LIKE bseg-umskz, "Sonderumsatzkennzeichen
 dmsol(9) TYPE p, "Soll-Betrag Hauswährung
 dmhab(9) TYPE p, "Haben-Betrag Hauswährung
END OF twaers_u,
Fehlerprotokoll im Batch
BEGIN OF tfimsg OCCURS 10.
 INCLUDE STRUCTURE fimsg.
DATA END OF tfimsg.
 Strukturen für optische Archivierung *
DATA BEGIN OF info OCCURS 10.
 INCLUDE STRUCTURE bhinf.
DATA END OF info.
DATA:
arc_save LIKE arc_params,
arc_valid.
 Feldgruppen *
FIELD-GROUPS: header, daten.
INSERT:
bkpf-bukrs "Buchungskreis
bkpf-bktxt "Change by OS0794
bkpf-bstat "Belegstatus
bkpf-gjahr "Geschäftsjahr
bkpf-belnr "Belegnummer
bseg-buzei "Buchungszeile
INTO header.
INSERT
bkpf-blart "Belegart
bkpf-bktxt "Change by OS0794
bkpf-budat "Buchungsdatum
bkpf-stblg "Stornobelegnummer
bkpf-waers "Währungsschlüssel
bkpf-xblnr "Referenzangabe
bseg-bschl "Buchungsschlüssel
bseg-xnegp "Negativbuchung
bseg-zlspr "Payment Block Key - CR 21709
bseg-hkont "Hauptbuchkonto
bseg-koart "Kontoart
bseg-kunnr "Debitornummer
bseg-lifnr "Kreditornummer
bseg-mwart "Mehrwertsteuerart (A oder V)
bseg-mwskz "Mehrwertsteuerkennzeichen
bseg-umskz "Sonderhauptbuch-Kennzeichen
bsega-dmshb "S/H-Betrag in Hauswährung
bsega-mdshb "Umsatzsteuerbetrag in Hauswährg
bsega-wrshb "S/H-Betrag in Fremdwährung
hlp_bstat "Status vorerfaßter Belege bzw.
bseg-kostl
bseg-prctr
bkpf-monat
INTO daten. "Status von Belegen ohne Zeilen
 Vorschlagswerte *
INITIALIZATION.
get_frame_title: 1,2.
par_nbel = 'X'.
par_sbel = space.
par_mbel = space.
par_dbel = space.
par_vbel = 'X'.
 Archivinformationen nur fuer Ausgabe *
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
 IF screen-group1 = 'ARC'.
 screen-input = '0'.
 MODIFY SCREEN.
 ENDIF.
ENDLOOP.
 Prüfung und Korrektur der eingegebenen Daten *
AT SELECTION-SCREEN ON arc.
IF arc <> ' ' AND arc_mem(20) = space.
 CALL FUNCTION 'GET_ARCHIVE_PARAMETERS'
 EXPORTING
 in_parameters = arc_save
 printer = ' '
 IMPORTING
 out_parameters = arc_mem
 valid = arc_valid
 EXCEPTIONS
 OTHERS = 04.
 IF arc_valid <> 'X' OR arc_mem = space.
 CLEAR arc_mem.
 MESSAGE e999 WITH text-102.
 ENDIF.
 arc_msg1 = arc_mem(10).
 arc_msg2 = arc_mem+10(10).
ENDIF.
IF arc = ' '.
 CLEAR arc_mem.
 arc_msg1 = arc_msg2 = space.
ENDIF.
arc_save = arc_mem.
AT SELECTION-SCREEN ON arc_msg1.
arc_msg1 = arc_mem(10).
AT SELECTION-SCREEN ON arc_msg2.
arc_msg2 = arc_mem+10(10).
AT SELECTION-SCREEN.
IF par_nbel EQ space AND
 par_mbel EQ space AND
 par_dbel EQ space AND
 par_sbel EQ space AND
 par_vbel EQ space.
 SET CURSOR FIELD 'PAR_NBEL'.
 MESSAGE e111.
ENDIF.
optische Archivierung
IF arc <> ' ' AND par_mikf <> ' '.
 CLEAR arc_mem.
 MESSAGE e999 WITH text-100.
ENDIF.
IF arc <> ' ' AND par_lsep <> ' '.
 CLEAR arc_mem.
 MESSAGE e999 WITH text-101.
ENDIF.
IF arc = 'X' AND sscrfields-ucomm = 'PRIN'.
 sscrfields-ucomm = 'ONLI'.
 sy-pdest = 'LP01'. "wegen Abfrage in Batch-Heading
ENDIF.
 Vorbelegungen *
START-OF-SELECTION.
bhdgd-lines = sy-linsz.
bhdgd-repid = sy-repid.
bhdgd-uname = sy-uname.
bhdgd-separ = par_lsep.
bhdgd-domai = 'BUKRS'.
IF arc = 'X'.
 bhdgd-miffl = 'A'.
ENDIF.
IF par_mikf = 'X'.
 bhdgd-miffl = 'X'.
ENDIF.
Initialisierung für optisches Archiv
PERFORM open_archive(rsbtchh0) USING arc_mem.
info-name = 'BKPF-BSTAT'. info-len = space. APPEND info.
info-name = 'BKPF-BUKRS'. info-len = space. APPEND info.
info-name = 'BSEG-GJAHR'. info-len = space. APPEND info.
info-name = 'BKPF-BELNR'. info-len = space. APPEND info.
info-name = 'BKPF-BKTXT'. info-len = space. APPEND info.
PERFORM start_archive(rsbtchh0) TABLES info.
b0sg-xstan = par_nbel.
b0sg-xstam = par_mbel.
b0sg-xstad = par_dbel.
b0sg-xstas = par_sbel.
b0sg-xstaa = 'X'.
IF par_vbel EQ 'X'.
 b0sg-xstav = 'Z'.
ENDIF.
 Selektion *
GET bkpf FIELDS blart bstat budat monat stblg waers xblnr bktxt.
CLEAR hlp_bstat.
IF 'ABVWZ' CA bkpf-bstat.
 hlp_bstat = bkpf-bstat.
 CLEAR bkpf-bstat.
 IF 'ABWZ' CA hlp_bstat.
 CLEAR: bseg, bsega.
 IF par_summ EQ space.
 EXTRACT daten.
 ENDIF.
 PERFORM summe_merken.
 ENDIF.
ENDIF.
GET bseg.
IF par_summ EQ space.
 EXTRACT daten.
ENDIF.
PERFORM summe_merken.
GET bkpf LATE.
PERFORM vorerfasste_steuer_merken.
 Seitenkopf *
TOP-OF-PAGE.
PERFORM batch-heading(rsbtchh0).
ULINE.
IF flg_section <> con_hash.
 FORMAT COLOR 1 INTENSIFIED OFF.
 WRITE / txt_line0.
 ULINE.
 FORMAT COLOR 1 INTENSIFIED.
 WRITE: / txt_line1,
 / txt_line2.
ELSE.
 FORMAT COLOR 1 INTENSIFIED OFF.
 WRITE: / sy-vline NO-GAP,
 'Hash Totals'(205),
 132 sy-vline.
 ULINE.
 FORMAT COLOR 1 INTENSIFIED.
 WRITE: / sy-vline NO-GAP,
 (10) 'CoCd'(200),
 (07) 'Period'(201),
 sy-vline,
 (16) 'Debit Amount'(202),
 (16) 'Credit Amount'(203),
 sy-vline,
 (16) 'Total'(204).
ENDIF.
ULINE.
 Sortieren der Daten *
END-OF-SELECTION.
DESCRIBE TABLE tbukrs LINES sy-tfill.
IF sy-tfill EQ 0.
 CALL FUNCTION 'POPUP_NO_LIST'.
ENDIF.
SORT.
SORT tbukrs.
 Belegjournal *
LOOP.
*-- Neuer Buchungskreis -
 AT NEW bkpf-bukrs.
 SELECT SINGLE * FROM t001 WHERE bukrs EQ bkpf-bukrs.
 IF sy-subrc NE 0.
 IF sy-batch EQ space.
 MESSAGE a101 WITH bkpf-bukrs.
 ELSE.
 MESSAGE s101 WITH bkpf-bukrs.
 STOP.
 ENDIF.
 ENDIF.
 bhdgd-bukrs = bkpf-bukrs.
 bhdgd-werte = bkpf-bukrs.
 PERFORM new-section(rsbtchh0).
 PERFORM titel_fuellen USING '5'.
 ENDAT.
*-- Neuer Belegstatus -
 AT NEW bkpf-bstat.
 PERFORM new_page USING bkpf-bstat.
 flg_color = 1.
 ENDAT.
*-- Neue Belegnummer -
 AT NEW bkpf-belnr.
 REFRESH: t0, t1, t2, t3.
 PERFORM belegkopf_merken.
 mikfi-bstat = bkpf-bstat.
 mikfi-bukrs = bkpf-bukrs.
 mikfi-gjahr = bkpf-gjahr.
 mikfi-belnr = bkpf-belnr.
 bhdgd-grpin = mikfi.
 ENDAT.
*-- Belegzeile -
 PERFORM belegzeile_merken.
*-- Ende einer Belegnummer -
 AT END OF bkpf-belnr.
 PERFORM beleg_schreiben.
 ULINE.
 ENDAT.
*-- Ende eines Buchungskreises -
 AT END OF bkpf-bukrs.
 PERFORM titel_fuellen USING '4'.
 PERFORM buchungskreis_schreiben USING bkpf-bukrs.
 ENDAT.
ENDLOOP.
 Summenblätter *
bhdgd-bukrs = ' '.
bhdgd-werte = ' '.
PERFORM new-section(rsbtchh0).
PERFORM titel_fuellen USING '4'.
PERFORM buchungskreis_schreiben USING ' '.
PERFORM hauswaehrung_schreiben.
 Print Hash Totals *
flg_section = con_hash.
NEW-PAGE.
PERFORM prt_hash TABLES hash_totals.
 Fehlerprotokoll *
CALL FUNCTION 'FI_MESSAGE_CHECK'
 EXCEPTIONS
 no_message = 4.
IF sy-subrc = 0.
 IF sy-batch EQ space.
 PERFORM titel_fuellen USING '6'.
 NEW-PAGE.
 FORMAT COLOR 6 INTENSIFIED.
 CALL FUNCTION 'FI_MESSAGE_SORT'.
 CALL FUNCTION 'FI_MESSAGE_PRINT'
 EXPORTING
 i_xskip = 'X'.
 ELSE.
 CALL FUNCTION 'FI_MESSAGE_GET'
 TABLES
 t_fimsg = tfimsg.
 LOOP AT tfimsg.
 MESSAGE ID tfimsg-msgid TYPE tfimsg-msgty NUMBER tfimsg-msgno
 WITH tfimsg-msgv1 tfimsg-msgv2 tfimsg-msgv3 tfimsg-msgv4.
 ENDLOOP.
 ENDIF.
ENDIF.
 U N T E R P R O G R A M M E *
 0. TITEL_FUELLEN *
 1. NEW_PAGE *
 2. SUMME_MERKEN *
 3. VORERFASSTE_STEUER_MERKEN *
 4. BELEGKOPF_MERKEN *
 5. BELEGZEILE_MERKEN *
 6. BELEG_SCHREIBEN *
 7. BUCHUNGSKREIS_SCHREIBEN *
 8. HAUSWAEHRUNG_SCHREIBEN *
 9. SUMMENZEILE_SCHREIBEN *
 10. KONTONUMMER *
0. FORM TITEL_FUELLEN *
 Ersetzt das Global &CCCU durch die Buchungskreiswährung *
 F00_TEXT ist 4, 5 oder 6, je nach Gruppe der Textelemente *
FORM titel_fuellen USING f00_text.
DATA:
 BEGIN OF txt_502,
 T1(49) TYPE C, "CR 21709
 W1(23) TYPE C, "CR 21709
 t1(50) TYPE c, "CR 21709
 w1(22) TYPE c, "CR 21709
 t2(6) TYPE c,
 w2(15) TYPE c,
 t3(21) TYPE c,
 w3(16) TYPE c,
 t4(2) TYPE c,
 END OF txt_502.
CASE f00_text. "Textelemente
 WHEN '4'. "- für die Summenliste
 txt_line0 = text-400.
 txt_line1 = text-401.
 txt_line2 = text-402.
 WHEN '5'. "- für die Einzelpostenliste
 txt_line0 = text-500.
 txt_line1 = text-501.
 txt_line2 = text-502.
 IF par_hkto EQ 'X'.
 txt_line1+33(10) = text-505.
 txt_line2+33(10) = text-506.
 ENDIF.
 txt_502 = txt_line2.
 REPLACE '&CCCU' WITH t001-waers INTO:
 txt_502-w1, txt_502-w2, txt_502-w3.
 CONDENSE:
 txt_502-w1, txt_502-w2, txt_502-w3.
 WRITE:
 txt_502-w1 TO txt_502-w1 RIGHT-JUSTIFIED,
 txt_502-w2 TO txt_502-w2 RIGHT-JUSTIFIED,
 txt_502-w3 TO txt_502-w3 RIGHT-JUSTIFIED.
 txt_line2 = txt_502.
 WHEN '6'. "- für die Fehlerliste
 txt_line0 = text-600.
 txt_line1 = text-601.
 txt_line2 = space.
 WHEN OTHERS. "- initialisieren
 txt_line0 = space.
 txt_line1 = space.
 txt_line2 = space.
ENDCASE.
ENDFORM. "TITEL_FUELLEN
1. FORM NEW_PAGE *
 Initialisierungen für BATCH-HEADING Routine *
 F01_BSTAT steuert den Aufbau des Reporttitels *
FORM new_page USING f01_bstat.
CASE f01_bstat. "Reporttitel
 WHEN 'D'. "- für Dauerbuchungsurbelege
 bhdgd-line1 = text-001.
 WHEN 'M'. "- für Musterbelege
 bhdgd-line1 = text-002.
 WHEN 'S'. "- für statistische Belege
 bhdgd-line1 = text-003.
 WHEN OTHERS. "- für normale/vorerfaßte Belege
 bhdgd-line1 = sy-title.
ENDCASE.
bhdgd-line2 = par_line.
bhdgd-inifl = 0.
NEW-PAGE.
ENDFORM. "NEW_PAGE
2. FORM SUMME_MERKEN *
 Merken der Summeninformation *
FORM summe_merken.
CLEAR tbukrs.
tbukrs-bstat = bkpf-bstat.
tbukrs-bukrs = bkpf-bukrs.
tbukrs-bktxt = bkpf-bktxt.
tbukrs-gjahr = bkpf-gjahr.
tbukrs-monat = bkpf-monat.
tbukrs-dmsol = bsega-dmsol.
tbukrs-dmhab = bsega-dmhab.
IF 'DK' CA bseg-koart.
 MOVE-CORRESPONDING tbukrs TO tbukrs_u.
 tbukrs_u-koart = bseg-koart.
 tbukrs_u-umskz = bseg-umskz.
 tbukrs_u-dmsol = bsega-dmsol.
 tbukrs_u-dmhab = bsega-dmhab.
 COLLECT tbukrs_u.
 tbukrs_u-monat = 0. "Summe für das Geschäftsjahr
 COLLECT tbukrs_u.
ENDIF.
COLLECT tbukrs.
ENDFORM. "SUMME_MERKEN
3. FORM VORERFASSTE_STEUER_MERKEN *
 Nachlesen der Steuerzeilen vorerfaßter Belege *
 Gefüllt wird TBUKRS und der Extrakt *
FORM vorerfasste_steuer_merken.
CHECK hlp_bstat EQ 'V'.
SELECT * FROM vbset
 WHERE ausbk EQ bkpf-bukrs
 AND belnr EQ bkpf-belnr
 AND gjahr EQ bkpf-gjahr.
 CHECK vbset-hwste NE 0.
 CLEAR: bseg, bsega.
 bseg-koart = 'S'.
 bseg-mwart = 'V'. "oder 'A', nur zum Füllen von T2
 bseg-mwskz = vbset-mwskz.
 IF vbset-shkzg EQ 'S'.
 bsega-dmsol = vbset-hwste.
 bsega-dmshb = vbset-hwste.
 ELSE.
 bsega-dmhab = vbset-hwste.
 bsega-dmshb = - vbset-hwste.
 ENDIF.
 IF par_summ EQ space.
 EXTRACT daten.
 ENDIF.
 PERFORM summe_merken.
ENDSELECT.
ENDFORM. "VORERFASSTE_STEUER_MERKEN
4. FORM BELEGKOPF_MERKEN *
 Je Beleg werden gefüllt: *
 T0 - Informationsflag *
FORM belegkopf_merken.
t0-info = 0. "Belegkopf
APPEND t0.
CASE hlp_bstat.
 WHEN 'A'.
 t0-info = 6. "Ausgleichsbeleg
 APPEND t0.
 WHEN 'B'.
 t0-info = 7. "zurückgen. Ausgleichsbeleg
 APPEND t0.
 WHEN 'V'.
 t0-info = 1. "vorerfaßter Beleg
 APPEND t0.
 WHEN 'W'.
 t0-info = 5. "ersetzter vorerfaßter Beleg
 APPEND t0.
 WHEN 'Z'.
 t0-info = 4. "gelöschter vorerfaßter Beleg
 APPEND t0.
ENDCASE.
IF bkpf-xblnr NE space AND hlp_bstat NA 'BWZ'.
 t0-info = 2. "Referenz
 APPEND t0.
ENDIF.
IF bkpf-stblg NE space.
 t0-info = 3. "Storno
 APPEND t0.
ENDIF.
SORT t0.
ENDFORM. "BELEGKOPF_MERKEN
5. FORM BELEGZEILE_MERKEN *
 Je Beleg werden gefüllt: *
 T1 - Personenkonteninformation *
 T2 - Steuerinformation (nicht bei vorerfaßten Belegen) *
 T3 - Sachkonteninformation *
FORM belegzeile_merken.
Vendors/ Customers
IF bseg-koart CA 'DK'.
 t1-koart = bseg-koart.
 IF par_hkto EQ 'X'.
 t1-ktonr = bseg-hkont.
 ELSEIF bseg-koart EQ 'K'.
 t1-ktonr = bseg-lifnr.
 ELSE.
 t1-ktonr = bseg-kunnr.
 ENDIF.
 t1-bschl = bseg-bschl.
 t1-umskz = bseg-umskz.
 t1-xnegp = bseg-xnegp.
 t1-zlspr = bseg-zlspr. "CR 21709
 t1-dmshb = bsega-dmshb.
 t1-wrshb = bsega-wrshb.
 t1-xfwae = space.
 APPEND t1.
Read the vendor description.
 IF bseg-koart = con_vendor.
 flg_vendr2 = con_true.
 flg_vendr3 = con_true.
 CLEAR lfa1-name1.
 SELECT SINGLE name1
 INTO lfa1-name1
 FROM lfa1
 WHERE lifnr = bseg-lifnr.
 ELSEIF bseg-koart = con_cust.
 CLEAR kna1-name1.
 SELECT SINGLE name1
 INTO kna1-name1
 FROM kna1
 WHERE kunnr = bseg-kunnr.
 ENDIF.
 IF bkpf-waers EQ t001-waers.
 CLEAR t1.
 ENDIF.
 t1-xfwae = 'X'.
 t1-name1 = lfa1-name1.
 IF t1-name1 IS INITIAL.
 t1-name1 = kna1-name1.
 ENDIF.
 APPEND t1.
 CLEAR:
 kna1-name1,
 lfa1-name1.
 CLEAR t1.
Save the hash total amounts
 CLEAR tcurx-currdec.
 SELECT SINGLE currdec
 INTO tcurx-currdec
 FROM tcurx
 WHERE currkey = bkpf-waers.
 IF tcurx-currdec = 1.
 factor = 10.
 ELSE.
 factor = 100.
 ENDIF.
 CLEAR hash_totals.
 hash_totals-bukrs = bkpf-bukrs.
 CONCATENATE bkpf-monat '/' bkpf-gjahr INTO hash_totals-poper.
 IF bsega-wrshb < 0.
 hash_totals-cramt = bsega-wrshb * factor.
 ELSE.
 hash_totals-dramt = bsega-wrshb * factor.
 ENDIF.
 COLLECT hash_totals.
Tax accounts
ELSEIF bseg-mwart CA 'AV'.
 t2-mwskz = bseg-mwskz.
 t2-dmshb = bsega-dmshb.
 APPEND t2.
 IF flg_vendr2 = con_true.
 flg_vendr2 = con_false.
 CLEAR t2.
 APPEND t2.
 ENDIF.
GL Accounts
ELSEIF hlp_bstat NA 'ABWZ'.
 t3-mwskz = bseg-mwskz.
 t3-bschl = bseg-bschl.
 t3-xnegp = bseg-xnegp.
 t3-koart = bseg-koart.
 t3-hkont = bseg-hkont.
 t3-dmshb = bsega-dmshb.
 APPEND t3.
 IF flg_vendr3 = con_true
 OR NOT bseg-kostl IS INITIAL
 OR NOT bseg-prctr IS INITIAL.
 flg_vendr3 = con_false.
 CLEAR t3.
 t3-kostl = bseg-kostl.
 t3-prctr = bseg-prctr.
 APPEND t3.
 CLEAR t3.
 ENDIF.
ENDIF.
ENDFORM. "BELEGZEILE_MERKEN
6. FORM BELEG_SCHREIBEN *
 Ausgabe der Belginformationen *
FORM beleg_schreiben.
DATA:
 len TYPE i.
Berechnung der benötigten Zeilen pro Beleg
DESCRIBE TABLE:
 t0 LINES cnt_t0,
 t1 LINES cnt_t1,
 t2 LINES cnt_t2,
 t3 LINES cnt_t3.
cnt_max = cnt_t0.
IF cnt_max LT cnt_t1.
 cnt_max = cnt_t1.
ENDIF.
IF cnt_max LT cnt_t2.
 cnt_max = cnt_t2.
ENDIF.
IF cnt_max LT cnt_t3.
 cnt_max = cnt_t3.
ENDIF.
ADD 1 TO cnt_max.
IF cnt_max LE 10.
 RESERVE cnt_max LINES.
ELSE.
 RESERVE 5 LINES.
ENDIF.
SUBTRACT 1 FROM cnt_max.
Farbe setzen
IF flg_color EQ 0.
 FORMAT COLOR 2 INTENSIFIED OFF.
 flg_color = 1.
ELSE.
 FORMAT COLOR 2 INTENSIFIED.
 flg_color = 0.
ENDIF.
Index fuer optische Archivierung
PERFORM new-group(rsbtchh0).
DO cnt_max TIMES.
Belegkopfinformationen
 WRITE /1 sy-vline NO-GAP.
 IF sy-index LE cnt_t0.
 READ TABLE t0 INDEX sy-index.
 CASE t0-info.
 WHEN 0. "Belegkopf
 hlp_belnr = bkpf-belnr. "Belegnr. mit führenden Nullen
 Referenz auf Originalbeleg
 PERFORM start_doc_reference(rsbtchh0)
 USING bkpf-bukrs bkpf-belnr bkpf-gjahr bkpf-bktxt. " change*
 WRITE:
 bkpf-bukrs,
 hlp_belnr,
 bkpf-blart,
 bkpf-budat DD/MM/YYYY.
 Ende der Referenz auf Originalbeleg
 PERFORM end_doc_reference(rsbtchh0).
 WHEN 1. "Vorerfaßter Beleg
 WRITE:
 (29) text-507.
 WHEN 2. "Referenz
 WRITE:
 (12) text-503,
 bkpf-xblnr.
 WHEN 3. "Storno
 WRITE:
 (12) text-504,
 bkpf-stblg.
 WHEN 4. "Gelöschter vorerfaßter Beleg
 WRITE:
 (29) text-507,
 (40) text-508.
 WHEN 5. "Ersetzter vorerfaßter Beleg
 txt_line = text-509.
 REPLACE:
 '&BLN' WITH bkpf-xblnr(10) INTO txt_line,
 '&GJR' WITH bkpf-xblnr+10 INTO txt_line.
 WRITE:
 (29) text-507,
 (40) txt_line.
 WHEN 6. "Ausgleichsbeleg
 WRITE: "
 (29) text-510. "
 WHEN 7. "zurückgen. Ausgleichsbeleg
 WRITE: "
 (29) text-511. "
 ENDCASE.
 ENDIF.
Personenkonteninformationen
Subledger Account Information
 WRITE 31(1) sy-vline NO-GAP.
Internal tables T0 - T5 hold data for each section.
 IF sy-index LE cnt_t1.
 READ TABLE t1 INDEX sy-index.
 IF par_hkto EQ 'X'.
 PERFORM kontonummer USING t1-ktonr hlp_sakan.
 ELSE.
 hlp_sakan = t1-ktonr.
 ENDIF.
 IF t1-xfwae EQ space.
 IF t1-xnegp = 'X'.
 t1-xnegp = '-'.
 ENDIF.
 Write the vendor number.
 WRITE: t1-koart,
 hlp_sakan,
 t1-bschl NO-GAP.
 IF t1-umskz IS INITIAL.
 WRITE: t1-xnegp NO-GAP,
 t1-umskz.
 ELSE.
 WRITE: t1-umskz NO-GAP,
 t1-xnegp.
 ENDIF.
 WRITE: t1-zlspr. "CR 21709 / 23588
 WRITE: (22) t1-dmshb CURRENCY t001-waers.
 ELSE.
 Write the document currency, amount and the
 vendor/ customer

Hi,
Please see documentation of enhancement MM06E005 (transaction SMOD).
Userexit EXIT_SAPMM06E_016 is a component of enhancement MM06E005.
With that enhancement, you can
- Maintain/supply your own customer fields
- Update your own customer-specific tables
You cannot:
- Change standard fields
- Change data that depends on the document header in the items
- Change data that depends on an item in the document header
Please have a look at Business Add-In (BAdI) ME_PROCESS_PO_CUST.
Regards,
Edit

Is it possible to display only dynamically selected fields in the out put?

Is it possible to display only dynamically selected fields in the out put? i need to display set of columns in the selection criteria, but in the output i have display only input given fields. because i need to convert it into .csv file. So i have to display selected fields from internal table. In oracle they are using"execute immediate". is there any equivalent in SAP?
thanks in advance.

Hi Remya,
Are you talking about dynamic programming in ABAP ?
If yes, there are concepts like RTTS which facilitates it.
Yes, the select query also supports dynamic selection of fields. ( Please care about ( ) in dynamic sql ).
Do more research on Field Symbols and statements like ASSIGN COMPONENT OF.
Regards,
Philip.

How to add a new Field in the Dynamic Selection screen section.

HI,
There is a requirement in which I need to add a field in existing program of dynamic selections.
I need to add a field KNKK-DBRTG (Customer Rating) in dynamic selections screen of some existing report
which has a dynamic selection screen with other fields like customer account, company code etc. Along with this i need to add Customer rating field also in the selection screen.
I have used GET KNKK statement to select this in the Dynamic selection screen. But I need to make it appear
on the screen.
LDB used is the Customer Database.
I have added GET KNKK statement after GET KNA1 statement.
Can any one help me how we can make this rating field appear in the selection screen.
With the GET statement Credit control area Fields can be selected in the selection screen but I have to permanantly add the field in the selection screen.
Regards
Prashant Prabhu

Hi,
So you need that this new field have data in old records?
1.- If you are in BI 7.0 and the logic or data for that New field are in the same Dimension, you can use a Remodeling to fill it. I mean if you want if you want to load from a Master Data from other InfoObject in the same Dim.
2.- If condition "1" is not yours.
First add the new field, then create a Backup Cube (both cubes with the new field) and make a full update with all information in the original Cube. The new field willl be empty in both cubes.
Create an UR from BackUp_Cube to Original_Cube with all direct mapping and create a logic in the Start Routine of the UR (modiying the data_package) you can look for the data in the DSO that you often use to load.
To do that both cubes have to be Datasources ( right click on Cube-> aditional function-> and I think is "Extract Datasource")
Hope it helps. Regards, Federico

Adding of new field in dynamic selection for financial statements

Hi ALL,
I want to add Trading partner in dynamic selection fields of financial statement report at document level not yet GL master level: S_ALR_87012284 - Balance Sheet / Profit and Loss Statement .
Can any one tell how to proceed?
I have referred notes: Note 188663 - Enhancing selection views and dynamic selection.
But exactly I am unable to find which logical database has to be given?
regs,
ramesh b

Hi,
If you want to add extra field in your report you can do the setting in Layout selection. If it is not available kinldy check any SAP notes available or not. Otherwise do Zreport with your ABAPer.
Regards,
Mohan.

How to change the text of a user defined field in dynamic selections?

Logical Database PSJ is used by t code CJI3 - we added a couple of user fields into the dynamic selections of CJI3.
Now - how to change the text of this user filed (USR01 of structure PRSP_R in logical database PSJ)?
Found an OSS note - 86980 - that tells that this is not possible.
But when we read the documentation on the user field (CJI3 - dynamic selections - double click on user field - F1), it shows the following text:
User-defined field in which you can enter general information with a length of up to 20 characters.
Dependencies
The names (key words) for user-defined fields depend on the field key.
Now the question is where to change the field key..
Thanks,
Ven

Madhu - you did not get the question I think.
Anyways - I found an OSS note 1266643 - this code change should take care of the issue - it will then reflect the details maintained in custoizng at transaction code OPS1..
Thanks,

Exclude one field from Logical Database's dynamic selection screen

Hi Guru,
I have a requirement to amend a program to exclude the document number field (bsik-belnr) from the dynamic selection-screen of the logical database KDF(Vendor Database) so that the program will not filter according to the document number.
I have use the below syntax in my zprogram.
selection-screen exclude select-options: doc-no.
However I get syntax error "The addition EXCLUDE is only allowed in INCLUDE DBKDFSEL".
Please advice.
Best Regards,
Fung

The selection part of the logical database defines input fields for selecting data.
 The runtime environment displays these on the selection screen when you run an executable program linked to the logical database.
 Include called DB<ldbname>SEL.
 SELECTION-SCREEN BEGIN OF VERSION ver TEXT-xxx.
 SELECTION-SCREEN EXCLUDE ... .
 SELECTION-SCREEN END OF VERSION ver.
Defines a selection screen version (with a three-character name ver ). Between BEGIN OF VERSION and END OF VERSION , you can exclude selection screen objects for the version ver , i.e. remove them from the selection screen with SELECTION-SCREEN EXCLUDE.
 SELECTION-SCREEN DYNAMIC SELECTIONS FOR TABLE dbtab
If one of these tables is active in the report (i.e. it is declared under TABLES or lies somewhere on the path from the root of the database hierarchy to a table declared with TABLES ), a pushbutton called 'Dynamic selections' appears on the selection screen.

Dynamic select of unknown fields

Similar Messages

Maybe you are looking for