2. 程式人生 > >SAP_ABAP_寫資料到SAP伺服器檔案並讀取

SAP_ABAP_寫資料到SAP伺服器檔案並讀取

阿新 • • 發佈：2019-01-09
BEGIN OF wa_itab , vbeln LIKE vbak-vbeln, vkorg LIKE vbak-vkorg, erdat LIKE vbak-erdat, kunnr LIKE vbak-kunnr, posnr LIKE vbap-posnr, matnr LIKE vbap-matnr, kwmeng LIKE vbap-kwmeng, END OF wa_itab. DATA:itab LIKE wa_itab OCCURS 0 WITH HEADER LINE. DATA:g_file LIKE rlgrap-filename. DATA:s_file LIKE
rlgrap-filename. DATA:menge(20). DATA:line(1000) TYPE c. SELECTION-SCREEN BEGIN OF BLOCK bl1 WITH FRAME TITLE t1. SELECT-OPTIONS:s_erdat FOR vbak-erdat, s_vbeln FOR vbak-vbeln, s_kunnr FOR vbak-kunnr, s_vkorg FOR vbak-vkorg. PARAMETERS:p_client AS CHECKBOX, p_dnfile LIKE
rlgrap-filename DEFAULT 'D:\', p_server AS CHECKBOX, p_sefile LIKE rlgrap-filename DEFAULT '/usr/sap/tmp/'. SELECTION-SCREEN END OF BLOCK bl1 . INITIALIZATION. t1 = '選擇條件'. START-OF-SELECTION. PERFORM sub_read_data. END-OF-SELECTION. PERFORM sub_write_data. *&---------------------------------------------------------------------* *& Form SUB_READ_DATA *&---------------------------------------------------------------------* * text *----------------------------------------------------------------------* * --> p1 text * <-- p2 text *----------------------------------------------------------------------* FORM sub_read_data . SELECT vbak~vbeln vkorg vbak~erdat kunnr posnr matnr kwmeng INTO TABLE itab FROM vbak JOIN vbap ON vbap~vbeln = vbak~vbeln WHERE vbak~vbeln IN s_vbeln AND vbak~erdat IN s_erdat AND vkorg IN s_vkorg AND kunnr IN s_kunnr. ENDFORM. " SUB_READ_DATA *&---------------------------------------------------------------------* *& Form SUB_WRITE_DATA *&---------------------------------------------------------------------* * text *----------------------------------------------------------------------* * --> p1 text * <-- p2 text *----------------------------------------------------------------------* FORM sub_write_data . IF p_client = '
X'. CONCATENATE p_dnfile 'SD' sy-datum sy-uzeit '.TXT' INTO g_file. "文字格式 CALL FUNCTION 'WS_DOWNLOAD' EXPORTING filename = g_file filetype = 'DAT' TABLES data_tab = itab. "被下載的內表 ENDIF. IF p_server = 'X'. CONCATENATE p_sefile 'SD' sy-datum '.txt' INTO s_file. "伺服器儲存的目錄和檔名 OPEN DATASET s_file FOR OUTPUT IN TEXT MODE ENCODING DEFAULT . "開啟檔案 if sy-subrc = 0. LOOP AT itab INTO wa_itab. menge = wa_itab-kwmeng. CONCATENATE wa_itab-vkorg wa_itab-kunnr wa_itab-vbeln wa_itab-erdat wa_itab-posnr wa_itab-matnr menge INTO line SEPARATED BY ''. TRANSFER line TO s_file . IF sy-subrc NE 0 . MESSAGE 'ERROR！！' type 'E'. ENDIF. CLEAR line . ENDLOOP. CLOSE DATASET s_file. else. MESSAGE 'OPEN ERROR！！' type 'E'. endif. ENDIF. ENDFORM. " SUB_WRITE_DATA

相關推薦

SAP_ABAP_寫資料到SAP伺服器檔案並讀取

BEGIN OF wa_itab , vbeln LIKE vbak-vbeln, vkorg LIKE vbak-vkorg, erdat LIKE vbak-erdat, kunnr LIKE vbak-kunnr, posnr LIKE vbap-pos

ABAP寫資料到SAP伺服器檔案並讀取

BEGIN OF wa_itab , vbeln LIKE vbak-vbeln, vkorg LIKE vbak-vkorg, erdat LIKE vbak-erdat, kunnr LIKE vbak-kunnr, posnr LIKE vbap-pos

python資料持久化到檔案並讀取:pickle的使用

一、所需匯入模組 import pickle 二、所需介面及介紹        pickle.dump(obj, file, [,protocol]) 　　註解：將物件obj儲存到檔案file中去。                   file：物件儲存到的類檔案物件。fi

Android讀寫檔案 獲取檔案並讀取寫入資料

一、       從 resource 中的 raw 資料夾中獲取檔案並讀取資料（資原始檔只能讀不能寫） String res = "";  try{  InputStream in = getResources().openRawResource(R.raw.

從resource中的raw資料夾中獲取檔案並讀取資料（資原始檔只能讀不能寫）

轉載：http://blog.sina.com.cn/s/blog_4d25c9870100qpax.html 一、 從resource中的raw資料夾中獲取檔案並讀取資料（資原始檔只能讀不能寫） String res = ""; try{ InputStre

Vue直接讀取伺服器檔案並顯示的方法

這裡我們的想法是點開頁面，自動讀取伺服器某個檔案，然後在文字框顯示出來 HTML程式碼 <textarea id = "div1" style="width:1650px; height:740px" readonly> </textarea> JS程式碼

go 讀取資料夾所有檔案並生成md5 字串

為檔案生成MD5字串 func CreateMd5(filename string, md5str *string) { f, err := os.Open(filename) if err != nil { fmt.Println("Open", err)

ABAP 寫資料到SAP伺服器檔案

  一、在應用伺服器中開啟檔案OPEN  DATASET  <dsn>  [options] 此語句開啟檔案 <dsn> 。如果不指定任何模式 選項，則檔案將按二進 制模式開啟。如果系統不能開啟檔案，則將系統欄位 SY-SUBRC 設定為 0，否則

VBA下彈框開啟excel檔案並讀取資料

Sub LoadExcelData()     Dim wkbk As Workbook  '定義一個工作薄     Dim myFileName As String '定義要讀取的檔案路徑     Dim dataRow  As Integer '定義資料的行     D

用python在後端將資料寫入到資料庫並讀取

用python在後端將資料寫入到資料庫： # coding:utf-8 import pandas as pd from sqlalchemy import create_engine # 初始化資料庫連線，使用pymysql模組 # MySQL的使用者：root, 密碼:147369, 埠：

Nodejs入門基礎（使用fs建立資料夾及檔案並獲取資訊返回頁面）

測試直接ping直接設定的埠號http://localhost:埠號參考程式碼： var fs = require("fs"); var http = require("http"); var url = require("url"); http.createServer(function(r

JAVA如何建立資料夾和檔案並可以追加寫入txt

public static void createFile(String filePath1,String fileName,StringBuffer stringBuffer) throws IOException {         Stri

spring boot 新增自定義配置檔案並讀取屬性

"123" "pcq" spring 屬性檔案預設配置檔案是從application.properties讀取的, 但是我想把配置檔案分開，比如 業務的我想放在biz.properties, 客戶端配置的放在client.properties ， 但是注入呢，經過測試可以這

python 列舉資料夾下檔案並排序

要列舉當前資料夾下的檔案，可以用下面的方法： <span style="font-size:12px;">import os a=os.listdir('.\')</span>

OpenRead方法開啟檔案並讀取

實現效果： 　　 知識運用：　　File類的OpenRead方法　　　　//實現開啟現有檔案以進行讀取 　　public static FileStream OpenRead(string path) 　　FileStream類的Read方法　　//實現從流中讀取位元組塊並將該資料寫入給定的緩衝區

tensorflow資料集製作/檔案佇列讀取方式

3種資料讀取方式 TensorFlow程式讀取資料一共有3種方法: 供給資料(Feeding)： 在TensorFlow程式執行的每一步， 讓Python程式碼來供給資料。 從檔案讀取資料： 在TensorFlow圖的起始， 讓一個輸入管線從檔案中讀取資料

通過sh指令碼將資料庫資料生成文字檔案並上傳ftp

通過sh 指令碼將資料庫表 生成csv檔案並壓縮上傳ftpsource /etc/profile export NLS_LANG=AMERICAN_AMERICA.AL32UTF8 YYYY=`date "+%Y"` MM=`date "+%m"` DD=`date "+%d

egret微信小遊戲在本地使用者檔案目錄下建立檔案並讀取內容

Platform.ts新增 declare interface Platform { getUserInfo(): Promise<any>; login(): Promise<any> getFileData(fi

Qt入門——選擇路徑開啟檔案並讀取檔案

使用QFileDialog可以呼叫當前系統的檔案對話方塊 包含標頭檔案： #include <QFileDialog> （1）開啟選擇路徑對話方塊讀取路徑名 QString getOpenFileName ( QWidget * parent = 0

Android 建立資料夾和檔案並向檔案寫入文字

1.對手機儲存卡進行新建刪除操作需要新增許可權 <uses-permission android:name="android.permission.WRITE_EXTERNAL_STORAGE"