J_3RVTTN_PDF is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for The print program J_3RVTTN is designed for screen / printer output of information on the transportation document - the T-1 "Good-transportation note" standard form used for Russian Federation...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_3RVTTN_PDF into the relevant SAP transactions such as SE38 or SE80
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.
Title: Goods issue - transportation note print (T-1)
Text Symbol: 001 = kop.
Text Symbol: 003 = BIK
Text Symbol: 004 = cor/acc
Text Symbol: 005 = set/acc
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
ADDR_GET_NEXT_COMM_TYPE CALL FUNCTION 'ADDR_GET_NEXT_COMM_TYPE' EXPORTING STRATEGY = NAST-TCODE * ADDRESS_TYPE = * ADDRESS_NUMBER = VBDKA-ADRNR * PERSON_NUMBER = VBDKA-ADRNP ADDRESS_NUMBER = ADDR_KEY-ADDRNUMBER PERSON_NUMBER = ADDR_KEY-PERSNUMBER IMPORTING COMM_TYPE = LVS_COMM_TYPE COMM_VALUES = LVS_COMM_VALUES * TABLES * STRATEGY_TABLE = EXCEPTIONS ADDRESS_NOT_EXIST = 1 PERSON_NOT_EXIST = 2 NO_COMM_TYPE_FOUND = 3 INTERNAL_ERROR = 4 PARAMETER_ERROR = 5 OTHERS = 6.
CONVERT_COMM_TYPE_DATA CALL FUNCTION 'CONVERT_COMM_TYPE_DATA' EXPORTING PI_COMM_TYPE = LVS_COMM_TYPE PI_COMM_VALUES = LVS_COMM_VALUES PI_SCREEN = US_SCREEN * PI_NEWID = PI_COUNTRY = US_COUNTRY PI_REPID = LVF_PROGRAM PI_SNAST = LVS_SNAST IMPORTING PE_ITCPO = ITCPO PE_DEVICE = LVF_DEVICE PE_MAIL_RECIPIENT = LVS_RECIPIENT PE_MAIL_SENDER = LVS_SENDER EXCEPTIONS COMM_TYPE_NOT_SUPPORTED = 1 RECIPIENT_CREATION_FAILED = 2 SENDER_CREATION_FAILED = 3 OTHERS = 4.
NAST_PROTOCOL_UPDATE CALL FUNCTION 'NAST_PROTOCOL_UPDATE' EXPORTING MSG_ARBGB = SYST-MSGID MSG_NR = SYST-MSGNO MSG_TY = SYST-MSGTY MSG_V1 = SYST-MSGV1 MSG_V2 = SYST-MSGV2 MSG_V3 = SYST-MSGV3 MSG_V4 = SYST-MSGV4.
RV_SHIPMENT_PRINT_VIEW CALL FUNCTION 'RV_SHIPMENT_PRINT_VIEW' EXPORTING SHIPMENT_NUMBER = SHIPMENT_NUM OPTION_TVTK = TRUE "Shipmenttype Y/N OPTION_TTDS = TRUE "Disposition Y/N LANGUAGE = LANGUAGE OPTION_ITEMS = TRUE "Transport Items Y/N OPTION_SALES_ORDERS = TRUE "Transport Segments Y/N OPTION_EXPORT_DATA = TRUE "Partners Y/N OPTION_SEGMENTS = TRUE "Sales orders Y/N OPTION_PARTNERS = TRUE "Export data Y/N OPTION_PACKAGES = TRUE "Packages Y/N OPTION_FLOW = TRUE "Flow Y/N OPTION_NO_REFRESH = FALSE "Refresh Tables Y/N IMPORTING F_VTTKVB = VTTKVB "Shipment Head F_TVTK = TVTK "Shipmenttype F_TVTKT = TVTKT "Description Shipmenttye F_TTDS = TTDS "Disposition F_TTDST = TTDST "Description Disposition F_VBPLA = VBPLA "Packages TABLES F_VTTP = XVTTP "Shipment Items F_TRLK = SLK "Delivery F_TRLP = SLP "Delivery Item F_VTTS = XVTTS "Shipment Segments F_VTSP = XVTSP "Segments/Items F_VBPA = XVBPA "Partner F_VBADR = XVBADR "Address F_VTFA = XVTFA "Flow F_VBPLK = XVBPLK "Shipment Unit Header F_VBPLP = XVBPLP "Shipment Unit F_VBPLS = XVBPLS "Shipment Unit Sum EXCEPTIONS NOT_FOUND = 1 OTHERS = 2.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING INPUT = SEL-ADDRNUMBER IMPORTING OUTPUT = SEL-ADDRNUMBER.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
SUSR_USER_ADDRESS_READ CALL FUNCTION 'SUSR_USER_ADDRESS_READ' EXPORTING USER_NAME = VTTKVB-ERNAM IMPORTING * USER_ADDRESS = USER_ADDRESS USER_USR03 = USR03 EXCEPTIONS USER_ADDRESS_NOT_FOUND = 1 OTHERS = 2."USR0340A
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING INPUT = SEL-ADDRNUMBER IMPORTING OUTPUT = SEL-ADDRNUMBER.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING INPUT = SEL-ADDRNUMBER IMPORTING OUTPUT = SEL-ADDRNUMBER.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL * SADR = SADR EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING INPUT = SEL-ADDRNUMBER IMPORTING OUTPUT = SEL-ADDRNUMBER.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING INPUT = SEL-ADDRNUMBER IMPORTING OUTPUT = SEL-ADDRNUMBER.
CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
SPELL_AMOUNT CALL FUNCTION 'SPELL_AMOUNT' EXPORTING AMOUNT = SUM CURRENCY = 'ZCURR' FILLER = ' ' LANGUAGE = language IMPORTING IN_WORDS = SPELL EXCEPTIONS NOT_FOUND = 1 TOO_LARGE = 2 OTHERS = 3.
SPELL_AMOUNT CALL FUNCTION 'SPELL_AMOUNT' EXPORTING AMOUNT = SUM CURRENCY = 'ZCURR' FILLER = ' ' LANGUAGE = language IMPORTING IN_WORDS = SPELL EXCEPTIONS NOT_FOUND = 1 TOO_LARGE = 2 OTHERS = 3.
SPELL_AMOUNT CALL FUNCTION 'SPELL_AMOUNT' EXPORTING AMOUNT = TOTSUM CURRENCY = HDOC-WAERK FILLER = ' ' LANGUAGE = language IMPORTING IN_WORDS = SPELL EXCEPTIONS NOT_FOUND = 1 TOO_LARGE = 2 OTHERS = 3.
SPELL_AMOUNT CALL FUNCTION 'SPELL_AMOUNT' EXPORTING AMOUNT = SUM CURRENCY = 'ZCURR' FILLER = ' ' LANGUAGE = language IMPORTING IN_WORDS = SPELL EXCEPTIONS NOT_FOUND = 1 TOO_LARGE = 2 OTHERS = 3.
ST_LOCATION_ADDR_READ * CALL FUNCTION 'ST_LOCATION_ADDR_READ' * EXPORTING * I_LOCATION = L_DEPT * IMPORTING * E_SADR = SADR_BEGIN * EXCEPTIONS * ADDRESS_NOT_FOUND = 1 * OTHERS = 2.
ST_LOCATION_ADDR_READ * CALL FUNCTION 'ST_LOCATION_ADDR_READ' * EXPORTING * I_LOCATION = L_DEST * IMPORTING * E_SADR = SADR_END * EXCEPTIONS * ADDRESS_NOT_FOUND = 1 * OTHERS = 2.
UNIT_CONVERSION_SIMPLE CALL FUNCTION 'UNIT_CONVERSION_SIMPLE' EXPORTING INPUT = INPUT UNIT_IN = UNIT_IN UNIT_OUT = UNIT_OUT IMPORTING OUTPUT = INPUT EXCEPTIONS CONVERSION_NOT_FOUND = 1 DIVISION_BY_ZERO = 2 INPUT_INVALID = 3 OUTPUT_INVALID = 4 OVERFLOW = 5 TYPE_INVALID = 6 UNITS_MISSING = 7 UNIT_IN_NOT_FOUND = 8 UNIT_OUT_NOT_FOUND = 9.
SERIAL_LS_PRINT CALL FUNCTION 'SERIAL_LS_PRINT' EXPORTING VBELN = slk-VBELN POSNR = slp-POSNR TABLES ISERLS = TKOMSER.
PROCESS_SERIALS_FOR_PRINT CALL FUNCTION 'PROCESS_SERIALS_FOR_PRINT' EXPORTING I_BOUNDARY_LEFT = '(_' I_BOUNDARY_RIGHT = '_)' I_SEP_CHAR_STRINGS = ',_' I_SEP_CHAR_INTERVAL = '_-_' I_USE_INTERVAL = 'X' I_BOUNDARY_METHOD = 'C' I_LINE_LENGTH = 50 I_NO_ZERO = 'X' I_ALPHABET = SY-ABCDE I_DIGITS = '0123456789' I_SPECIAL_CHARS = '-' I_WITH_SECOND_DIGIT = ' ' TABLES SERIALS = TKOMSER SERIALS_PRINT = TKOMSER_PRINT EXCEPTIONS BOUNDARY_MISSING = 01 INTERVAL_SEPARATION_MISSING = 02 LENGTH_TO_SMALL = 03 INTERNAL_ERROR = 04 WRONG_METHOD = 05 WRONG_SERIAL = 06 TWO_EQUAL_SERIALS = 07 SERIAL_WITH_WRONG_CHAR = 08 SERIAL_SEPARATION_MISSING = 09.
FP_JOB_OPEN call function 'FP_JOB_OPEN' CHANGING ie_outputparams = fp_outputparams EXCEPTIONS cancel = 1 usage_error = 2 system_error = 3 internal_error = 4 others = 5.
FP_GET_LAST_ADS_ERRSTR CALL FUNCTION 'FP_GET_LAST_ADS_ERRSTR' IMPORTING E_ADSERRSTR = l_errstr.
FP_JOB_CLOSE call function 'FP_JOB_CLOSE' * IMPORTING * E_RESULT = exceptions usage_error = 1 system_error = 2 internal_error = 3 others = 4 .
FP_FUNCTION_MODULE_NAME CALL FUNCTION 'FP_FUNCTION_MODULE_NAME' EXPORTING i_name = P_TNAPR_SFORM IMPORTING e_funcname = P_FM_NAME.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING ADDRESS_SELECTION = SEL IMPORTING ADDRESS_VALUE = ADDR1_VAL EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 VERSION_NOT_EXIST = 3 INTERNAL_ERROR = 4 OTHERS = 5.
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_3RVTTN_PDF or its description.