1099 Form file download is picking incorrect data
Hi All,
Does any body have idea about 1099 form. Please reply.
Actually I am getting some SAP standard addresses printed while downloading the file to legacy.
Thanks & Regards,
swapnil
hard coding in DMEE Tree
Similar Messages
-
Text File is not picking with data
Hi Experts,
I am doing file to file scenario without IR as file will be generated by the ECC system and places in SAP FTP App Server.
My job is to pick up the file and send it to the Third Party Application Server.
But when i am picking up the Text file the data in the file is converting into special characters like below format.
ÅÁÄÅÙ@ððððððâÖÕÄÅçöôðð@@@@@@òððùð÷ñ÷ðñ%@@@@@@@@@@@@@@òððùð÷ñ÷%ÄÅãÁÉÓ@ðððð
I have tested with other Application server with same file its working fine, but when i send the file from SAP FTP Appl server the data is converting in the above format.
Right now when i open file zilla it is opening with 3 FTP Appl Server in that suppose lets say the FTP are APP1, APP2, APP3.
1.When i send the file from APP1 through Transport Protocol NFS System the file is picking up and placing successfully in the Third Party APP3 App Server fiolder but the data in the file is converting into special charaters.
2.when i send the same file from APP2 through Transport Protocal FTP the file is picking up and placing successfully in the third party APP3 App server and here the same data is coming in the text file, there is no data conversion.
I am not getting here, when i send the file from APP1 the data is converting but when i send the same file from APP2 App srever the data is posting correctly.
And also i can give you one more info.. if i try with puting the Transport Protocal as FTP in APP1 then i am getting error in sender comm channel as 'log on attempt by User JOHN rejected' : contact your FTP server vendor.
But i think for sending the file from SAP Appl Server we can use TP as NFS rather than FTP.
And also i can give one more info: The Version is the ECC system is using the 4.6c for which there is no compatability for unicodes.
Can anyone please advise what would be the wrong.
Appreciate your inputs
Thanks,
BhaskarHi,
Reason because file is not picked up.
>'log on attempt by User JOHN rejected' : contact your FTP server vendor.
clearly user/password for this FTP server or system is not correct. Get correct userid/password for your Application server where you are trying to poll.
>The Version is the ECC system is using the 4.6c for which there is no compatability for unicodes
File transfer is nothing to unicode here.
Regards,
Gourav -
Issue with file download from BLOB type data
i have been using this for a while, with no problems, including on hosted machines.
the upload to the database works fine.. not the issue, and the download script also works fine, on the local WAMP machine.
but once moved to the server it fails.. the query does not work.
i have a feeling that it is something to do with the managed hosting i am using, but they say no, i have tried it on 2 seperate hosted machines (different providers), with no joy.
if i run the select query on the hoisting server via phpmyadmin, the query runs ok.
any suggestions as to what may be causing the problem on the server compared to the local WAMP machine?
i really don't know where to start looking, or where to point the hosting company.
This is the php code to download the blob data, works fine on local WAMP setup, browser asks if you want to save the file/open etc. as expected.
<?php require_once('Connections/connTracker.php'); ?>
<?php
// if id is set then get the file with the id from database
if(isset($_GET['docindex']))
{$id = $_GET['docindex'];
$query = "SELECT document_name, document_type, document_size, document_content " .
"FROM tracker_documents WHERE document_index = ".$id;
*** seems to be failing here when running the query ***
$result = mysql_query($query) or die('Error, query failed');
list($name, $type, $size, $content) = mysql_fetch_array($result);
header("Cache-Control: maxage=1"); //In seconds
header("Pragma: public");
header("Content-length: $size");
header("Content-type: $type");
header("Content-Disposition: attachment; filename=$name");
echo html_entity_decode ($content);}
exit;
?>Hi Gun,
You are the only one responded to my issue. I have allocated some points.
Yes. I have checked the assignment in CRM organizational model.
I did download the org. structure from ECC 5.0
All objects including sales offices are activated for determination and I have verified with green light
As per your suggestion if the sales area data is not matched between the two systems, then how come the error will not reappear during the bdoc reprocess?
What is missing during the first time bdoc process? Looks something is missing for validation module?
Any inputs?
Thanks,
Raj -
Is it wise to keep the Nikon camera files "DSC's" after downloading them and converting to DNG files via Adobe converter for lightroom use. In other words do the DNG files have all the raw data I would ever need in processing or should I save the camera's DSC files?
DNG files do not contain some metadata supplied by the camera, which can be used by the manufacturer's software. Thus, if you don't keep the original Raw photo, you will lose this information.
If your 1000% sure you're never going to use the manufacturer's software, then this isn't a problem. But who can be sure what software you will be using 10 years from now? -
When I try to download a software up date for another program in Binary File (eg. C Cleaner or a Microsoft file) in Firefox they all just come up in the download window as 'Canceled'? When I go to the destination folder the download file icon is there with 0 Kb's for size...Then when I click 'RETRY' the download it appears to download fully, but when I go into the destination folder the downloaded file is not there? I need to know if there is something in the Firefox options to resolve this problem or much more!!
If all .exe files are blocked, antivirus software is most likely configured to block them. See if you can download these with your antivirus and/or security software disabled.
-
In Firefox 4 how can I cause the date on downloaded files to be the current date? (Some are and some are not. In FF3 the dates were ALWAYS the current ones.)
== This happened ==
Every time Firefox opened
== I upgraded to Firefox 4 (beta)Firefox 3.6.* and earlier set the downloaded file's modification time to the current time. In Firefox 4.0 the behavior has been changed, if a server returns a timestamp telling when the file was last modified (Last-Modified header), it is used instead.
You can revert to the previous behaviour by using the [https://addons.mozilla.org/en-US/firefox/addon/93121/ Download Timestamp] add-on. -
How to import a flv-file (downloaded form YouTube) into iMovie?
How to import a flv-file (downloaded form YouTube) into iMovie?
It needs to be converted to which format?
Suggestions how to do that?
Thanks.
Mattie
The Netherlandshttp://perian.org (free).
QuickTime Player Pro ($30). -
Upload and Download Errror " File does not contain valid data"
We are on the ECC 6.0 Unicode system.
I dowloaded the Role from QA server and tried to upload into DEV box.
I am getting the Error " File does not contain valid data".
However, when I downloaded the Role, it was done successfully.
Please let me know if anyone has that problem.
Thanks,
From
PRANAVThis is what I see here.
DATE 20090716 131756RELEASE 700LOADED_AGRS Z_BI_HR_REPORTING_FUNCTIONALAGR_DEFINE 210Z_BI_HR_REPORTING_FUNCTIONAL PTHAKER 20080523131557000000000000000PTHAKER 20090709142400000000000000000AGR_TCODES 210Z_BI_HR_REPORTING_FUNCTIONAL TRRRMX X 00000AGR_1250 210Z_BI_HR_REPORTING_FUNCTIONAL 000001S_RFC T-BD90003500 U O000004Authorization Check for RFC AccessAGR_1250 210Z_BI_HR_REPORTING_FUNCTIONAL 000002S_RS_AUTH T-BD90003500 U O000013BI Analysis Authorizations in RoleAGR_1250 210Z_BI_HR_REPORTING_FUNCTIONAL 000003S_RS_COMP T-BD90003500 U O000016Business Explorer - ComponentsAGR_1250 210Z_BI_HR_REPORTING_FUNCTIONAL 000004S_RS_COMP1T-BD90003500 U O000023Business Explorer - Components: Enhancements to the OwnerAGR_1250 210Z_BI_HR_REPORTING_FUNCTIONAL 000005S_RS_FOLD T-BD90003500 U O000029Business Explorer - Folder View On/OffAGR_1250 210Z_BI_HR_REPORTING_FUNCTIONAL 000006S_RS_HIER T-BD90003500 U O000032Data Warehousing Workbench - HierarchyAGR_1250 210Z_BI_HR_REPORTING_FUNCTIONAL 000007S_RS_ODSO T-BD90003500 U O000038Data Warehousing Workbench - DataStore ObjectAGR_1250 210Z_BI_HR_REPORTING_FUNCTIONAL 000008S_RS_PARAMT-BD90003500 U O000045Business Explorer - Variants in Variable ScreenAGR_1250 210Z_BI_HR_REPORTING_FUNCTIONAL 000009S_TCODE T-BD90003500 S O000009Transaction Code Check at Transaction StartAGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000001S_RS_COMP T-BD90003500 RSZCOMPTP CKF U O000021AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000002S_RS_COMP T-BD90003500 RSZCOMPID * U O000020AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000003S_RS_COMP1T-BD90003500 RSZCOMPID ZHCM* U O000025AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000004S_TCODE T-BD90003500 TCD RRMX S O000010AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000005S_RS_HIER T-BD90003500 ACTVT 71 U O000033AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000006S_RS_HIER T-BD90003500 RSHIENM * U O000034AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000007S_RS_HIER T-BD90003500 RSIOBJNM * U O000035AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000008S_RS_HIER T-BD90003500 RSVERSION * U O000036AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000009S_RS_PARAMT-BD90003500 PARAMNM * U O000047AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000010S_RS_COMP T-BD90003500 RSINFOAREAZPA_ECM* U O000018AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000011S_RS_ODSO T-BD90003500 RSINFOAREAZPA_ECM* U O000040AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000012S_RS_COMP1T-BD90003500 RSZCOMPID ZPAOS* U O000025AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000013S_RS_ODSO T-BD90003500 ACTVT 03 U O000039AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000014S_RS_COMP1T-BD90003500 RSZCOMPID ZPAPA* U O000025AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000015S_RS_ODSO T-BD90003500 RSODSOBJ * U O000041AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000016S_RS_ODSO T-BD90003500 RSODSPART DATA U O000042AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000017S_RS_ODSO T-BD90003500 RSODSPART DEFINITION U O000042AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000018S_RS_ODSO T-BD90003500 RSODSPART EXPORTISRC U O000042AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000019S_RS_ODSO T-BD90003500 RSODSPART UPDATERULE U O000042AGR_1251 210Z_BI_HR_REPORTING_FUNCTIONAL 000020S_RS_COMP T-BD90003500 ACTVT 03 U O000017AGR_1251 -
Downloading pipe delimited text file on to desktop with data in internal
hi all,
how to download pipe delimited text file on to desktop with data in internal
table with an example plz.hi,
u can use the FM GUI_DOWNLOAD.
here is the sample code.
*Internal table to hold the employee details
DATA: it_details TYPE STANDARD TABLE OF x_details,
wa_details TYPE x_details.
*Internal table for file
DATA: BEGIN OF it_details_txt OCCURS 0,
line(700),
END OF it_details_txt.
*Employee details for the file
CLEAR wa_details.
LOOP AT it_details INTO wa_details.
CLEAR it_details_txt.
CONCATENATE
wa_details-var1
wa_details-var2
wa_details-var3
wa_details-var4
INTO it_details_txt-line SEPARATED BY '|'.
APPEND it_details_txt.
CLEAR wa_details.
ENDLOOP.
*Download file in .TXT format to local desktop
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
filename = 'data.txt'
filetype = 'ASC'
TABLES
data_tab = it_details_txt
EXCEPTIONS
file_open_error = 1
file_write_error = 2
invalid_filesize = 3
invalid_type = 4
no_batch = 5
unknown_error = 6
invalid_table_width = 7
gui_refuse_filetransfer = 8
customer_error = 9
no_authority = 10
OTHERS = 11.
IF sy-subrc = 0.
MESSAGE 'Data downloaded successfully' TYPE 'S'.
ENDIF. -
Cs3 Indesign problem - Pulling incorrect data from an .xlsm file.. please help
Hello,
I am hoping someone can provide me some answers here, as this problem has stumped me for a couple of days now.
I am using Adobe Indesign Cs3 - and I have been pulling excel tables into the .indd file with no problem. However, I had to upragde my version of 2003 excel, to the newer 2007 version, which inlcluded having to update the base excel files to .xlsm from their previous .xls versions.
I did not change anything else with the files.. simply used 'save as' to update the files.
After the upgrade, I relinked all instances of tables for the .indd file, and all seemed to be fine. Except when I look at anything that was pulled in as a date, is now pulling in 4 years and one day behind what it is written as in the .xlsm file it is being pulled from.
It doesnt make any sense to me how Indesign can be pulling in figures differently than how they are written in the Excel file it is pulling the data from.
Hopefully this makes sense, and someone will be able to help me here
Thanks
JAye.. the reason I have had to upgrade the excel files is because of the column limit in the .xls format. 2003 excel files will only allow columns up until the IV limit.. and my data now goes past that.
Since Indesign seems to have a huge problem trying to draw excel data/tables from anything other than 1 worksheet in an excel file, Ive had to try and create an .xlsx or .xlsm file to give me the extra columns I need for my data.
As for changing my source files.. that would be fine. Ive tried a few things with the dates, but nothing I've tried has worked so far. It reeks of a 1904 date system problem, becuase of the exact 4 years and one day off that indesign is pulling in (if you are familar with the 1904 date setting in excel, you will undertsand what Im saying) but why indesign is pulling in different data than what is visible in the source file is beyond me.
Example, the source file has a date: July 15, 2010. Indesign is pulling in July 14, 2006.
It is really bizzare. -
TAx Reporter Temse Files Download Automation
Hi,
I have a reuiqrement to download the Temse files generated in Tax Reporter. I have completed the code and it works fine if we run the program in foreground. But when I run the same program in background some Temse files downloaded have junk characters. If I download the same Temse file in foreground it works fine.
There seems to be some issue with the FM when I run my progam in background.
I have searched SDN and SAP Notes for any clues but did not get any.
REPORT ZPHOP_TEMSE NO STANDARD PAGE HEADING
LINE-SIZE 1023
LINE-COUNT 65
MESSAGE-ID zz.
DATA: BEGIN OF tape OCCURS 1,
DATA(2000),
END OF tape.
DATA: force_ascii type c VALUE 'T'.
DATA: BEGIN OF int_msgs2 OCCURS 10,
errnum(2) TYPE c,
text1(8) TYPE c,
text2(60) TYPE c,
END OF int_msgs2.
DATA: BEGIN OF g_int_temse OCCURS 0,
dname LIKE TST01-dname,
dpart LIKE TST01-dpart,
dcretime LIKE TST01-DCRETIME,
dcreater LIKE TST01-DCREATER,
END OF g_int_temse.
DATA: record_length TYPE i VALUE 275,
data_length TYPE i,
convert_to_ebcdic,
filesize TYPE i,
number_of_records TYPE i VALUE 1,
filetype(3) VALUE 'BIN',
conv TYPE REF TO cl_abap_conv_out_ce,
dline TYPE REF TO data,
dtab TYPE REF TO data,
p_compid(4),
p_pswd(8),
g_str(2000),
uc_filename TYPE string.
DATA: l_nm_fixed_record.
CONSTANTS: c_lpath TYPE pathintern VALUE 'ZOUT'.
TABLES: TST01, ZPHOPFLS, ZTEMSE_LOG, V_5UXY_A.
FIELD-SYMBOLS: <dtab> TYPE STANDARD TABLE,
<dline> TYPE ANY.
INCLUDE: dbpnpcom. " No logical database Do not modify!
INCLUDE: zphoptop, " Top Include Do not modify!
zphopfil. " File inlcude Do not modify!
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE text-T01.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(30) text-001.
SELECT-OPTIONS s_temse FOR TST01-dname NO INTERVALS.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE text-T02.
SELECT-OPTIONS s_cai FOR TST01-DCREATER NO INTERVALS.
SELECT-OPTIONS s_date FOR sy-datum.
SELECTION-SCREEN END OF BLOCK B2.
SELECTION-SCREEN BEGIN OF BLOCK B3 WITH FRAME TITLE text-T03.
PARAMETERS: p_ifid LIKE t9aoa-if_id MODIF ID DIS ,
p_fileid LIKE t9aoa-file_id MODIF ID DIS,
p_unixf(60) LOWER CASE MODIF ID DIS,
p_uxdir TYPE pathextern LOWER CASE MODIF ID DIS,
p_dstfil(45) LOWER CASE MODIF ID DIS.
SELECTION-SCREEN END OF BLOCK B3.
PARAMETERS: p_skip AS CHECKBOX.
DATA: ws_unixr LIKE p_unixf,
ws_trans LIKE p_unixf.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF screen-group1 = 'DIS'.
screen-output = '1'.
screen-input = '0'.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
INITIALIZATION.
p_ifid = 'PAYFLS'.
p_compid = 'HR00'.
p_fileid = '01'.
p_unixf = 'AFS'.
p_pswd = 'chevr123'.
p_skip = 'X'.
-End of Initialization--
PERFORM get_physical_path.
FORMAT COLOR COL_HEADING.
WRITE: /01 text-t04,
10 sy-pagno,
41 text-t05,
110 text-t06,
123 sy-datum.
WRITE: /01 text-t08,
14 sy-repid,
110 text-t07,
125 sy-uzeit.
FORMAT COLOR OFF.
SKIP.
WRITE: /(20) text-T21 CENTERED COLOR COL_HEADING,
(15) text-T22 CENTERED COLOR COL_HEADING,
(20) text-T23 CENTERED COLOR COL_HEADING,
(15) text-T24 CENTERED COLOR COL_HEADING,
(40) text-T25 CENTERED COLOR COL_HEADING.
START-OF-SELECTION.
*Do not allow background processing
*Check if the Temse file and CAI both are entered
IF NOT S_TEMSE IS INITIAL AND NOT S_CAI IS INITIAL.
MESSAGE W999 WITH TEXT-E01.
ELSEIF S_TEMSE IS INITIAL AND S_CAI IS INITIAL.
MESSAGE W999 WITH TEXT-E02.
ENDIF.
Collect all temse filenames from TST01 into an internal table.
IF NOT s_temse IS INITIAL.
SELECT dname dpart dcretime dcreater FROM TST01 INTO TABLE g_int_temse
WHERE dname in s_temse
AND dpart EQ '1'.
ELSE.
SELECT * FROM TST01
WHERE DCREATER in s_cai
AND DPART EQ '1'.
IF TST01-DCRETIME(8) GE s_date-low
AND TST01-DCRETIME(8) LE s_date-high.
MOVE-CORRESPONDING TST01 TO g_int_temse.
APPEND g_int_temse.
ENDIF.
ENDSELECT.
ENDIF.
SORT g_int_temse BY DNAME DPART DCRETIME.
LOOP AT g_int_temse.
Check if the temse file is already processed in ZTEMSE_LOG table.
SELECT SINGLE * FROM ZTEMSE_LOG
WHERE DNAME = g_int_temse-dname.
IF sy-subrc EQ 0.
error. Temse already processed
CONTINUE.
ENDIF.
Check if the temse file bieng processed is the eligible temse file
SELECT SINGLE * FROM V_5UXY_A
WHERE TSOBJ = g_int_temse-dname.
IF sy-subrc EQ 0.
SELECT SINGLE * FROM ZPHOPFLS
WHERE TAXAU = V_5UXY_A-TAXAU
AND TXFRM = V_5UXY_A-TXFRM.
IF sy-subrc EQ 0.
Generate the filename for the target destination
CONCATENATE ZPHOPFLS-FILENAME '.' sy-datum '.' sy-uzeit INTO p_dstfil.
ELSE.
error. Script not maintained in ZPHOPFLS table
CONTINUE.
ENDIF.
ELSE.
error. Temse file is not the latest processed file.
CONTINUE.
ENDIF.
CALL FUNCTION 'RP_TS_OPEN'
EXPORTING
tsobj = g_int_temse-dname
versn = g_int_temse-dpart
empfg = 'RPUTSVUM'.
COMMIT WORK.
REFRESH tape.
CLEAR tape.
Einlesen von der TemSe
CALL FUNCTION 'RSTS_READ'
EXPORTING
PARTS1BY1 = 'X'
TABLES
datatab = tape.
CALL FUNCTION 'RSTS_CLOSE'.
Read the 1st line which is supposed to contains info important for
the downloading procedure. The syntax of the line is :
SAPxxxnnnyyyy - the 1st 3 char 'SAP' indicates this line contains
download related info. xxx can either be 'ASC' (for ASCII) or 'EBC'
(for EBCDIC). nnn is the length of each record, e.g. 128 for SSA disk
format, 275 for SSA tape format etc. yyyy can either be 'CRLF' (each
record is delimited by CRLF) or blank (no CRLF).
After processing the 1st line, the line is deleted from the internal
table. Downloading begins on the 2nd line.
READ TABLE tape INDEX 1.
IF tape-data(3) EQ 'SAP'.
IF tape-data+3(3) EQ 'EBC'.
convert_to_ebcdic = 'x'.
ELSEIF tape-data+3(3) EQ 'ASC'
AND force_ascii EQ 'T'.
filetype = 'ASC'.
ENDIF.
IF tape-data+6(3) NA '*'.
record_length = tape-data+6(3).
ELSE.
record_length = tape-data+13(4).
ENDIF.
IF tape-data+9(4) EQ 'CRLF'.
data_length = record_length + 2.
ELSE.
data_length = record_length.
ENDIF.
DELETE tape INDEX 1.
ELSE.
data_length = record_length.
ENDIF.
Transfer the Temse file data to Unix file.
PERFORM transfer_file.
Update the Log table with the temse details.
ZTEMSE_LOG-dname = g_int_temse-dname.
ZTEMSE_LOG-txcmp = V_5UXY_A-taxau.
ZTEMSE_LOG-txfrm = V_5UXY_A-txfrm.
ZTEMSE_LOG-filename = ws_unixr.
ZTEMSE_LOG-DCREATER = g_int_temse-dcreater.
INSERT ZTEMSE_LOG.
WRITE: /(20) ZTEMSE_LOG-dname,
(15) ZTEMSE_LOG-txcmp,
(20) ZTEMSE_LOG-txfrm,
(15) ZTEMSE_LOG-dcreater,
(40) ZTEMSE_LOG-filename.
ENDLOOP.
*& Form get_physical_path
Get Physical directory name for the given logical path name
FORM get_physical_path .
CALL FUNCTION 'ZFILE_GET_PATH_NAME'
EXPORTING
LOGICAL_PATH = c_lpath
IMPORTING
FILE_NAME_PATH = p_uxdir
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_physical_path
*& Form TRANSFER_FILE
FORM transfer_file.
p_unixf = 'AFS'.
Concatenate Date with Unix File name
CONCATENATE p_unixf '.' p_compid '.' p_ifid '.' sy-datum '.' sy-uzeit INTO ws_unixr.
Concatenate Unix Directory with Unix File for Outbound
CONCATENATE p_uxdir ws_unixr INTO p_unixf.
PERFORM open_files USING p_unixf.
LOOP AT tape.
g_str = tape-data(record_length).
TRANSFER g_str TO p_unixf LENGTH record_length.
IF sy-subrc <> 0.
MESSAGE ID '00' TYPE 'E' NUMBER '398' WITH 'sy-subrc:' sy-subrc
' Error Transferring to: ' p_unixf.
ENDIF.
ENDLOOP.
PERFORM close_files USING p_unixf.
ENDFORM. " TRANSFER_FILE
Can anyone please check and tell me what I need to overcome this problem.Hi Bhaskar,
I also have the same requirement to upload TemSe files in to application server.
In FDTA tcode after we enter company code and click on enter.
In the second screen checking and line item and go to edit and click on download button.
Here we see a popup with default file name, and when we say ok the file will get downloaded into C:\.....
Here our req is to upload the file automatically pick up via batch job and place it in the in to the application server and from there it should be placed in the Netwrok server (UNIX).
Pls provide me with suitable code so that i can finish it off.I tried a lot but did not work.
Thanks. -
When i try to run my jsp i get "File Download Security Warning"
Hi,
I have created a jsp file which is called UpdateEmpDetails1.jsp
This jsp file picks up the employee id of the employee and transfers it to the backend servlet called UpdateEmpDetails1.java. The backend servlet looks up the table stored in the database and pulls up all the information stored corresponding to the employee id.Then the servlet stores the information in a session object and forwards it to the UpdateEmpDetails2.jsp
I display the information which has been forwarded by the servlet in the HTML fields of UpdateEmpDetails2.jsp.
Here the manager can also update the information. When he clicks on submit, the second serlvet UpdateEmpDetails2.java which is linked to UpdateEmpDetails2.jsp picks up the updated information and updates the database. The servlet also displays the message "Your information has been updated". But here is the real problem
The session variables are being transferred perfectly to the jsp file UpdateEmpDetails2.jsp.
But when i make any changes to this file and click on submit I get File Download Security Warning. It Says:
File Download Security Warning
Do you want to save this file
Name UpdateEmpDetails2
Type UnknownFileType
From LocalHost
Then I get another file which says
FileDownload
Getting FIle Information
UpdateEmpDetails2 from localhost
Estimated time left
Download to:
Transfer rate:
Close this dialog box when download is complete
I am just simply not able to update the employee information in the database due to this message.this is what i am trying to do:
my UpdateEmpDetails1.jsp is as follows:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional //EN">
<html>
<head>
<title>UpdateEmpDetails1.jsp</title>
<link REL=STYLESHEET
HREF="JSP-Styles.css"
TYPE="text/css">
</head>
<body BGCOLOR="lightyellow" text="black">
<h2 align="left"><font color="black">Update Employee Details Page</font></h2>
<form action="UpdateEmpDetails2" Method="Get">
<h2 align="left">Please enter the Employee ID of the employee whose details you want to edit</h2>
<table width=50% align="center">
<tr><td>Employee ID : </td>
<td><INPUT TYPE="TEXT" name="employeeid"><br></td></tr>
<tr><td><center><INPUT TYPE="SUBMIT" VALUE="SUBMIT"></center></td></tr>
<tr><td><center><INPUT TYPE="RESET" VALUE="RESET"></center></td></tr>
</table>
</form>
</body>
</html>
my update EmpDetails1.java is as follows:
package com.update;
import com.database.*;
import java.io.*;
import java.sql.*;
import javax.servlet.http.*;
import javax.servlet.*;
public class UpdateEmpDetails1 extends HttpServlet
public void doGet(HttpServletRequest request,HttpServletResponse response)throws ServletException,IOException
HttpSession session = request.getSession();
String X = request.getParameter("employeeid");
System.out.println("Employee ID:" + X);
//Establishing the jdbc connection
try
Database db = new Database();
Connection con = db.useConnection();
String query = "Select * from employees where employeeid=?";
PreparedStatement stat = con.prepareStatement(query);
System.out.println(stat);
stat.setString(1,X);
ResultSet rs = stat.executeQuery();
while(rs.next())
String A = rs.getString("employeeid");
String B = rs.getString("firstname");
String C = rs.getString("lastname");
String D = rs.getString("gender");
String E = rs.getString("dateofbirth");
String F = rs.getString("address");
String G = rs.getString("postalcode");
String H = rs.getString("phone");
String I = rs.getString("mobile");
String J = rs.getString("designation");
String K = rs.getString("joindate");
String L = rs.getString("leavedate");
String M = rs.getString("email");
String N = rs.getString("qualification");
String O = rs.getString("empstatus");
System.out.println("comparison successful");
session.setAttribute("employeeid",A);
session.setAttribute("firstname", B);
session.setAttribute("lastname", C);
session.setAttribute("gender", D);
session.setAttribute("dateofbirth", E);
session.setAttribute("address", F);
session.setAttribute("postalcode", G);
session.setAttribute("phone", H);
session.setAttribute("mobile", I);
session.setAttribute("designation", J);
session.setAttribute("joindate", K);
session.setAttribute("leavedate", L);
session.setAttribute("email", M);
session.setAttribute("qualification", N);
session.setAttribute("empstatus", O);
String url="/UpdateEmpDetails2.jsp";
RequestDispatcher dis = request.getRequestDispatcher("/UpdateEmpDetails2.jsp");
System.out.println("Dispatching" + dis);
dis.forward(request, response);
catch(Exception e)
System.out.println(e);
my UpdateEmpDetails2.jsp is as follows:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title>UpdateEmpDetails2.jsp</title>
<link REL=STYLESHEET
HREF="JSP-Styles.css"
TYPE="text/css">
</head>
<body BGCOLOR="lightblue" text="black">
<h1 align="center"><font color="black">Update Employee Details Page</font></h1>
<form action="UpdateEmpDetails2" Method="Get">
<table width=50% align="center">
<tr><td>EMPLOYEE ID:</td>
<td><INPUT TYPE = "HIDDEN" name="employeeid" value=<%=session.getAttribute("employeeid")%> ></td></tr>
<tr><td>FIRST NAME :</td>
<td><INPUT TYPE = "TEXT" name="firstname" value=<%=session.getAttribute("firstname")%> ></td></tr>
<tr><td>LAST NAME :</td>
<td><INPUT TYPE = "TEXT" name="lastname" value=<%=session.getAttribute("lastname")%> ><br></td></tr>
<tr><td>GENDER :</td>
<td><INPUT TYPE = "TEXT" name="gender" value=<%=session.getAttribute("gender")%> ><br></td></tr>
<tr><td>DATE OF BIRTH (IN MM/DD/YYYY FORMAT) :</td>
<td><INPUT TYPE = "TEXT" name="dateofbirth" value=<%=session.getAttribute("dateofbirth")%> ><br></td><tr>
<tr><td>ADDRESS :</td>
<td><INPUT TYPE = "TEXT" name="address" value=<%=session.getAttribute("address")%> ><br></td></tr>
<tr><td>POSTALCODE:</td>
<td><INPUT TYPE = "TEXT" name="postalcode" value=<%=session.getAttribute("postalcode")%>><br></td></tr>
<tr><td>PHONE:</td>
<td><INPUT TYPE = "TEXT" name="phone" value=<%=session.getAttribute("phone")%> ><br></td></tr>
<tr><td>MOBILE:</td>
<td><INPUT TYPE = "TEXT" name="mobile" value=<%=session.getAttribute("mobile")%> ><br></td></tr>
<tr><td>DESIGNATION : </td>
<td><INPUT TYPE="TEXT" name="designation" value=<%=session.getAttribute("designation")%> > <br></td></tr>
<tr><td>JOIN DATE:</td>
<td><INPUT TYPE = "TEXT" name="joindate" value=<%=session.getAttribute("joindate")%> ><br></td></tr>
<tr><td>LEAVE DATE:</td>
<td><INPUT TYPE = "TEXT" name="leavedate" value=<%=session.getAttribute("leavedate")%> > <br></td></tr>
<tr><td>EMPLOYEE EMAIL:</td>
<td><INPUT TYPE = "TEXT" name="email" value=<%=session.getAttribute("email")%> ><br></td></tr>
<tr><td>EMPLOYEE QUALIFICATION:</td>
<td><INPUT TYPE = "TEXT" name="qualification" value=<%=session.getAttribute("qualification")%> > <br></td></tr>
<tr><td>EMPLOYEE STATUS:</td>
<td><INPUT TYPE = "TEXT" name="empstatus" value=<%=session.getAttribute("empstatus")%> > <br></td></tr>
<tr><td><center><INPUT TYPE="SUBMIT" VALUE="SUBMIT"></center></td></tr>
<tr><td><center><INPUT TYPE="RESET" VALUE="RESET"></center></td></tr>
</table>
</form>
</body>
</html>
my UpdateEmpDetails2.java is as follows:
package com.update;
import java.io.*;
import java.sql.*;
import javax.servlet.http.*;
import javax.servlet.*;
import com.database.*;
public class UpdateEmpDetails2 extends HttpServlet
public void doGet(HttpServletRequest request,HttpServletResponse response)throws ServletException,IOException
PrintWriter out = response.getWriter();
response.setContentType("texthtml");
String A = request.getParameter("employeeid");
out.println(A);
String B = request.getParameter("firstname");
out.println(B);
String C = request.getParameter("lastname");
out.println(C);
String D = request.getParameter("gender");
out.println(D);
String E = request.getParameter("dateofbirth");
out.println(E);
String F = request.getParameter("address");
out.println(F);
String G = request.getParameter("postalcode");
out.println(G);
String H = request.getParameter("phone");
out.println(H);
String I = request.getParameter("mobile");
out.println(I);
String J = request.getParameter("designation");
out.println(J);
String K = request.getParameter("joindate");
out.println(K);
String L = request.getParameter("leavedate");
out.println(L);
String M = request.getParameter("email");
out.println(M);
String N = request.getParameter("qualification");
out.println(N);
String O = request.getParameter("empstatus");
out.println(O);
try
Database db = new Database();
Connection con = db.useConnection();
String query= "update employees set employeeid=?,firstname=?,lastname=?,gender=?,dateofbirth=?,address=?,postalcode=?,phone=?,mobile=?,designation=?,joindate=?,leavedate=?,email=?,qualification=? where employeeid=?";
PreparedStatement stat = con.prepareStatement(query);
stat.setString(1, B);
stat.setString(2, C);
stat.setString(3, D);
stat.setString(4, E);
stat.setString(5, F);
stat.setString(6, G);
stat.setString(7, H);
stat.setString(8, I);
stat.setString(9, J);
stat.setString(10, K);
stat.setString(11, L);
stat.setString(12, M);
stat.setString(13, N);
stat.setString(14, O);
stat.setString(15, A);
System.out.println(stat);
int i = stat.executeUpdate();
if (i!= 0)
System.out.println("The record has been updated");
else
System.out.println("Sorry ! failure");
ResultSet rs = stat.executeQuery("select * from employees");
System.out.println(rs);
while(rs.next())
out.print("<table border='1'>");
out.println(rs.getString(1) + "<br>");
out.println(rs.getString(2) + "<br>");
out.println(rs.getString(3) + "<br>");
out.println(rs.getString(4) + "<br>");
out.println(rs.getString(5) + "<br>");
out.println(rs.getString(6) + "<br>");
out.println(rs.getString(7) + "<br>");
out.println(rs.getString(8) + "<br>");
out.println(rs.getString(9) + "<br>");
out.println(rs.getString(10) + "<br>");
out.println(rs.getString(11) + "<br>");
out.println(rs.getString(12) + "<br>");
out.println(rs.getString(13) + "<br>");
out.println(rs.getString(14) + "<br>");
out.println(rs.getString(15) + "<br>");
out.print("<br>");
catch (Exception e)
System.out.println(e);
e.printStackTrace();
Now as soon as i click on the submit button of the first jsp i get "File Download security warning message"
I am new to jsp and i am not able to troubleshoot this -
Filename on file download from jsp
This may help:
----- Original Message -----
From: "Erik Lindquist" <[email protected]>
Newsgroups: weblogic.developer.interest.jsp
Sent: Wednesday, June 28, 2000 6:20 PM
Subject: How to dynamically display images in JSPs
> This took a little while to figure out so I thought I'd share. After
> doing some research I was led to the following approach on how to load
> images from an Oracle database into a JSP:
>
> The "main" JSP:
>
> <HTML>
> <head>
> <title>Image Test</title>
> </head>
> <body>
> <center>
> hello
> <P>
> <img border=0 src="getImage.jsp?filename=2cents.GIF">
> <P>
> <img border=0 src="getImage.jsp?filename=dollar.gif">
> <P>
> world
> </body>
> </HTML>
>
>
> And this is the image getter:
>
> <% try {
> response.setContentType("image/gif");
> String filename = (String) request.getParameter("filename");
> java.sql.Connection conn =
> java.sql.DriverManager.getConnection("jdbc:weblogic:pool:orapool"); //
> connect to db
> java.sql.Statement stmt = conn.createStatement();
> String sql = "select image from testimage where filename = '" +
> filename + "'";
> java.sql.ResultSet rs = stmt.executeQuery(sql);
> if (rs.next()) {
> byte [] image = rs.getBytes(1);
> java.io.OutputStream os = response.getOutputStream();
> os.write(image);
> os.flush();
> os.close();
> }
> conn.close();
> }
> catch (Exception x) { System.out.println(x); }
> %>
>
>
> The thing to note is that there are no <%@ page import="..." %> or <%@
> page contentType="..." %> tags - just the single scriptlet. It
> seems that for every "<%@" the weblogic compiler sees it puts
> out.print("\r\n"); statements in the generated java source.(???) I
> don't know much about how browsers work but I think that once it sees
> flat ascii come at it it treats everything that follows as text/plain
> which is incorrect for the binary stream that's being sent. Another
> work around was to set out = null; but that's kind of ugly and might
> produce server errors. The real fix is to write a bean to handle images
> which I'll work on next (does anybody have any hints on how to do
> that?)
Cameron Purdy
[email protected]
http://www.tangosol.com
WebLogic Consulting Available
"Ramesh" <[email protected]> wrote in message
news:[email protected]...
>
> Hi,
>
> Even I could download the files with this technique, I couldn't open the
file downloaded. It seems the file is getting currepted during tranfer.. Can
u help me in this regard please?
>
> Thank u
> Ramesh
>
> [email protected] (Anders B. Jensen) wrote:
> >In an Web-application written in Java Server Pages it should be possible
> >for the user to download data from the web-server. The data will never
> >exist as a file on the web-server, only in the PrintWriter object, out.
> >To force the Internet Explorer (IE) to show the download dialog window
> >the Contenttype of the HTTP-header have been set to "html/transfer". The
> >question is:
> >
> >Is it possible to set the filename appearing in the download dialog
> >appearing on the client?
> >
> >
> >Below is a listing of the source-code:
> >
> ><%@ page extends="com.beasys.portal.admin.PortalJspBase"%>
> ><jsp:useBean id="download" scope="session" class="dk.lec.DownloadData" />
> >
> ><%
> > String tmpstr;
> > response.setContentType("html/transfer");
> > out.clear();
> > tmpstr=download.getStrbuffer().toString();
> > out.println(tmpstr.trim());
> >%>
> >
> >
> >Anders B. Jensen
> >Consultant, Research & Development
> >LEC AS
> >
> >Remove the SPAMLESS to mail me.
>
-
Issue with File Download(messageDownload) on Search Page.
Hi,
I created a custom OAF search page which fetches values from one table. The document in getting stored in my custom table in a BLOB colums and NOT in FND_LOBS.
The table has 3 collumns along with others:
1st is primary key (Record_Seq) ==> number data type
2nd to store actual file name (File1Name) ==> varcahar2 data type
3rd to store the actual uploaded data (File1Data) ==> BLOB data type
The reason for having the “File1Name” is so that I can display the original file name of the document that was uploaded, instead of just the “view” in the search page results .
On the File1Data BLOB and created a messageDownload for that under query results table with following details:
ID : File1Data
ItemStyle : messageDownload
FileMIME Type : pdf
Datatype : BLOB
View Instance : LacEmpExposureVO1
view Attribute : File1Name
File View Attribute : File1Data
When I click on the "File1Name" data hyperlink, it is opening only the first document corresponding to the first record in the search page results.
For example, If my search page returns 10 rows then when I click on the file1name on any row, It is open the first row file name only.
I have a primary key column(RECORD_SEQ) in the Table / EO / VO which is displayed in the search page results.
Also one weird thing is happening:
If I try to do this more than 2 times then it is opening the update page with the first record from the search page results…
I tried to print the context and it is nul the first time, But the second time then context is changing to "update". Dont know how this is happening????
Any advice is greatly appreciated as it is very crucial for me to get this resolved ASAP. I have looked at several forums and did a lot of things as advised in the forums . But nothing seems to work for me.
Thanks,
Mir
CO code for the search page
===========================
if (pageContext.getParameter("Create")!= null)
System.out.println("Into LacEmpExposureCO in PROCESS FORM REQUEST with Context of CREATE");
pageContext.setForwardURL
("OA.jsp?page=/lac/oracle/apps/lac/lacempexposure/webui/LacEmpExposureCreatePG",
null,
OAWebBeanConstants.KEEP_MENU_CONTEXT,
null,
null,
true, //Retain AM
OAWebBeanConstants.ADD_BREAD_CRUMB_YES,
OAWebBeanConstants.IGNORE_MESSAGES);
else if ("update".equals(pageContext.getParameter(EVENT_PARAM)))
System.out.println("Into LacEmpExposureCO in PROCESS FORM REQUEST with Context of UPDATE");
System.out.println("LacEmpExposureCO ==> RecordSeq in PROCESS FORM REQUEST is: " + RecordSeq);
HashMap params = new HashMap(1);
params.put("RecordSeq", RecordSeq);
pageContext.setForwardURL
("OA.jsp?page=/lac/oracle/apps/lac/lacempexposure/webui/LacEmpExposureUpdatePG",
null,
OAWebBeanConstants.KEEP_MENU_CONTEXT,
null,
params,
true, //Retain AM
OAWebBeanConstants.ADD_BREAD_CRUMB_NO, // Do not display breadcrumbs
OAWebBeanConstants.IGNORE_MESSAGES);
else {
String strEvent = pageContext.getParameter(OAWebBeanConstants.EVENT_PARAM);
System.out.println(strEvent);
System.out.println("Into the last ELSE part in LacEmpExposureCO.java");Duplicate post -- Issue with File Download(messageDownload) on Search Page.
-
Download the KTOPL field data and GLT0 table data into one Internal table
Hi,
I have downloaded GLT0 table fields data to PC file . But i need to download KTOPL(Chart Of Accounts) data also. in GLT0 table there is no KTOPL field.
But in SKA1 table have KTOPL field. Then what is the issue is GLT0 data & KTOPL field data needs to download into one Internal Table.
anybody could you please solve this problem. immediately need to solve this.
Below is the code.
REPORT ZFXXEABL_1 NO STANDARD PAGE HEADING
LINE-SIZE 200.
Tables Declaration
TABLES : GLT0.
Data Declaration
DATA : FP(8) TYPE C,
YEAR LIKE GLT0-RYEAR,
PERIOD(3) TYPE C,
DBALANCE LIKE VBAP-NETWR VALUE 0 ,
CBALANCE LIKE VBAP-NETWR VALUE 0.
*Internal table for for final data..
DATA : BEGIN OF REC1 OCCURS 0,
BAL LIKE GLT0-TSLVT value 0,
COAREA LIKE GLT0-RBUSA,
CA(4) TYPE C,
KTOPL LIKE ska1-ktopl,
CCODE LIKE GLT0-BUKRS,
CREDIT LIKE VBAP-NETWR,
CURRENCY LIKE GLT0-RTCUR,
CURTYPE(2) TYPE N,
DEBIT LIKE VBAP-NETWR,
YEAR(8) TYPE C,
FY(2) TYPE C,
ACCOUNT LIKE GLT0-RACCT,
VER LIKE GLT0-RVERS,
VTYPE(2) TYPE N,
CLNT LIKE SY-MANDT,
S_SYS(3) TYPE C,
INDICATOR LIKE GLT0-DRCRK,
END OF REC1.
DATA : C(2) TYPE N,
D(2) TYPE N.
DATA REC1_H LIKE REC1.
Variable declarations
DATA :
W_FILES(4) TYPE N,
W_DEBIT LIKE GLT0-TSLVT,
W_CREDIT LIKE GLT0-TSLVT,
W_PCFILE LIKE RLGRAP-FILENAME ,
W_UNIXFILE LIKE RLGRAP-FILENAME,
W_PCFILE1 LIKE RLGRAP-FILENAME,
W_UNIXFIL1 LIKE RLGRAP-FILENAME,
W_EXT(3) TYPE C,
W_UEXT(3) TYPE C,
W_PATH LIKE RLGRAP-FILENAME,
W_UPATH LIKE RLGRAP-FILENAME,
W_FIRST(1) TYPE C VALUE 'Y',
W_CFIRST(1) TYPE C VALUE 'Y',
W_PCFIL LIKE RLGRAP-FILENAME.
DATA: "REC LIKE GLT0 OCCURS 0 WITH HEADER LINE,
T_TEMP LIKE GLT0 OCCURS 0 WITH HEADER LINE.
DATA: BEGIN OF REC3 OCCURS 0.
INCLUDE STRUCTURE GLT0.
DATA: KTOPL LIKE SKA1-KTOPL,
END OF REC3.
DATA: BEGIN OF T_KTOPL OCCURS 0,
KTOPL LIKE SKA1-KTOPL,
SAKNR LIKE SKA1-SAKNR,
END OF T_KTOPL.
Download data.
DATA: BEGIN OF I_REC2 OCCURS 0,
BAL(17), " like GLT0-TSLVT value 0,
COAREA(4), " like glt0-rbusa,
CA(4), " chart of accounts
CCODE(4), " like glt0-bukrs,
CREDIT(17), " like vbap-netwr,
CURRENCY(5), " like glt0-rtcur,
CURTYPE(2), " type n,
DEBIT(17), " like vbap-netwr,
YEAR(8), " type c,
FY(2), " type c, fiscal yr variant
ACCOUNT(10), " like glt0-racct,
VER(3), " like glt0-rvers,
VTYPE(3), " type n,
CLNT(3), "like sy-mandt,
S_SYS(3), "like sy-sysid,
INDICATOR(1), " like glt0-drcrk,
END OF I_REC2.
Selection screen. *
SELECTION-SCREEN BEGIN OF BLOCK BL1 WITH FRAME TITLE TEXT-BL1.
SELECT-OPTIONS : COMPCODE FOR GLT0-BUKRS,
GLACC FOR GLT0-RACCT,
FISYEAR FOR GLT0-RYEAR,
no intervals no-extension, "- BG6661-070212
FISCPER FOR GLT0-RPMAX,
busarea for glt0-rbusa,
CURRENCY FOR GLT0-RTCUR.
SELECTION-SCREEN END OF BLOCK BL1.
SELECTION-SCREEN BEGIN OF BLOCK BL2 WITH FRAME TITLE TEXT-BL2.
PARAMETERS:
P_UNIX AS CHECKBOX, "Check box for Unix Option
P_UNFIL LIKE RLGRAP-FILENAME, " Unix file Dnload file name
default '/var/opt/arch/extract/GLT0.ASC', "- BG6661-070212
P_PCFILE AS CHECKBOX, "Check box for Local PC download.
P_PCFIL LIKE RLGRAP-FILENAME " PC file Dnload file name
default 'C:\GLT0.ASC'. "- BG6661-070212
DEFAULT 'C:\glt0_gl_balance_all.asc'. "+ BG6661-070212
SELECTION-SCREEN END OF BLOCK BL2.
*eject
Initialization. *
INITIALIZATION.
Try to default download filename
p_pcfil = c_pcfile.
p_unfil = c_unixfile.
if sy-sysid eq c_n01.
p_unfil = c_unixfile.
endif.
if sy-sysid eq c_g21.
p_unfil = c_g21_unixfile.
endif.
if sy-sysid eq c_g9d.
p_unfil = c_g9d_unixfile.
endif.
Default for download filename
*{ Begin of BG6661-070212
CONCATENATE C_UNIXFILE
SY-SYSID C_FSLASH C_CHRON C_FILENAME INTO P_UNFIL.
*} End of BG6661-070212
AT SELECTION-SCREEN OUTPUT.
loop at screen.
if screen-name = 'P_PCFIL'. "PC FILE
screen-input = '0'.
modify screen.
endif.
if screen-name = 'P_UNFIL'. "UN FILE
screen-input = '0'.
modify screen.
endif.
endloop.
if w_first = 'Y'.
perform path_file.
w_first = 'N'.
endif.
if w_cfirst = 'Y'.
perform cpath_file.
w_cfirst = 'N'.
endif.
Start-of-Selection. *
START-OF-SELECTION.
*COLLECT DATA
PERFORM COLLECT_DATA.
*BUILD FILENAMES
PERFORM BUILD_FILES.
*LOCAL
IF P_PCFILE = C_YES.
PERFORM LOCAL_DOWNLOAD.
ENDIF.
*UNIX
IF P_UNIX = C_YES.
PERFORM UNIX_DOWNLOAD.
ENDIF.
IF P_PCFILE IS INITIAL AND P_UNIX IS INITIAL.
MESSAGE I000(ZL) WITH 'Down load flags both are unchecked'.
ENDIF.
END-OF-SELECTION.
IF P_PCFILE = C_YES.
WRITE :/ 'PC File' , C_UNDER, P_PCFIL.
ENDIF.
*& Form DOWNLOAD
Download *
FORM DOWNLOAD.
P_PCFIL = W_PATH.
DATA LIN TYPE I.
DESCRIBE TABLE I_REC2 LINES LIN.
WRITE:/ 'No of Records downloaded = ',LIN.
CALL FUNCTION 'WS_DOWNLOAD'
EXPORTING
FILENAME = P_PCFIL
FILETYPE = C_ASC "c_dat "dat
TABLES
DATA_TAB = I_REC2 " t_str
fieldnames = t_strhd
EXCEPTIONS
FILE_OPEN_ERROR = 1
FILE_WRITE_ERROR = 2
INVALID_FILESIZE = 3
INVALID_TABLE_WIDTH = 4
INVALID_TYPE = 5
NO_BATCH = 6
UNKNOWN_ERROR = 7
OTHERS = 8.
IF SY-SUBRC EQ 0.
ENDIF.
ENDFORM.
*& Form WRITE_TO_SERVER
text *
--> p1 text
<-- p2 text
FORM WRITE_TO_SERVER.
DATA : L_MSG(100) TYPE C,
L_LINE(5000) TYPE C.
P_UNFIL = W_UPATH.
DATA LIN TYPE I.
DESCRIBE TABLE I_REC2 LINES LIN.
WRITE:/ 'No of Records downloaded = ',LIN.
OPEN DATASET P_UNFIL FOR OUTPUT IN TEXT MODE. " message l_msg.
IF SY-SUBRC <> 0.
WRITE: / L_MSG.
ENDIF.
perform header_text1.
LOOP AT I_REC2.
TRANSFER I_REC2 TO P_UNFIL.
ENDLOOP.
CLOSE DATASET P_UNFIL.
WRITE : / C_TEXT , W_UPATH.
SPLIT W_UNIXFILE AT C_DOT INTO W_UNIXFIL1 W_UEXT.
CLEAR W_UPATH.
IF NOT W_UEXT IS INITIAL.
CONCATENATE W_UNIXFIL1 C_DOT W_UEXT INTO W_UPATH.
ELSE.
W_UEXT = C_ASC. " c_csv.
CONCATENATE W_UNIXFIL1 C_DOT W_UEXT INTO W_UPATH.
ENDIF.
ENDFORM. " WRITE_TO_SERVER
*& Form BUILD_FILES
FORM BUILD_FILES.
IF P_PCFILE = C_YES.
W_PCFILE = P_PCFIL.
***Split path at dot**
SPLIT W_PCFILE AT C_DOT INTO W_PCFILE1 W_EXT.
IF NOT W_EXT IS INITIAL.
CONCATENATE W_PCFILE1 C_DOT W_EXT INTO W_PATH.
ELSE.
W_PATH = W_PCFILE1.
ENDIF.
ENDIF.
IF P_UNIX = C_YES.
W_UNIXFILE = P_UNFIL.
SPLIT W_UNIXFILE AT C_DOT INTO W_UNIXFIL1 W_UEXT.
IF NOT W_UEXT IS INITIAL.
CONCATENATE W_UNIXFIL1 C_DOT W_UEXT INTO W_UPATH.
ELSE.
W_UPATH = W_UNIXFIL1.
ENDIF.
ENDIF.
ENDFORM.
FORM CPATH_FILE.
CLEAR P_PCFIL.
CONCATENATE C_PCFILE
C_COMFILE SY-SYSID C_UNDER SY-DATUM SY-UZEIT
C_DOT C_ASC INTO P_PCFIL.
ENDFORM. " CPATH_FILE
FORM PATH_FILE.
CLEAR P_UNFIL.
if sy-sysid eq c_n01.
CONCATENATE C_UNIXFILE
C_COMFILE SY-SYSID C_UNDER SY-DATUM SY-UZEIT
C_DOT C_ASC INTO P_UNFIL.
endif.
if sy-sysid eq c_g21.
concatenate c_g21_unixfile
c_comfile sy-sysid c_under sy-datum sy-uzeit
c_dot c_asc into p_unfil.
endif.
if sy-sysid eq c_g9d.
concatenate c_g9d_unixfile
c_comfile sy-sysid c_under sy-datum sy-uzeit
c_dot c_asc into p_unfil.
endif.
ENDFORM. " PATH_FILE
Local_Download *
Local *
FORM LOCAL_DOWNLOAD.
perform header_text.
LOOP AT REC1.
REC1-CLNT = SY-MANDT.
REC1-S_SYS = SY-SYSID.
MOVE: REC1-BAL TO I_REC2-BAL,
REC1-COAREA TO I_REC2-COAREA,
REC1-CA TO I_REC2-CA,
REC1-KTOPL TO I_REC2-CA,
REC1-CCODE TO I_REC2-CCODE,
REC1-CREDIT TO I_REC2-CREDIT,
REC1-CURRENCY TO I_REC2-CURRENCY,
REC1-CURTYPE TO I_REC2-CURTYPE,
REC1-DEBIT TO I_REC2-DEBIT,
REC1-YEAR TO I_REC2-YEAR,
REC1-FY TO I_REC2-FY,
REC1-ACCOUNT TO I_REC2-ACCOUNT,
REC1-VER TO I_REC2-VER,
REC1-VTYPE TO I_REC2-VTYPE,
REC1-CLNT TO I_REC2-CLNT,
REC1-S_SYS TO I_REC2-S_SYS,
REC1-INDICATOR TO I_REC2-INDICATOR.
APPEND I_REC2.
CLEAR I_REC2.
ENDLOOP.
IF NOT I_REC2[] IS INITIAL.
PERFORM DOWNLOAD .
CLEAR I_REC2.
REFRESH I_REC2.
ELSE.
WRITE : / ' no record exist due to unavailability of data'.
ENDIF.
ENDFORM. " LOCAL_DOWNLOAD
*& Form UNIX_DOWNLOAD
FORM UNIX_DOWNLOAD.
LOOP AT REC1.
REC1-CLNT = SY-MANDT.
REC1-S_SYS = SY-SYSID.
MOVE: REC1-BAL TO I_REC2-BAL,
REC1-COAREA TO I_REC2-COAREA,
REC1-CA TO I_REC2-CA,
REC1-KTOPL TO I_REC2-CA,
REC1-CCODE TO I_REC2-CCODE,
REC1-CREDIT TO I_REC2-CREDIT,
REC1-CURRENCY TO I_REC2-CURRENCY,
REC1-CURTYPE TO I_REC2-CURTYPE,
REC1-DEBIT TO I_REC2-DEBIT,
REC1-YEAR TO I_REC2-YEAR,
REC1-FY TO I_REC2-FY,
REC1-ACCOUNT TO I_REC2-ACCOUNT,
REC1-VER TO I_REC2-VER,
REC1-VTYPE TO I_REC2-VTYPE,
SY-MANDT TO I_REC2-CLNT,
SY-SYSID TO I_REC2-S_SYS,
REC1-INDICATOR TO I_REC2-INDICATOR.
APPEND I_REC2.
CLEAR I_REC2.
ENDLOOP.
IF NOT I_REC2[] IS INITIAL.
PERFORM WRITE_TO_SERVER.
CLEAR I_REC2.
REFRESH I_REC2.
ELSE.
WRITE : / ' no record exist due to unavailability of data'.
ENDIF.
ENDFORM. " UNIX_DOWNLOAD
*& Form HEADER_TEXT
text *
--> p1 text
<-- p2 text
*form header_text.
concatenate c_bal c_ba c_ca c_cc c_credit c_currency c_curtype
c_debit c_fisyear c_fisvar c_acct c_ver c_vtype c_indicator
into t_strhd
separated by c_comma.
append t_strhd.
*endform. " HEADER_TEXT
*& Form HEADER_TEXT1
text *
*form header_text1.
concatenate c_bal c_ba c_ca c_cc c_credit c_currency c_curtype
c_debit c_fisyear c_fisvar c_acct c_ver c_vtype c_indicator
into t_strhd1
separated by c_comma.
append t_strhd1.
transfer t_strhd1 to p_unfil.
*endform. " HEADER_TEXT1
*& Form COLLECT_DATA
Collect Data *
FORM COLLECT_DATA.
SELECT * FROM GLT0 INTO TABLE REC3
WHERE BUKRS IN COMPCODE
AND RYEAR IN FISYEAR
AND RPMAX IN FISCPER
AND RACCT IN GLACC
AND RTCUR IN CURRENCY.
SELECT KTOPL FROM SKA1
INTO TABLE T_KTOPL
FOR ALL ENTRIES IN REC3
WHERE SAKNR = REC3-RACCT.
LOOP AT REC3 .
select *
from glt0
into table t_temp
where rldnr = rec-rldnr
and rrcty = rec-rrcty
and rvers = rec-rvers
and bukrs = rec-bukrs
and ryear = rec-ryear
and racct = rec-racct
and rbusa = rec-rbusa
and rtcur <> 'ZAR'
and rpmax = rec-rpmax.
if sy-subrc = 0.
rec1-bal = '0.00'.
else.
rec1-bal = rec-hslvt.
endif.
*READ TABLE T_KTOPL WITH KEY SAKNR = REC-RACCT BINARY SEARCH.
MOVE T_KTOPL-KTOPL TO REC3-KTOPL.
CLEAR: CBALANCE, DBALANCE.
REC1-BAL = REC3-HSLVT.
IF REC3-DRCRK = 'S'.
IF REC3-HSLVT NE C_ZERO.
YEAR = REC-RYEAR.
PERIOD = '000'.
CONCATENATE PERIOD C_DOT YEAR INTO FP.
REC1-INDICATOR = REC-DRCRK.
REC1-DEBIT = C_ZERO.
REC1-CREDIT = C_ZERO.
REC1-CCODE = REC-BUKRS.
REC1-YEAR = FP.
REC1-CURRENCY = REC-RTCUR.
REC1-ACCOUNT = REC-RACCT.
rec1-bal = rec-hslvt.
dbalance = rec1-bal.
REC1-CURTYPE = C_CTYPE.
REC1-FY = C_FY.
REC1-COAREA = REC-RBUSA.
REC1-VER = REC-RVERS.
REC1-VTYPE = C_CTYPE.
REC1-CA = C_CHART.
APPEND REC1.
C = 0.
PERFORM D.
ENDIF.
IF REC3-HSL01 NE C_ZERO.
YEAR = REC3-RYEAR.
PERIOD = '001'.
CONCATENATE PERIOD C_DOT YEAR INTO FP.
REC1-INDICATOR = REC3-DRCRK.
REC1-DEBIT = REC3-HSL01 .
REC1-CCODE = REC3-BUKRS.
REC1-YEAR = FP.
REC1-CURRENCY = REC3-RTCUR.
REC1-ACCOUNT = REC3-RACCT.
rec1-bal = REC3-hsl01 + dbalance.
dbalance = rec1-bal.
REC1-CURTYPE = C_CTYPE.
REC1-FY = C_FY.
REC1-COAREA = REC3-RBUSA.
REC1-VER = REC3-RVERS.
REC1-VTYPE = C_CTYPE.
REC1-CA = C_CHART.
REC1-KTOPL = REC3-KTOPL.
APPEND REC1.
C = 1.
PERFORM D.
ENDIF.
IF REC3-HSL02 NE C_ZERO.
REC1-DEBIT = REC3-HSL02.
YEAR = REC3-RYEAR.
PERIOD = '002'.
CONCATENATE PERIOD C_DOT YEAR INTO FP.
REC1-INDICATOR = REC3-DRCRK.
REC1-DEBIT = REC3-HSL02.
REC1-CCODE = REC3-BUKRS.
REC1-YEAR = FP.
REC1-CURRENCY = REC3-RTCUR.
REC1-ACCOUNT = REC3-RACCT.
rec1-bal = REC3-hsl02 + dbalance.
dbalance = rec1-bal.
REC1-CURTYPE = C_CTYPE.
REC1-FY = C_FY.
REC1-COAREA = REC3-RBUSA.
REC1-VER = REC3-RVERS.
REC1-VTYPE = C_CTYPE.
REC1-CA = C_CHART. "-BF7957-070503
REC1-KTOPL = REC3-KTOPL. "+BF7957-070503
APPEND REC1.
C = 2.
PERFORM D.
ENDIF.
IF REC3-HSL03 NE C_ZERO.
YEAR = REC3-RYEAR.
PERIOD = '003'.
CONCATENATE PERIOD C_DOT YEAR INTO FP.
REC1-INDICATOR = REC3-DRCRK.
REC1-DEBIT = REC3-HSL03.
REC1-CCODE = REC3-BUKRS.
REC1-YEAR = FP.
REC1-CURRENCY = REC3-RTCUR.
REC1-ACCOUNT = REC3-RACCT.
rec1-bal = REC3-hsl03 + dbalance .
dbalance = rec1-bal.
REC1-CURTYPE = C_CTYPE.
REC1-FY = C_FY.
REC1-COAREA = REC3-RBUSA.
REC1-VER = REC3-RVERS.
REC1-VTYPE = C_CTYPE.
REC1-CA = C_CHART. "-BF7957-070503
REC1-KTOPL = REC3-KTOPL. "+BF7957-070503
APPEND REC1.
C = 3.
PERFORM D.
ENDIF.
IF REC3-HSL04 NE C_ZERO.
REC1-DEBIT = REC3-HSL04.
YEAR = REC3-RYEAR.
PERIOD = '004'.
CONCATENATE PERIOD C_DOT YEAR INTO FP.
REC1-INDICATOR = REC3-DRCRK.
REC1-DEBIT = REC3-HSL04.
REC1-CCODE = REC3-BUKRS.
REC1-YEAR = FP.
REC1-CURRENCY = REC3-RTCUR.
REC1-ACCOUNT = REC3-RACCT.
rec1-bal = REC3-hsl04 + dbalance .
REC1-CURTYPE = C_CTYPE.
REC1-FY = C_FY.
REC1-COAREA = REC3-RBUSA.
REC1-VER = REC3-RVERS.
REC1-VTYPE = C_CTYPE.
REC1-CA = C_CHART. "-BF7957-070503
REC1-KTOPL = REC3-KTOPL. "+BF7957-070503
APPEND REC1.
dbalance = rec1-bal.
C = 4.
PERFORM D.
ENDIF.
Thanks and Regards,
Ramuse logical database SDF, nodes ska1 and skc1c
A.
Maybe you are looking for
-
When I lock Logic to my Protools session via midi beat clock everything seems to work fine. But when I switch to locking by way of MTC, Logic seems to lock, I get the blue bar across the top of the arrange window, and the numbers in the transport sta
-
Hi Experts, PLease explain me abt the mass change of Material Master.. the detailed steps to be followed for the change I know the tcode MM17, please explain the process in that transaction
-
Bizarre TOC bug from Find & Replace window
Just sharing really and not even a complaint - I've reported the bug - but this explains a previous loss of data I could never explain, and I thought it might help someone. RH9, Windows 7 1. Find and Replace in Files 2. Add a search term 3. Decide yo
-
Starting Garageband disconnects wifi on Mac Pro
Hi, When I start GarageBand I lose my wifi connection to the network and the internet. If I use a wired ethernet connection my connection to the network and the internet is not interrupted. I use Sitecom Wireless network usb adaptor 300N X4. I'v trie
-
I can't invite my buddies to chat, im, e-mail etc...
I've looked at similar posting but suggested solutions did not work. In the video menu both audio and video are checked. In the view menu show audio status and show video status are both checked. The connection doctor has all green checks. The speed