Encoding in Application Server

Hi
What is the significance of the parameter Encoding in the application servers? Is that parameter value actually telling the application server that it has to treat all the incoming request parameters as UTF-8 encoded values?
I think within an application server we can also instruct the server that certain J2EE containers (or request path) should be treated as UTF-8 encoded and other containers (or request path) should be treated as ISO-8859. What is the best practice for an Internationalized application? Is it to have the default as UTF-8 and override certain request for certain containers (request path) to be treated as ISO-8859.
Please let me know.
Thanks & Regards
Prasanna Kumar

I think its solely on the discretion of the developer to set the required encoding parameter.
In JSP :
<%@ page contentType="text/html; charset=UTF-8" %>
Also in case you are using struts then in the reset method of ur ActionForm you may do ...
request.setCharacterEncoding("UTF-8");
So u r in control of what encoding type u want.

Similar Messages

Use of Open and close data set in to pick up files from application server

Hi,
As per my earlier posts i m making a programm which will pick excel sheet from application server and make auto PR by bapi and this all process will be handle by background processing (SM36, SM37). My concer is all proces are working fine but my files are not been picked by application server , when run on my own machine everything is working fine.I never used OPENDATA SET command before , so i have no idea how it will be used , can anyone provide me details with my set of codes where it should be used ....
sou_dir_name = 'Y:\Sucess\'.
tar_dir_name = 'Y:\destination\'.
Open dataset sou_dir_name for input in text mode encoding default.
if sy-subrc eq 0.
   do.
       read dataset sou_dir_name into file_table.
   if sy-subrc ne 0.
     exit. " end of file.
enddo.
endif.
CALL FUNCTION 'TMP_GUI_DIRECTORY_LIST_FILES'
EXPORTING
    DIRECTORY = sou_dir_name
    FILTER     = '.'
IMPORTING
    FILE_COUNT = file_count
    DIR_COUNT = dir_count
TABLES
    FILE_TABLE = file_table
    DIR_TABLE = dir_table
EXCEPTIONS
    CNTL_ERROR = 1
    OTHERS     = 2.
IF SY-SUBRC <> 0.
ENDIF.
loop at file_table into wa_file_table.
clear : strr , str1 , str2 , str3 .
strr = wa_file_table-PATHNAME .
concatenate sou_dir_name strr into str1 .
concatenate tar_dir_name strr into str2 . " success
concatenate tar_dir_name1 strr into str3 .         " failed
FILE = STR1 .
*start-of-selection.
*& Function For Retrieve Data From Excel
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
EXPORTING
    filename                      = FILE
    i_begin_col                   = col_start
    i_begin_row                   = row_start
    i_end_col                     = col_end
    i_end_row                     = row_end
tables
    intern                        = excel_bdcdata
EXCEPTIONS
   INCONSISTENT_PARAMETERS       = 1
   UPLOAD_OLE                    = 2
   OTHERS                        = 3.
IF sy-subrc NE 0.
WRITE : / 'File Error'.
EXIT.
ENDIF.
loop at excel_bdcdata.
    translate excel_bdcdata to upper case .
    move excel_bdcdata-col to it_index.
    assign component it_index of structure wa_file to <fs> .
    move excel_bdcdata-value to <fs>.
    at end of row.
      append wa_file to it_file .
        clear wa_file.
      endat.
endloop.

Parsing XML data:
http://help.sap.com/saphelp_nw04/helpdata/en/86/8280ba12d511d5991b00508b6b8b11/frameset.htm
or alternatively check out ABAP online help for "CALL TRANSFORMATION".
For creating the material master look at BAPI_STANDARDMATERIAL_CREATE.
Thomas

How to see the file at the application server

HI TO ALL SDNERS ,
                             THIS IS MY CODE WHERE TO CHECK THE DOWNLOADED FILE AT THE APPLICATION SERVER.IN TCODE AL11 I HAVE SEEN THERE IS NO FILE GETTING CREATED.WHEN TRANSFERRING THE SY-SUBRC VALUE IS ZERO.
Program Name        : ZME11_BDC.
Title               : PURCHASE INFORMATION RECORD LOAD PROGRAM
Program Objective   : THIS PROGRAM READS IN THE PURCHASE
                      INFORMATION FILE. IT CREATES A BDC SESSION TO
                      USE TO LOAD THE PURCHASE INFORMATION RECORDS
                      INTO SAP using the ME11 Transaction.
REPORT ZME11_BDC no standard page heading MESSAGE-ID ZHNC line-size 55.
            constants declaration
constants: c_x value 'X',
           c_sess type apqi-groupid value 'zcustomer',
           c_xd01 type tstc-tcode value 'ME11'.
              DECLARING VARIABLES
DATA: V_MSG(255),
      V_ERREC TYPE I,"NO OF FAILED RECORDS
      V_LINES."NO OF RECORDS
       FLAG DECLARATIONS
DATA: FG_DATA_EXIST VALUE 'X',"CHECK FOR DATA
      FG_SESSION_OPEN VALUE ''.
      STRUCTURES AND INTERNAL TABLE DECLARATIONS
TYPES :BEGIN OF TY_PIR,
         LIFNR TYPE EINA-LIFNR,
         MATNR TYPE EINA-MATNR,
         EKORG TYPE EINE-EKORG,
         WERKS TYPE EINE-WERKS,
         VERKF TYPE EINA-VERKF,"sales person
         TELF1 TYPE EINA-TELF1,"telephone
         URZLA TYPE EINA-URZLA,"country
         REGIO TYPE EINA-REGIO,"region
         APLFZ(5),"plan deleivery time
         EKGRP TYPE EINE-EKGRP,"purchase group
         NORBM(13),
         NETPR(13),
     END OF TY_PIR.
DATA : IT_PIR TYPE TABLE OF TY_PIR,
       WA_PIR LIKE LINE OF IT_PIR.
DATA: BEGIN OF IT_BDCDATA.
INCLUDE STRUCTURE BDCDATA.
DATA END OF IT_BDCDATA.
DATA : BEGIN OF IT_BDCMSG.
INCLUDE STRUCTURE BDCMSGCOLL.
DATA END OF IT_BDCMSG.
                  SELECTION SCREEN
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETER : FNAME TYPE RLGRAP-FILENAME.
SELECTION-SCREEN END OF BLOCK B1.
                       AT SELECTION ON VALUE REQUEST
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FNAME.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
   PROGRAM_NAME        = SYST-CPROG
   DYNPRO_NUMBER       = SYST-DYNNR
   FIELD_NAME          = ' '
IMPORTING
   FILE_NAME           = FNAME.
                         START OF SELECTION
START-OF-SELECTION.
PERFORM F_GET_DATA USING FNAME
                   CHANGING IT_PIR.
PERFORM F_GENERATE_DATASET USING FNAME
                           CHANGING IT_PIR WA_PIR.
*&      Form F_GET_DATA
      text
     -->P_V_FNAME text
     <--P_IT_PIR text
FORM F_GET_DATA USING    P_FNAME LIKE FNAME
                 CHANGING P_IT_PIR LIKE IT_PIR.
DATA: LV_FILE TYPE STRING.
LV_FILE = FNAME.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
    FILENAME                      = LV_FILE
   FILETYPE                      = 'DAT'
HAS_FIELD_SEPARATOR           = 'X'
HEADER_LENGTH                 = 0
READ_BY_LINE                  = 'X'
DAT_MODE                      = ' '
CODEPAGE                      = ' '
IGNORE_CERR                   = ABAP_TRUE
REPLACEMENT                   = '#'
CHECK_BOM                     = ' '
IMPORTING
FILELENGTH                    =
HEADER                        =
TABLES
    DATA_TAB                      = P_IT_PIR
EXCEPTIONS
   FILE_OPEN_ERROR               = 1
   FILE_READ_ERROR               = 2
   NO_BATCH                      = 3
   GUI_REFUSE_FILETRANSFER       = 4
   INVALID_TYPE                  = 5
   NO_AUTHORITY                  = 6
   UNKNOWN_ERROR                 = 7
   BAD_DATA_FORMAT               = 8
   HEADER_NOT_ALLOWED            = 9
   SEPARATOR_NOT_ALLOWED         = 10
   HEADER_TOO_LONG               = 11
   UNKNOWN_DP_ERROR              = 12
   ACCESS_DENIED                 = 13
   DP_OUT_OF_MEMORY              = 14
   DISK_FULL                     = 15
   DP_TIMEOUT                    = 16
   OTHERS                        = 17
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
IF P_IT_PIR IS INITIAL.
FG_DATA_EXIST = ''.
ENDIF.
ENDFORM.                    " F_GET_DATA
*&      Form F_GENERATE_DATASET
      text
     -->P_V_FNAME text
     <--P_IT_PIR text
FORM F_GENERATE_DATASET USING    P_V_FNAME LIKE FNAME
                         CHANGING P_IT_PIR LIKE IT_PIR
                                  P_WA_PIR LIKE WA_PIR.
MESSAGE I001(ZHNC).
*OPENING FILE AT THE APPLICATION SERVER FOR WRITING
OPEN DATASET FNAME FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
IF SY-SUBRC EQ 0.
MESSAGE I002(ZHNC).
LOOP AT P_IT_PIR INTO P_WA_PIR.
SPLIT P_WA_PIR AT '*' INTO P_WA_PIR-LIFNR
                           P_WA_PIR-MATNR
                           P_WA_PIR-EKORG
                           P_WA_PIR-WERKS
                           P_WA_PIR-VERKF
                           P_WA_PIR-TELF1
                           P_WA_PIR-URZLA
                           P_WA_PIR-REGIO
                           P_WA_PIR-APLFZ
                           P_WA_PIR-EKGRP
                           P_WA_PIR-NORBM.
*TRANSFER THE FILE FROM INTERNAL TABLE TO APPLICATION SERVER
MESSAGE I003(ZHNC).
TRANSFER P_WA_PIR TO FNAME.
ENDLOOP.
*CLOSING THE FILE AT THE APPLICATION SERVER
CLOSE DATASET FNAME.
ENDIF.

Hello,
I made a similar program. You can have a look at it.
*&      Form write_to_app_server
      text
--> p1        text
<-- p2        text
FORM write_to_app_server.
To get filename
PERFORM get_filename.
To write into the application server
OPEN DATASET g_filename_with_path FOR OUTPUT IN TEXT MODE.
IF sy-subrc = 0.
    LOOP AT <l_table> INTO <l_line>.
      TRANSFER <l_line> TO g_filename_with_path.
    ENDLOOP.
    CLOSE DATASET g_filename_with_path.
ELSE.
    CLOSE DATASET g_filename_with_path.
ENDIF.
To send mail
PERFORM send_mail.
ENDFORM.                    " write_to_app_server
*&      Form get_filename
      text
--> p1        text
<-- p2        text
FORM get_filename.
DATA : l_log_path TYPE filepath-pathintern
                      VALUE 'Y28M_DOWNLOADS_BACKGROUND' .
CALL FUNCTION 'FILE_GET_NAME_USING_PATH'
       EXPORTING
            client                     = sy-mandt
            logical_path               = l_log_path
            operating_system           = sy-opsys
            file_name                  = p_fname
       IMPORTING
            file_name_with_path        = g_filename_with_path
       EXCEPTIONS
            path_not_found             = 1
            missing_parameter          = 2
            operating_system_not_found = 3
            file_system_not_found      = 4
            OTHERS                     = 5.
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.                    " get_filename
You may find it useful.
Regards,
Karuna.

How to upload a file in application server to an internal table

Hi,
      I am asked to upload a file from application server to internal table. Can you please suggest me the ways to do it or the function module which helps to browse the application server file names.
I have done a program. But its giving problem in searching the files from application server. I am pasting my code for ur review. Please tell me which part i have to correct or suggest me some other ways to do it.
*& Report ZUPLOAD1
REPORT ZUPLOAD1.
type-pools: truxs.
parameters: p_upl_ps radiobutton group g1 default 'X', "upload from pres. server
             p_path type rlgrap-filename,
             p_upl_as radiobutton group g1,   "upload from appln server
             <b>p_dir LIKE filepath-pathintern DEFAULT 'Y_ABAP',
             p_file LIKE filepath-pathintern lower case,</b>
             p_test as checkbox.
constants: c_x value 'X',
           c_tab type c value cl_abap_char_utilities=>horizontal_tab.
types: ty_data(1000) type c.    "structure to hold legacy data
data: i_data type standard table of ty_data. "internal table of ty_data
types: begin of stritab,
      land1 type v_t604-land1, "structure of legacy file.
      stawn type v_t604-stawn,
      bemeh type v_t604-bemeh,
      impma type v_t604-impma,
      minol type v_t604-minol,
      end of stritab.
data: gi_itab type standard table of stritab, "internal table of legacy file
      gw_itab type stritab. "work area
data: i_raw type truxs_t_text_data,
      v_fullpath type string.
at selection-screen on value-request for p_path.
if p_upl_ps = c_x. "if presentation server is selected
perform get_file.
else.            "if application server is selected
perform set_file_path.
perform upload_from_server.
perform split_data.
endif.
form get_file.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
PROGRAM_NAME        = SYST-CPROG
DYNPRO_NUMBER       = SYST-DYNNR
FIELD_NAME          = ' '
IMPORTING
   FILE_NAME           = p_path.     "getting the file name of pres server
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
EXPORTING
I_FIELD_SEPERATOR          =
    I_LINE_HEADER              = 'X'              "converting excel to sap and filling in
    I_TAB_RAW_DATA             = i_raw      "internal table
    I_FILENAME                 = p_path
TABLES
    I_TAB_CONVERTED_DATA       = gi_itab
EXCEPTIONS
   CONVERSION_FAILED          = 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.
form set_file_path.                 "Getting the file path of application server
data: lv_file type p_file.
      lv_file = p_file.
      CALL FUNCTION 'FILE_GET_NAME_USING_PATH'
        EXPORTING
        CLIENT                           = SY-MANDT
          LOGICAL_PATH                     = p_dir
        OPERATING_SYSTEM                 = SY-OPSYS
        PARAMETER_1                      = ' '
        PARAMETER_2                      = ' '
        PARAMETER_3                      = ' '
        USE_BUFFER                       = ' '
          FILE_NAME                        = lv_file
        USE_PRESENTATION_SERVER          = ' '
        ELEMINATE_BLANKS                 = 'X'
       IMPORTING
         FILE_NAME_WITH_PATH              = v_fullpath
       EXCEPTIONS
         PATH_NOT_FOUND                   = 1
         MISSING_PARAMETER                = 2
         OPERATING_SYSTEM_NOT_FOUND       = 3
         FILE_SYSTEM_NOT_FOUND            = 4
         OTHERS                           = 5
      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.
form upload_from_server.
data: lv_msg type string,
      lw_data type ty_data.
open dataset v_fullpath for input message lv_msg in text mode encoding default.
if sy-subrc <> 0.
message lv_msg type 'i'.
stop.
endif.
do.
read dataset v_fullpath into lw_data.
if sy-subrc <> 0.
write:/5 'Error in processign data set'.
exit.
endif.
append lw_data to i_data.
enddo.
close dataset v_fullpath.
if sy-subrc <> 0.
write: /5 'Error closing dataset'.
endif.
endform.
form split_data.
data: lw_data type ty_data.
data: lw_itab type stritab.
data: begin of ty_itab,
      land1 type v_t604-land1,
      stawn type v_t604-stawn,
      bemeh type v_t604-bemeh,
      impma type v_t604-impma,
      minol type v_t604-minol,
      end of ty_itab.
loop at i_data into lw_data.
split lw_data at c_tab into
      ty_itab-land1
      ty_itab-stawn
      ty_itab-bemeh
      ty_itab-impma
      ty_itab-minol.
lw_itab-land1 = ty_itab-land1.
lw_itab-stawn = ty_itab-stawn.
lw_itab-bemeh = ty_itab-bemeh.
lw_itab-impma = ty_itab-impma.
lw_itab-minol = ty_itab-minol.
append lw_itab to gi_itab.
endloop.
endform.
start-of-selection.
loop at gi_itab into gw_itab.
write: /5 'COUNTRY', 'IMPORT CODE', 'SUP UNIT', 'FIRST UOM', 'SECOND UOM',
       /5 gw_itab-land1, gw_itab-stawn,gw_itab-bemeh,gw_itab-impma,gw_itab-minol.
endloop.
end-of-selection.
I hope problem must be in p_dir and p_file which are in bold.. Kindly help me out. Thanks in advance.

see the following ex:
*&      Form SUB_GET_FILEPATH
      text
--> p1        text
<-- p2        text
FORM SUB_GET_FILEPATH .
    GFILE = 'D:\SAP_INT\INBOUND\INBOX'. "Path
ENDFORM.                    " SUB_GET_FILEPATH
*&      Form SUB_GET_FILE
      text
--> p1        text
<-- p2        text
FORM SUB_GET_FILE .
DATA: P_FDIR(200) TYPE C.
DATA: IT_FILEDIR1 TYPE STANDARD TABLE OF TY_FILEDIR WITH HEADER LINE.
P_FDIR = GFILE.
CALL FUNCTION 'RZL_READ_DIR_LOCAL'
    EXPORTING
      NAME     = P_FDIR
    TABLES
      FILE_TBL = IT_FILEDIR.
REFRESH : IT_FILEDIR1.
LOOP AT IT_FILEDIR.
    IF IT_FILEDIR-NAME(4) = 'ZINC' OR IT_FILEDIR-NAME(4) = 'zinc'.
      MOVE IT_FILEDIR-NAME TO IT_FILEDIR1-NAME.
      APPEND IT_FILEDIR1.
    ENDIF.
ENDLOOP.
IF IT_FILEDIR1[] IS INITIAL.
    STOP.
ENDIF.
LOOP AT IT_FILEDIR1.
    REFRESH: I_TAB.
    CLEAR: I_TAB.
    NAME = IT_FILEDIR1-NAME.
    CONCATENATE: GFILE '\' NAME INTO G_FILE.
    OPEN DATASET G_FILE FOR INPUT IN TEXT MODE
                                     ENCODING DEFAULT
                                     IGNORING CONVERSION ERRORS.
    IF SY-SUBRC EQ 0.
      CONCATENATE 'FILENAME : ' G_FILE INTO I_MSG1.
      APPEND I_MSG1.
      DO.
        READ DATASET G_FILE INTO RECORD.
        IF SY-SUBRC = 0.
          SPLIT RECORD AT ',' INTO I_TAB-BUKRS I_TAB-EBELN
              I_TAB-BLDAT I_TAB-XBLNR I_TAB-LIFNR I_TAB-AMOUNT
              I_TAB-CURR I_TAB-BUSAREA
              I_TAB-BKTXT I_TAB-DMBTR I_TAB-MENGE I_TAB-SRNO.
          MOVE-CORRESPONDING I_TAB TO I_TAB1.
        ELSE.
          EXIT.
        ENDIF.
        APPEND I_TAB1.
        CLEAR: I_TAB, I_TAB1.
      ENDDO.
    ENDIF.
    CLOSE DATASET G_FILE.

Unable to download file to application server

Hi,
I am trying to download a file to the application server. I've also attached my code below.After the execution of this program, it is just returning blank values to the application server file. Let me know why it is not populating the values to the files.
Raj.
tables: kna1,
        knb1.
DATA: BEGIN OF itab_ls OCCURS 0,
       kunnr LIKE kna1-kunnr,
       altkn LIKE knb1-altkn,
     END OF itab_ls.
TYPES : BEGIN OF t_file,
          date(5) TYPE c,   " Date
          time(5) TYPE c,   " Time
        end of t_file.
DATA : gt_file TYPE TABLE OF t_file, " File Path
       g_spath TYPE fileextern,   " Path
       g_fieldname   TYPE dynfnam. " Field Name
SELECTION-SCREEN BEGIN OF BLOCK b_01 WITH FRAME TITLE text-b01.
SELECT-OPTIONS s_erdat FOR kna1-erdat obligatory.
SELECTION-SCREEN END   OF BLOCK b_01.
SELECTION-SCREEN BEGIN OF BLOCK b_02 WITH FRAME TITLE text-b02.
SELECTION-SCREEN BEGIN OF LINE.
Radio button for Presentation server file
PARAMETERS    : p_pres RADIOBUTTON GROUP file DEFAULT 'X'
                USER-COMMAND file.
SELECTION-SCREEN COMMENT 3(20) text-s01 FOR FIELD p_pres.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 23(22) text-s02 FOR FIELD p_flnam1
                                               MODIF ID com.
Presentation server file Name
PARAMETERS    : p_flnam1 TYPE localfile MODIF ID com ."MEMORY ID zp1.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
Radio button for Application server file
PARAMETERS    : p_app RADIOBUTTON GROUP file .
SELECTION-SCREEN COMMENT 3(20) text-s03 FOR FIELD p_app.
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 23(22) text-s04 FOR FIELD p_flnam2
                                               MODIF ID com.
Application server file Name
PARAMETERS    : p_flnam2 TYPE localfile MODIF ID com ."MEMORY ID zp2 .
SELECTION-SCREEN END   OF LINE.
SELECTION-SCREEN END   OF BLOCK b_02.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_flnam1.
g_fieldname = 'P_PCFILE'.
PERFORM call_pres_help USING    g_fieldname
                         CHANGING p_flnam1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_flnam2.
PERFORM call_app_help CHANGING p_flnam2.
AT SELECTION-SCREEN OUTPUT.
Start-of-selection.
SELECT kna1kunnr knb1altkn kna1ktokd kna1erdat
INTO CORRESPONDING FIELDS OF TABLE itab_ls
FROM kna1 INNER JOIN knb1 ON kna1kunnr = knb1kunnr WHERE kna1~erdat in
s_erdat AND KNA1KTOKD = 'Z002' order by kna1kunnr.
OPEN DATASET p_flnam2 for output IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc EQ 0.
LOOP AT itab_ls.
    TRANSFER itab_ls TO p_flnam2.
ENDLOOP.
CLOSE DATASET p_flnam2.
endif.
WRITE:/'SAP Ship-toCustID', 18 'LegacyCustID'.
ULINE.
Loop at itab_ls.
write: /3 itab_ls-KUNNR, 18 itab_ls-ALTKN.
endloop.
PERFORM download_file.
*&      Form call_pres_help
      text
     -->P_FIELDNAME text
     -->P_PARAMETER text
FORM call_pres_help USING    p_fieldname    TYPE dynfnam
                    CHANGING p_parameter    TYPE localfile.
CALL FUNCTION 'F4_FILENAME'
    EXPORTING
      program_name = sy-repid
      dynpro_number = sy-dynnr
      field_name    = p_fieldname
    IMPORTING
      file_name     = p_parameter.
ENDFORM.                    "call_pres_help
*&      Form call_app_help
      text
     -->P_PARAMETER text
FORM call_app_help CHANGING p_parameter    TYPE localfile.
CALL FUNCTION '/SAPDMC/LSM_F4_SERVER_FILE'
    EXPORTING
      directory        = g_spath
    IMPORTING
      serverfile       = p_parameter
    EXCEPTIONS
      canceled_by_user = 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.                    "call_app_help

Hi,
If the SY-SUBRC is equal to 8, then error is nothing but "The file could not be opened". So pls check the file name again.
And for write statement,
If SY-SUBRC = 4 then the Contents of name are invalid, statement could not be executed, and contents of destination remain unchanged. So pls do check this also.
regs,
Venkat Ramanan
Message was edited by: Venkat Ramanan Natarajan

OC4J Application Server - InstantiationException

Error : java.lang.InstantiationException: Error initializing ejb-modules: message-destination-mapping tag with missing 'location' attribute
HI All,
Hope someone can help me with the following error. I've got a ear file which deploys 100% correct, and the application can run successfully after deploying. But if I stop and start the container, then i get the following exception, the container starts up but the application does not start successfully.
Oracle Container start-up exception:
09/05/11 09:17:15 Start process
Listening for transport dt_socket at address: 8688
0.000: [GC [PSYoungGen: 43776K->4394K(51008K)] 43776K->4394K(517056K), 0.0290830 secs]
3.295: [GC [PSYoungGen: 48170K->7220K(51008K)] 48170K->8371K(517056K), 0.0499300 secs]
6.817: [GC [PSYoungGen: 50996K->7218K(51008K)] 52147K->13636K(517056K), 0.0504670 secs]
09/05/11 09:17:28 WARNING: Application.setConfig Application: stf-7.0.1 is in failed state as initialization failed.
java.lang.InstantiationException: Error initializing ejb-modules: message-destination-mapping tag with missing 'location' attribute
09/05/11 09:17:29 Oracle Containers for J2EE 10g (10.1.3.2.0) initialized
29.062: [GC [PSYoungGen: 50994K->7226K(51008K)] 57412K->15785K(517056K), 0.0436860 secs]
32.675: [GC [PSYoungGen: 51002K->7228K(50880K)] 59561K->16729K(516928K), 0.0346460 secs]
We use jdk1.5, Ejb3 and Oracle 10.1.3
We use message driven beans, for which we create an ejb-jar.xml that looks as follow:
Start
<?xml version="1.0" encoding="UTF-8"?>
<ejb-jar version="3.0" xmlns="http://java.sun.com/xml/ns/j2ee"
     xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
     xsi:schemaLocation="http://java.sun.com/xml/ns/j2ee http://java.sun.com/xml/ns/j2ee/ejb-jar_2_1.xsd">
     
     <display-name>vss-ejb</display-name>
     <enterprise-beans>
          <message-driven>
               <display-name>VSSAdvancedQueueBatchBeanMDB</display-name>
               <ejb-name>VSSAdvancedQueueBatchBean</ejb-name>
               <ejb-class>
                    za.globed.varsite.hebs.bsi.services.ejb.VSSAdvancedQueueBatchBean
               </ejb-class>
               <transaction-type>Bean</transaction-type>
               <message-destination-type>
                    javax.jms.Queue
               </message-destination-type>
               <message-destination-link>
                    jms/batchQueue
               </message-destination-link>
               <activation-config>
                    <activation-config-property>
                         <activation-config-property-name>
                              acknowledgeMode
                         </activation-config-property-name>
                         <activation-config-property-value>
                              Auto-acknowledge
                         </activation-config-property-value>
                    </activation-config-property>
                    <activation-config-property>
                         <activation-config-property-name>
                              destinationType
                         </activation-config-property-name>
                         <activation-config-property-value>
                              javax.jms.Queue
                         </activation-config-property-value>
                    </activation-config-property>
                    <activation-config-property>
                         <activation-config-property-name>
                              subscriptionDurability
                         </activation-config-property-name>
                         <activation-config-property-value>
                              NonDurable
                         </activation-config-property-value>
                    </activation-config-property>
                    <activation-config-property>
                         <activation-config-property-name>
                              messageSelector
                         </activation-config-property-name>
                         <activation-config-property-value>
                              Destination =
                              'za.globed.varsite.hebs.bsi.services.VSSAdvancedQueueBatchBean'
                         </activation-config-property-value>
                    </activation-config-property>
               </activation-config>
          </message-driven>
     </enterprise-beans>
     <assembly-descriptor>
          <container-transaction>
               <method>
                    <ejb-name>VSSAdvancedQueueBatchBean</ejb-name>
                    <method-name>*</method-name>
               </method>
               <trans-attribute>Supports</trans-attribute>
          </container-transaction>
          <message-destination>
               <display-name>
                    Destination for VSSAdvancedQueueBatchBean
               </display-name>
               <message-destination-name>
                    jms/batchQueue
               </message-destination-name>
          </message-destination>
     </assembly-descriptor>
</ejb-jar>
-- end --
Any help or suggestions would be much appreciated.
Thanks
Nina

I would advise you to use the latest version - 10.1.3.5 - i remember some issues with 10.1.3.4.
For certifications see here:
http://www.oracle.com/technetwork/middleware/ias/downloads/oracle-soa-certification-101310-097492.html
You have two options to bypass the check:
* Use ignore : runinstaller -ignoresysprereqs
http://onlineappsdba.com/index.php/2008/11/24/upgrade-oracle-application-server-to-10134-10g-r3-patchset-4/
* Or change in the installers file that lists the allowed versions - you can search for the numbers listed in your error dialog

How to store multiple files from SAp in to Application server?

Hi Guys,
             Can anybody tell me how to store multiple files from SAP into Application server.in my application i have to get the data from SAP tables BSEG , BKPF , BSAK and BSIK that to daily i have to do.
            Any Logic or Code for how to do is welcomed.
                    plz help me urgently.
Thanks,
Gopi

Hi,
directories creates basis. If you have task to store data in application server you already should have information into which folder you have to do it. If you don't have this information because it is just for example training for next task then you can use your personal folder into which you have access. To get list of all available folders please look at attached code and form get_directories (you get the list of folders you see in transaction AL11). But don't forget: If you are using open dataset you have to have rights to access application folder!
Here you are code which I use to upload text files from local disc into application folder
Regards,
Karol
*& Report FILE_PC_TO_SAP
REPORT FILE_PC_TO_SAP.
DATA: BEGIN OF searchpoints OCCURS 100,
        DIRNAME(200)     TYPE c, " name of directory.
        sp_name(100)     TYPE c," name of entry. (may end with *)
      END OF searchpoints.
DATA: BEGIN OF isearchpoints OCCURS 10,
        dirname(75) TYPE c,            " name of directory.
        aliass(75) TYPE c,            " alias for directory.
        svrname(75) TYPE c,            " svr where directory is availabl
        sp_name(75) TYPE c,            " name of entry. (may end with *)
        sp_cs(10)   TYPE c,            " ContainsString pattern for name
      END OF isearchpoints.
data: l_file type filetable.
data: l_rc   type i.
data: itab   type TABLE OF string.
data: g_tmp_file_path type rlgrap-filename.
data: wa_itab type string.
data: h_destin(100) type c.
data: dat      type string.
INITIALIZATION.
perform get_directories.
START-OF-SELECTION.
parameters: in_file type string OBLIGATORY LOWER CASE.
parameters: destin(100) type c OBLIGATORY LOWER CASE.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
   FILENAME                      = in_file
   "FILETYPE                      = 'BIN'
   FILETYPE                      = 'ASC'
   HAS_FIELD_SEPARATOR           = ' '
   HEADER_LENGTH                 = 0
   READ_BY_LINE                  = 'X'
   DAT_MODE                      = ' '
TABLES
    DATA_TAB                     = itab
EXCEPTIONS
   FILE_OPEN_ERROR               = 1
   FILE_READ_ERROR               = 2
   NO_BATCH                      = 3
   GUI_REFUSE_FILETRANSFER       = 4
   INVALID_TYPE                  = 5
   NO_AUTHORITY                  = 6
   UNKNOWN_ERROR                 = 7
   BAD_DATA_FORMAT               = 8
   HEADER_NOT_ALLOWED            = 9
   SEPARATOR_NOT_ALLOWED         = 10
   HEADER_TOO_LONG               = 11
   UNKNOWN_DP_ERROR              = 12
   ACCESS_DENIED                 = 13
   DP_OUT_OF_MEMORY              = 14
   DISK_FULL                     = 15
   DP_TIMEOUT                    = 16
   OTHERS                        = 17.
IF sy-SUBRC <> 0.
write: / 'Error during loading input file!'.
ENDIF.
if h_destin is INITIAL.
h_destin = in_file.
endif.
CONCATENATE destin h_destin into dat SEPARATED BY '/'.
*TRANSLATE dat TO UPPER CASE.
OPEN DATASET dat FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-SUBRC = 0.
loop at itab into wa_itab.
     TRANSFER: wa_itab TO dat.
endloop.
CLOSE DATASET dat.
write: / 'File uploaded!'.
ELSE.
write: / 'Not possible to open dataset'.
ENDIF.
at selection-screen on value-request for in_file.
perform select_input_file_name.
loop at l_file into g_tmp_file_path.
    move g_tmp_file_path to in_file.
    h_destin = ''.
    SPLIT g_tmp_file_path at '\' into table itab.
    loop at itab into g_tmp_file_path.
      h_destin = g_tmp_file_path.
    endloop.
endloop.
at selection-screen on value-request for destin.
DATA: lt_dfies    TYPE TABLE OF dfies.
DATA: lwa_dfies   TYPE dfies.
CALL FUNCTION 'DDIF_FIELDINFO_GET'
    EXPORTING
      tabname    = '/BI0/PCO_AREA'
      lfieldname = 'CO_AREA'
    IMPORTING
      dfies_wa   = lwa_dfies.
lwa_dfies-tabname = 'searchpoints'.
lwa_dfies-REPTEXT   = 'Destination directory'.
lwa_dfies-LENG      = 100.
lwa_dfies-INTLEN    = 100.
lwa_dfies-OUTPUTLEN = 100.
lwa_dfies-fieldname = 'SP_NAME'.
APPEND lwa_dfies TO lt_dfies.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      RETFIELD = 'SP_NAME'
      DYNPPROG = SY-REPID
      DYNPNR = SY-DYNNR
      DYNPROFIELD = 'destin'
      VALUE_ORG = 'S'
    TABLES
      VALUE_TAB = searchpoints
      FIELD_TAB = lt_dfies
    EXCEPTIONS
      PARAMETER_ERROR = 1
      NO_VALUES_FOUND = 2
      OTHERS = 3.
*&      Form select_input_file_name
*       text
form select_input_file_name.
* call function 'F4_FILENAME'
*       exporting
*            program_name = sy-repid
*            dynpro_number = sy-dynnr
*            field_name    = 'PATH'
*       importing
*            file_name     = g_tmp_file_path.
CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG
EXPORTING
WINDOW_TITLE = 'Please choose a file'
"default_extension = '*.TXT'
"default_filename = 'C:\*.txt'
initial_directory = 'C:\'
file_filter = '*.*'
CHANGING
FILE_TABLE = l_file
RC = l_RC
EXCEPTIONS
FILE_OPEN_DIALOG_FAILED = 1
CNTL_ERROR = 2
ERROR_NO_GUI = 3
NOT_SUPPORTED_BY_GUI = 4
OTHERS = 5.
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.                    "select_input_file_name
*&      Form WRITE_DB_HOME
*       Write DB home directory
*       no parameters
FORM write_db_home.
CASE sy-dbsys(3).
    WHEN 'ORA'.
      CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_ORAHOME'
                         ID 'VALUE' FIELD searchpoints-dirname.
*--- C5056155 Start of ALV -------------------------------*
*      PERFORM flip_flop(rsora000) USING cflag.
*      WRITE: / 'DIR_ORAHOME',       30 searchpoints-dirname.
      MOVE: 'DIR_ORAHOME'        TO searchpoints-sp_name.
      APPEND searchpoints.
*--- C5056155 End   of ALV -------------------------------*
    WHEN 'ADA'.
      CALL 'C_GETENV' ID 'NAME' FIELD 'DBROOT'
                      ID 'VALUE' FIELD searchpoints-dirname.
*--- C5056155 Start of ALV -------------------------------*
*      PERFORM flip_flop(rsora000) USING cflag.
*      WRITE: / 'DIR_ADA_DBROOT',    30 searchpoints-dirname.
      MOVE: 'DIR_ADA_DBROOT'     TO searchpoints-sp_name.
      APPEND searchpoints.
*--- C5056155 End   of ALV -------------------------------*
    WHEN 'INF'.
      CALL 'C_GETENV' ID 'NAME' FIELD 'INFORMIXDIR'
                      ID 'VALUE' FIELD searchpoints-dirname.
*--- C5056155 Start of ALV -------------------------------*
*      PERFORM flip_flop(rsora000) USING cflag.
*      WRITE: / 'DIR_INF_INFORMIXDIR', 30 searchpoints-dirname.
      MOVE: 'DIR_INF_INFORMIXDIR' TO searchpoints-sp_name.
      APPEND searchpoints..
*--- C5056155 End   of ALV -------------------------------*
    WHEN 'DB6'.
      CALL 'C_GETENV' ID 'NAME' FIELD 'INSTHOME'
                      ID 'VALUE' FIELD searchpoints-dirname.
      IF sy-subrc = 0.
*--- C5056155 Start of ALV -------------------------------*
*        PERFORM flip_flop(rsora000) USING cflag.
*        WRITE: / 'DIR_DB2_HOME',    30 searchpoints-dirname.
        MOVE: 'DIR_DB2_HOME'       TO searchpoints-sp_name.
        APPEND searchpoints.
*--- C5056155 End   of ALV -------------------------------*
      ELSE.
        EXIT.
      ENDIF.
    WHEN OTHERS.
      EXIT.
ENDCASE.
ENDFORM.                    " WRITE_DB_HOME
FORM get_directories.
* get the name and aliases of ALL userdefined directories
SELECT * FROM user_dir INTO isearchpoints
    WHERE svrname = sy-uname.
    MOVE isearchpoints-dirname to searchpoints-dirname.
    MOVE isearchpoints-aliass to searchpoints-sp_name.
    APPEND searchpoints.
ENDSELECT.
SELECT * FROM user_dir INTO isearchpoints
    WHERE svrname = 'all'.
    MOVE isearchpoints-dirname to searchpoints-dirname.
    MOVE isearchpoints-aliass to searchpoints-sp_name.
    APPEND searchpoints.
ENDSELECT.
* Get DB home
IF sy-dbsys(3) = 'ADA'.
    PERFORM write_db_home.
ENDIF.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_ATRA'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_ATRA'           TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_BINARY'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_BINARY'         TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory $DIR_CCMS
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_CCMS'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_CCMS'           TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_CT_LOGGING'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_CT_LOGGING'     TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_CT_RUN'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_CT_RUN'         TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_DATA'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_DATA'           TO searchpoints-sp_name.
APPEND searchpoints.
* Get DB home
IF sy-dbsys(3) = 'DB6'.
    PERFORM write_db_home.
ENDIF.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_DBMS'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_DBMS'           TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_EXECUTABLE'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_EXECUTABLE'     TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_EXE_ROOT'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_EXE_ROOT'       TO searchpoints-sp_name.
APPEND searchpoints.
*get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_GEN'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_GEN'            TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_GEN_ROOT'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_GEN_ROOT'       TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_GLOBAL'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_GLOBAL'         TO searchpoints-sp_name.
APPEND searchpoints.
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_GRAPH_EXE'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_GRAPH_EXE'      TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_GRAPH_LIB'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_GRAPH_LIB'      TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_HOME'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_HOME'           TO searchpoints-sp_name.
APPEND searchpoints.
* Get DB home
IF sy-dbsys(3) = 'INF'.
    PERFORM write_db_home.
ENDIF.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_INSTALL'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_INSTALL'        TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_INSTANCE'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_INSTANCE'       TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_LIBRARY'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_LIBRARY'        TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_LOGGING'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_LOGGING'        TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the files written by the memory inspector
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_MEMORY_INSPECTOR'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_MEMORY_INSPECTOR' TO searchpoints-sp_name.
APPEND searchpoints.
* Get DB home
IF sy-dbsys(3) = 'ORA'.
    PERFORM write_db_home.
ENDIF.
*get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_PAGING'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_PAGING'         TO searchpoints-sp_name.
APPEND searchpoints.
*get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_PUT'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_PUT'            TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_PERF'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_PERF'           TO searchpoints-sp_name.
APPEND searchpoints.
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_PROFILE'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_PROFILE'        TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_PROTOKOLLS'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_PROTOKOLLS'     TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_REORG'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_REORG'          TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_ROLL'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_ROLL'           TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_RSYN'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_RSYN'           TO searchpoints-sp_name.
APPEND searchpoints.
* calculate directory for saphostagent (no sapparam available...)
IF ( sy-opsys(3) = 'WIN' ) OR ( sy-opsys(3) = 'Win' ).
    DATA: windir_path(64), programfiles_path(64).
*   hoping that ProgramFiles is set in service user environment
    CALL 'C_GETENV' ID 'NAME' FIELD 'ProgramFiles'
                    ID 'VALUE' FIELD programfiles_path.
    IF programfiles_path IS INITIAL.
*     %ProgramFiles% not available. guess from windir
      CALL 'C_GETENV' ID 'NAME' FIELD 'windir'
                      ID 'VALUE' FIELD windir_path.
*     e.g. S:\WINDOWS ==> S:\Program Files
      CONCATENATE windir_path(3) 'Program Files' INTO programfiles_path.
    ENDIF.
    CONCATENATE programfiles_path '\SAP\hostctrl'
                                             INTO searchpoints-dirname.
ELSE.
*   on UNIX, the path is hard coded
    searchpoints-dirname = '/usr/sap/hostctrl'.
ENDIF.
MOVE: 'DIR_SAPHOSTAGENT' TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_SAPUSERS'
                     ID 'VALUE' FIELD searchpoints-dirname.
IF searchpoints-dirname = '.'.
    IF sy-opsys = 'Windows NT'.
      searchpoints-dirname = '.\'.
    ELSE.
      searchpoints-dirname = './'.
    ENDIF.
ENDIF.
MOVE: 'DIR_SAPUSERS'       TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_SETUPS'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_SETUPS'         TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_SORTTMP'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_SORTTMP'        TO searchpoints-sp_name.
APPEND searchpoints.
*get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_SOURCE'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_SOURCE'         TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_TEMP'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_TEMP'           TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_TRANS'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_TRANS'          TO searchpoints-sp_name.
APPEND searchpoints.
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_TRFILES'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_TRFILES'        TO searchpoints-sp_name.
APPEND searchpoints.
* get name of directory with the error files
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'DIR_TRSUB'
                     ID 'VALUE' FIELD searchpoints-dirname.
MOVE: 'DIR_TRSUB'          TO searchpoints-sp_name.
APPEND searchpoints.
* get the name of the current server.
CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'rdisp/myname'
                     ID 'VALUE' FIELD searchpoints-dirname.
data: h_ind type i.
LOOP AT searchpoints.
    h_ind = sy-tabix.
    IF searchpoints-sp_name IS INITIAL.
      DELETE searchpoints INDEX h_ind.
    ENDIF.
ENDLOOP.
ENDFORM.

Oracle Application Server Release 2 (10.1.2) Deployment Notes question

Hi!
I'm following the Oracle Application Server Release 2 (10.1.2) Deployment Notes (http://download-uk.oracle.com/docs/html/B25947_01/deployment_topics006.htm) for deploying an application, built in Jdeveloper 10.1.3 to AS 10.1.2. I have a question about Configuring JDeveloper to Generate Configuration Files That Are J2EE 1.3-Compliant. Do I need all the files in table 34-3? (http://download-uk.oracle.com/docs/html/B25947_01/deployment_topics006.htm#CIHHBJAI)
I already have some of these files. Can I change the version of existing files or do I need new ones? How can I change the version of existing files?
Here are the headers of some of these files:
web.xml: (Here I probably just change version="2.4" to version="2.3")
<?xml version = '1.0' encoding = 'windows-1250'?>
<web-app xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
         xsi:schemaLocation="http://java.sun.com/xml/ns/j2ee http://java.sun.com/xml/ns/j2ee/web-app_2_4.xsd"
         version="2.4" xmlns="http://java.sun.com/xml/ns/j2ee">
orion-application.xml: (Is version="10.0" the version I need to change to "1.2"?)
<?xml version = '1.0' encoding = 'windows-1252'?>
<orion-application xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
                   xsi:schemaLocation="http://www.oracle.com/technology/oracleas/schema http://xmlns.oracle.com/oracleas/schema/orion-application-10_0.xsd"
                   version="10.0"
                   xmlns="http://www.oracle.com/technology/oracleas/schema">
data-sources.xml.xml: (This file has only XML version, I don't believe this is the version I need to change)
<?xml version = '1.0' encoding = 'windows-1250'?>I only have these three files from the table in my application. Do I need application.xml and oc4j-connectors.xml too?
Thank you in advance!
BB

Found some more details on this error in emias.log:
2007-11-21 09:22:54,538 [EMUI_09_22_54_/console/ias/oc4j/deployWiz/webModuleMappings$ctxType1=oracle*_ias$target=MY_AS_INSTANCE*_home$type=oc4j$ctxName1=MY_AS_INSTANCE$selectedStep=1]
ERROR ias.oc4j doWebModulesNavigation.920 - DeployWiz: Caught exception in doWebModulesNavigation
2007-11-21 09:23:49,054 [Thread-24] ERROR ias.oc4j doDeployWork.2628 - DeployWiz: Caught exception in doDeploy
java.lang.NoClassDefFoundError: oracle/dms/instrument/CorrelationContext
at oracle.ias.sysmgmt.task.TaskMaster.setContextECID(Unknown Source)
at oracle.ias.sysmgmt.task.TaskMaster.evaluate(Unknown Source)
at oracle.ias.sysmgmt.deployment.j2ee.console.ApplicationDeployment.deployCommon(Unknown Source)
at oracle.ias.sysmgmt.deployment.j2ee.console.ApplicationDeployment.deploy(Unknown Source)
at oracle.ias.sysmgmt.deployment.j2ee.console.EarDeployerImpl.deploy(Unknown Source)
at oracle.sysman.ias.sta.oc4j.DeployAppAdminObj.deploy(DeployAppAdminObj.java:164)
at oracle.sysman.ias.sta.oc4j.DeployWiz.doDeployWork(DeployWiz.java:2594)
at oracle.sysman.ias.sta.oc4j.DeployWiz.access$000(DeployWiz.java:179)
at oracle.sysman.ias.sta.oc4j.DeployWiz$DeployBean.doWork(DeployWiz.java:3098)
at oracle.sysman.emSDK.eml.util.iAS.ProcessingBean$ProcessingThread.run(ProcessingBean.java:264)
at java.lang.Thread.run(Thread.java:534)
2007-11-21 09:23:49,054 [Thread-24] ERROR ias.IASUtil displayError.753 -
java.lang.NoClassDefFoundError: oracle/dms/instrument/CorrelationContext
at oracle.ias.sysmgmt.task.TaskMaster.setContextECID(Unknown Source)
at oracle.ias.sysmgmt.task.TaskMaster.evaluate(Unknown Source)
at oracle.ias.sysmgmt.deployment.j2ee.console.ApplicationDeployment.deployCommon(Unknown Source)
at oracle.ias.sysmgmt.deployment.j2ee.console.ApplicationDeployment.deploy(Unknown Source)
at oracle.ias.sysmgmt.deployment.j2ee.console.EarDeployerImpl.deploy(Unknown Source)
at oracle.sysman.ias.sta.oc4j.DeployAppAdminObj.deploy(DeployAppAdminObj.java:164)
at oracle.sysman.ias.sta.oc4j.DeployWiz.doDeployWork(DeployWiz.java:2594)
at oracle.sysman.ias.sta.oc4j.DeployWiz.access$000(DeployWiz.java:179)
at oracle.sysman.ias.sta.oc4j.DeployWiz$DeployBean.doWork(DeployWiz.java:3098)
at oracle.sysman.emSDK.eml.util.iAS.ProcessingBean$ProcessingThread.run(ProcessingBean.java:264)
at java.lang.Thread.run(Thread.java:534)
2007-11-21 09:23:49,054 [Thread-24] ERROR util.iAS displayError.369 - An internal error occurred during the operation.
java.lang.NoClassDefFoundError: oracle/core/ojdl/query/LogQueryException
at oracle.sysman.ias.sta.oc4j.DeployWiz.removeAdminObjectsFromCache(DeployWiz.java:2708)
at oracle.sysman.ias.sta.oc4j.DeployWiz.doDeployWork(DeployWiz.java:2648)
at oracle.sysman.ias.sta.oc4j.DeployWiz.access$000(DeployWiz.java:179)
at oracle.sysman.ias.sta.oc4j.DeployWiz$DeployBean.doWork(DeployWiz.java:3098)
at oracle.sysman.emSDK.eml.util.iAS.ProcessingBean$ProcessingThread.run(ProcessingBean.java:264)
at java.lang.Thread.run(Thread.java:534)

Using SDK (SSOToken) with Agent 2.1 on Application Server 8.1

My environment:
Access Manager from JES 2005Q1 unpatched running on Application Server 8.1_02 build b10_fcs
An application � protected by agent 2.1 - running on Application Server 8.1_02 build b10_fcs. The application is also using the API for creating a SSOToken like the code below
SSOTokenManager manager = SSOTokenManager.getInstance();
SSOToken token = manager.createSSOToken(request);At first I always got an SSOException: Data is not Base64 encoded.
Afterwards I changed in AMConfig.properties on the Access Manager the property com.iplanet.am.cookie.encode from true to false. Now I was able to sometimes call the above API code. But sometimes I even did not get access to the application with an �java.lang.RuntimeException: Data is not Base64 encoded. � Exception showing in amSSOProvider debug file on the Agent.
For reference I attach the server debug files and the agent debug files.
Thanks
Felix

Yes there is a MDK 2.1 that you can run in eclipse.
MDK 2.1 was delivered with MI2.1 and was downloadable untill 2.5 was released I believe.
Running MDK2.5 with 2.1 will probably not work. There have been some changes in the sync layer. We've tried without success.
Hope this helps.
Cheers,
Jelle Bloemsma

To create folder in Application server

hi,
How to create folder in application server from presentation server??
how is the program it??
reply me soon...
thx,
s.suresh.

hi Suresh
Hope u r having nice day
here i am sending a sample report which can upload the file to Application Server which inturn automatically create folder .
REPORT ZSHR_UPLOAD_TO_APPLICATION              .
DATA : BEGIN OF IT_MAT OCCURS 0,
          MBRSH LIKE MARA-MBRSH,
          MTART LIKE MARA-MTART,
          MAKTX LIKE MAKT-MAKTX,
          MEINS LIKE MARA-MEINS,
       END OF IT_MAT.
DATA : W_DIR(40).
MOVE 'D:\usr\sap\DEV\DVEBMGS00\work\SHR' TO W_DIR.
"SHR" IS A FOLDER NAME TO BE CREATED
START-OF-SELECTION.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
    FILENAME                     = 'C:\MAT.TXT'
   FILETYPE                      = 'ASC'
   HAS_FIELD_SEPARATOR           = 'X'
TABLES
    DATA_TAB                      = IT_MAT
EXCEPTIONS
   FILE_OPEN_ERROR               = 1
   FILE_READ_ERROR               = 2
   NO_BATCH                      = 3
   GUI_REFUSE_FILETRANSFER       = 4
   INVALID_TYPE                  = 5
   NO_AUTHORITY                  = 6
   UNKNOWN_ERROR                 = 7
   BAD_DATA_FORMAT               = 8
   HEADER_NOT_ALLOWED            = 9
   SEPARATOR_NOT_ALLOWED         = 10
   HEADER_TOO_LONG               = 11
   UNKNOWN_DP_ERROR              = 12
   ACCESS_DENIED                 = 13
   DP_OUT_OF_MEMORY              = 14
   DISK_FULL                     = 15
   DP_TIMEOUT                    = 16
   OTHERS                        = 17.
OPEN DATASET W_DIR FOR OUTPUT IN TEXT MODE ENCODING UTF-8.
IF SY-SUBRC EQ 0.
    LOOP AT IT_MAT.
       TRANSFER IT_MAT TO W_DIR.
    ENDLOOP.
ENDIF.
CLOSE DATASET W_DIR.
IF USEFUL AWARD POINTS.
REGARDS
HEMASEKHARA REDDY S

File from application server -Read and process and delete the file .

Hi All,
         I writing a ZEE program which will read the file from application server(file will be in text delimat format) and moving the data to internal table and uploadind data base.The part which iam facing problem is -
> I hve read the file from application server like below ,
OPEN DATASET ld_file FOR INPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc NE 0.
EXIT.
ELSE.
DO.
    CLEAR: wa_string, wa_uploadtxt.
    READ DATASET ld_file INTO wa_string.
    IF sy-subrc NE 0.
      EXIT.
    ELSE.
      SPLIT wa_string AT con_tab INTO wa_uploadtxt-name1
                                      wa_uploadtxt-name2
                                      wa_uploadtxt-age.
Spliting part i having problem .i need to seperate each field which is seperate from tab delimite and pass it into respective fields of internal table .
Second if another file come to the appicaltion server , wether my first file will be there ? or should i need to delete the first file after redaing how should i proceed further ?.
Regards
SRIRAM...
THANKS In ADVANCE

HI,
1.
OPEN DATASET ld_file FOR INPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc NE 0.
EXIT.
ELSE.
DO.
CLEAR: wa_string, wa_uploadtxt.
READ DATASET ld_file INTO wa_string.
IF sy-subrc NE 0.
EXIT.
ELSE.
SPLIT wa_string AT cl_abap_char_utilities=>horizontal_tab INTO wa_uploadtxt-name1
wa_uploadtxt-name2
wa_uploadtxt-age.
APPEND wa_uploadtxt TO itab.
ENDDO.
CLOSE DATASET ld_file.
ENDIF.
2. If the another file get's generated in the application server with same file name then the data in old file get's over written with the new data. You are not required to delete the file.

File from the Application server

Hi gurus,
I am working on a scenario where I need to get a file from the application server and for this I need to ask user to enter the location and that too at the selection screen and then I need to read this location using open data set and read data set in my program , once I am done with this I need to do some other validations. so can you please help me out how to achieve this.
Thanks
Rajeev Gupta

Hi
Declare the selection screen with file as parameter so that the user enter the application server file..
the use the OPEND DATASET as mentioned in below code and process
Refer this:
http://help.sap.com/saphelp_nw04/helpdata/en/fc/eb3ca6358411d1829f0000e829fbfe/frameset.htm
ABAP code for uploading a TAB delimited file into an internal table. See code below for structures.
*& Report ZUPLOADTAB                                                  *                     &----
*& Example of Uploading tab delimited file                             *
REPORT zuploadtab                    .
PARAMETERS: p_infile LIKE rlgrap-filename
                        OBLIGATORY DEFAULT '/usr/sap/'..
DATA: ld_file LIKE rlgrap-filename.
*Internal tabe to store upload data
TYPES: BEGIN OF t_record,
    name1 like pa0002-VORNA,
    name2 like pa0002-name2,
    age   type i,
    END OF t_record.
DATA: it_record TYPE STANDARD TABLE OF t_record INITIAL SIZE 0,
      wa_record TYPE t_record.
*Text version of data table
TYPES: begin of t_uploadtxt,
name1(10) type c,
name2(15) type c,
age(5) type c,
end of t_uploadtxt.
DATA: wa_uploadtxt TYPE t_uploadtxt.
*String value to data in initially.
DATA: wa_string(255) type c.
constants: con_tab TYPE x VALUE '09'.
*If you have Unicode check active in program attributes then you will
*need to declare constants as follows:
*class cl_abap_char_utilities definition load.
*constants:
   con_tab type c value cl_abap_char_utilities=>HORIZONTAL_TAB.
*START-OF-SELECTION
START-OF-SELECTION.
ld_file = p_infile.
OPEN DATASET ld_file FOR INPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc NE 0.
ELSE.
DO.
    CLEAR: wa_string, wa_uploadtxt.
    READ DATASET ld_file INTO wa_string.
    IF sy-subrc NE 0.
      EXIT.
    ELSE.
      SPLIT wa_string AT con_tab INTO wa_uploadtxt-name1
                                      wa_uploadtxt-name2
                                      wa_uploadtxt-age.
      MOVE-CORRESPONDING wa_uploadtxt TO wa_upload.
      APPEND wa_upload TO it_record.
    ENDIF.
ENDDO.
CLOSE DATASET ld_file.
ENDIF.
*END-OF-SELECTION
END-OF-SELECTION.
*!! Text data is now contained within the internal table IT_RECORD
Display report data for illustration purposes
loop at it_record into wa_record.
    write:/     sy-vline,
           (10) wa_record-name1, sy-vline,
           (10) wa_record-name2, sy-vline,
           (10) wa_record-age, sy-vline.
endloop.
Regards
Anji

Problem in Downloading File from Application Server

Hi All,
We have an Requirement that, iam putting the Flat File
( Output Of a Report ) in to the
Application Server(AL11) By using the OpendataSet, Transer , Close DataSet.
When iam trying to Downloading the Flat File through the FM, GUI_DOWNLOAD, the Data is coming Correctly.
But the Problem is , when trying to Downloading through AL11 i.e System -> List -> Local File it is not coming Correctly.
( Java People is going to Connect with the Application Server for the Flat File )
Kindly Clarify the Problem.
Points will be Rewarded.
Regards,
Kiran.I

Hi nl,
1. this program will display
   selection screen
and ask two things :
a) application server filename
b) local file name
2. then it will download the file
(the file name is CASE Sensitivie)
3. just try it (just copy paste )
*& Report YBCR_FILEDOWNLOAD                                           *
REPORT ybcr_filedownload                       .
DATA
DATA : file_name TYPE string.
DATA : BEGIN OF itab OCCURS 0,
       ln(255) TYPE c,
       END OF itab.
SCREEN
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS : appfn(150) TYPE c LOWER CASE OBLIGATORY.
PARAMETERS : p_file LIKE rlgrap-filename OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION SCREEN
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CLEAR p_file.
CALL FUNCTION 'F4_FILENAME'
    IMPORTING
      file_name = p_file.
file_name = p_file.
START-OF-SELECTION
START-OF-SELECTION.
OPEN DATASET appfn FOR INPUT IN TEXT MODE ENCODING DEFAULT .
IF sy-subrc <> 0.
    MESSAGE s999(yhr) WITH 'COULD NOT OPEN FILE ON APP SERVER'.
    LEAVE LIST-PROCESSING.
ENDIF.
DO.
    READ DATASET appfn INTO itab.
    IF sy-subrc = 0.
      APPEND itab.
    ELSE.
      EXIT.
    ENDIF.
ENDDO.
file_name = p_file.
CALL FUNCTION 'GUI_DOWNLOAD'
    EXPORTING
BIN_FILESIZE                    =
      filename                        = file_name
FILETYPE                        = 'ASC'
APPEND                          = ' '
WRITE_FIELD_SEPARATOR           = ' '
HEADER                          = '00'
TRUNC_TRAILING_BLANKS           = ' '
WRITE_LF                        = 'X'
COL_SELECT                      = ' '
COL_SELECT_MASK                 = ' '
DAT_MODE                        = ' '
CONFIRM_OVERWRITE               = ' '
NO_AUTH_CHECK                   = ' '
CODEPAGE                        = ' '
IGNORE_CERR                     = ABAP_TRUE
REPLACEMENT                     = '#'
WRITE_BOM                       = ' '
TRUNC_TRAILING_BLANKS_EOL       = 'X'
WK1_N_FORMAT                    = ' '
WK1_N_SIZE                      = ' '
WK1_T_FORMAT                    = ' '
WK1_T_SIZE                      = ' '
IMPORTING
FILELENGTH                      =
    TABLES
      data_tab                        = itab
FIELDNAMES                      =
EXCEPTIONS
FILE_WRITE_ERROR                = 1
NO_BATCH                        = 2
GUI_REFUSE_FILETRANSFER         = 3
INVALID_TYPE                    = 4
NO_AUTHORITY                    = 5
UNKNOWN_ERROR                   = 6
HEADER_NOT_ALLOWED              = 7
SEPARATOR_NOT_ALLOWED           = 8
FILESIZE_NOT_ALLOWED            = 9
HEADER_TOO_LONG                 = 10
DP_ERROR_CREATE                 = 11
DP_ERROR_SEND                   = 12
DP_ERROR_WRITE                  = 13
UNKNOWN_DP_ERROR                = 14
ACCESS_DENIED                   = 15
DP_OUT_OF_MEMORY                = 16
DISK_FULL                       = 17
DP_TIMEOUT                      = 18
FILE_NOT_FOUND                  = 19
DATAPROVIDER_EXCEPTION          = 20
CONTROL_FLUSH_ERROR             = 21
OTHERS                          = 22
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
regards,
amit m.

Problem Reading Flat File from Application server

Hi All,
I want to upload a Flat File which is having a Line Length of 3000.
While uploading it to Application server , only upto 555 length it is getting uploaded .
i am using the code :
DATA: BEGIN OF TB_DATA OCCURS 0,
        LINE(3000),
      END OF TB_DATA.
*----Uploading the flat file from the Local drive using FM "UPLOAD".
OPEN DATASET TB_FILENAM-DATA FOR OUTPUT IN TEXT MODE." ENCODING DEFAULT.
IF SY-SUBRC NE 0.
WRITE:/ 'Unable to open file:', TB_FILENAM-DATA.
ELSE.
LOOP AT TB_DATA.
    TRANSFER TB_DATA TO TB_FILENAM-DATA.
ENDLOOP.
ENDIF.
CLOSE DATASET TB_FILENAM-DATA.
What could be the problem?
Could it be due to any Configuration Problem?
Waiting for your replies.
Thanks and Regards.
Suki

Your code looks OK, but you may have touble displaying the full width. Try:
WRITE: /001 TB_FILENAM-DATA+555.
(And don't forget to append your ITAB after each read.)
Rob

Opening the Excel file from Application server

Hi All,
I had uploaded an excel file on the application server for using it in my program .
But when i am opening the uploaded file on the Application server it shows some special characters and those are also displayed on my report output while reading the file from the application server.
Please suggest how to get rid of those special characters.
my open data set statement is
OPEN DATASET pg_out2 FOR INPUT IN TEXT MODE ENCODING NON-UNICODE.

Hi ,
if it a Excel file ..
do the following..
    OPEN DATASET pg_out2              "appl file
            FOR INPUT IN TEXT MODE
            ENCODING DEFAULT.
    IF sy-subrc EQ 0.
      DO.
        READ DATASET p_infile INTO w_temp.
*       Condition To check when cursor reaches End Of file
        IF sy-subrc EQ 0.
          PERFORM f_split_appl_data.
        ELSE.
          EXIT.
        ENDIF.
      ENDDO.
      CLOSE DATASET p_infile.
    ELSE.
      MESSAGE 'Error in opening file' type 'E'.
    ENDIF.
FORM f_split_appl_data .
SPLIT w_temp AT ',' INTO : wa_inputfile-plannum ......   "Split at , for excel or CSV file formats at appl files
APPEND wa_inputfile TO t_inputfile.
ENDFORM.                    " F_SPLIT_APPL_DATA
Prabhudas

Encoding in Application Server

Similar Messages

Maybe you are looking for