SAP Reports / Programs

J_1SFERA SAP ABAP Report - IS-M/SD CH/V: Interface Data for FERAG Systems







J_1SFERA is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Read address data for bundling of newspapers in postal shipping...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.

If you would like to execute this report or see the full code listing simply enter J_1SFERA into the relevant SAP transactions such as SE38 or SE80


ABAP code to call this SAP report using the submit statement

This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.






SUBMIT J_1SFERA. "Basic submit
SUBMIT J_1SFERA AND RETURN. "Return to original report after report execution complete
SUBMIT J_1SFERA VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Interfaces to FERAG Systems From: &0..........
Selection Text: P_SEQ = Prod.Seq.for Postal Shipping
Selection Text: PVA = Edition
Selection Text: DZEUG = Publication
Selection Text: DSETNAME = Path for Output File
Selection Text: WR_DATEN = List Interfaces
Selection Text: VDATE = Shipping Date
Selection Text: UNIX_DAT = Interfaces to Unix File
Selection Text: S_LFART = Delivery Types (Order)
Title: IS-M/SD CH/V: Interface Data for FERAG Systems
Text Symbol: 012 = **********************************************************************
Text Symbol: 011 = *** E R R O R M E S S A G E S ***
Text Symbol: 010 = **********************************************************************
Text Symbol: 009 = FERAG Interface
Text Symbol: 008 = FERAG Interface Data
Text Symbol: 902 = Print Control
Text Symbol: 016 = ************* PROD. SEQUENCE STATISTICS ******************************
Text Symbol: 015 = ProdSeq No.Contnrs No.PPacks No.Iss
Text Symbol: 014 = No errors found
Text Symbol: 013 = Key Error Message
Text Symbol: 007 = Cannot Open Dataset
Text Symbol: 001 = Program Control
Text Symbol: 006 = Postal code missing in tab. JSTPLZPRO
Text Symbol: 005 = Postal code missing in tab. JSTPLZORT
Text Symbol: 004 = City number missing in tab. JSTORTPRO
Text Symbol: 003 = Entry missing in tab. J_1SORGZEB
Text Symbol: 002 = Output Control
Text Symbol: 908 = Cover Sht
Text Symbol: 909 = Cover Sh.Text
Text Symbol: 910 = Print Imm.
Text Symbol: 911 = Print Cover Sheet
Text Symbol: 912 = Text on Cov.Sheet
Text Symbol: 903 = Name of Spool List
Text Symbol: 904 = No. of Printouts
Text Symbol: 905 = Printer
Text Symbol: 906 = Delete After Print
Text Symbol: 913 = Lang.
Text Symbol: 907 = Reten.Period





001 1 Rec ProdSeq / KSeq No.Cont./PSeq.
002 2 Rec Container Sack Flag Address
003 3 Rec PPck PLv Carr. BType PPckPCd CityPPck No.PPcks No.PCds QfP MiQt PPck
004 4 Rec Order No. Issue Address


INCLUDES used within this REPORT J_1SFERA

No INCLUDES are used within this REPORT code!


TABLES used within REPORT and the associated SELECT statement:

No SAP DATABASE tables are accessed within this REPORT code!


Function Modules used within report and the associated call statement:

J_1S_SHIPPING_DATA_GET_PRODSEQ * call function 'J_1S_SHIPPING_DATA_GET_PRODSEQ' "rr19990201 * exporting "rr19990201 * date = vdate "rr19990201 * tables "rr19990201 * out_prodseq = pseqtab_all. "rr19990201

J_1S_SHIPPING_DATA_GET_CNTNER * call function 'J_1S_SHIPPING_DATA_GET_CNTNER' "rr19990201 * exporting "rr19990201 * vrsnddatum = vdate "rr19990201 * prodseq = pseqtab-prodseq "rr19990201 * tables "rr19990201 * out_container = gebindetab. "rr19990201

J_1S_SHIPPING_DATA_GET_BUNDLE CALL FUNCTION 'J_1S_SHIPPING_DATA_GET_BUNDLE' EXPORTING containernr = gebindetab-gebindenr TABLES out_bundle = bundetab.

J_1S_SHIPPING_DATA_GET_ADDRESS CALL FUNCTION 'J_1S_SHIPPING_DATA_GET_ADDRESS' EXPORTING bundle = bundetab-bundnr * flg_namenszus = zeilenzahl = '4'"Anzahl Adresszeilen TABLES address_tab = adressentab .

FILE_VALIDATE_NAME call function 'FILE_VALIDATE_NAME' exporting logical_filename = 'ISM_GROUP_FERAG_INTERFACE' "<= File-Gruppe changing physical_filename = dsetname "<= Pfad vom Selektionsbild exceptions others = 4.

ISP_JRTBEABST_MAINTAIN CALL FUNCTION 'ISP_JRTBEABST_MAINTAIN' EXPORTING aufgabe = '05' beabstart = space inputbeabst = jrtbeabst inputaddress = jgtsadr IMPORTING outputaddress = jgtsadr EXCEPTIONS address_not_found = 1 jrtbeabst_not_found = 2.

J_1S_ADDRESS_INTO_PRINTFORM CALL FUNCTION 'J_1S_ADDRESS_INTO_PRINTFORM' EXPORTING in_adrs = jgtsadr IMPORTING out_adrs = jgtsadr.

ISP_ADDRESS_INTO_PRINTFORM CALL FUNCTION 'ISP_ADDRESS_INTO_PRINTFORM' EXPORTING * anschr_typ = anschr_typ = jgtsadr-erstadr " (neu) rr1999051 * FLG_NAMENSZUS = ' ' sadrwa_in = jgtsadr zeilenzahl = '4' IMPORTING sadrwa_out = adrs EXCEPTIONS OTHERS = 1.

J_1S_ADDRESS_INTO_PRINTFORM CALL FUNCTION 'J_1S_ADDRESS_INTO_PRINTFORM' EXPORTING in_adrs = jgtsadr IMPORTING out_adrs = jgtsadr.

ISP_ADDRESS_INTO_PRINTFORM CALL FUNCTION 'ISP_ADDRESS_INTO_PRINTFORM' EXPORTING anschr_typ = jvvvspadr-adressvar sadrwa_in = jgtsadr zeilenzahl = 4 IMPORTING sadrwa_out = adrs.

ISP_ADDRESS_INTO_PRINTFORM CALL FUNCTION 'ISP_ADDRESS_INTO_PRINTFORM' EXPORTING anschr_typ = '1' sadrwa_in = adresse_in zeilenzahl = '4' IMPORTING sadrwa_out = adresse_text EXCEPTIONS OTHERS = 1.



Contribute (Add Comments)

Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.







The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.

This will then be available for everyone to easily find by simply searching on the report name J_1SFERA or its description.