1. 程式人生 > >橫向縱向列印

橫向縱向列印

REPORT demo_list_new_page_print_on NO STANDARD PAGE HEADING.

DATA: val(1TYPE c,
      pripar TYPE pri_params,
      arcpar TYPE arc_params,
      lay   TYPE pri_params-paart,
      lines TYPE pri_params-linct,
      rows  TYPE pri_params-linsz.

CALL FUNCTION 'GET_PRINT_PARAMETERS'
     IMPORTING
          out_parameters         = pripar
          out_archive_parameters = arcpar
          valid                  = val
     EXCEPTIONS

          archive_info_not_found = 1
          invalid_print_params   = 2
          invalid_archive_params = 3
          OTHERS                 = 4.

IF val <> space AND sy-subrc = 0.
  SET PF-STATUS 'PRINT'.
  WRITE '   Select a format!'.
ENDIF.

TOP-OF-PAGE DURING LINE-SELECTION.
  WRITE'Page'
, sy-pagno.
  ULINE.

AT USER-COMMAND.
  CASE sy-ucomm.
    WHEN 'PORT'.
      lay = 'X_65_80'.
      lines = 60.
      rows  = 55.
      PERFORM format.
    WHEN 'LAND'.
      lay = 'X_65_132'.
      lines = 60.
      rows  = 110.
      PERFORM format.
  ENDCASE.

FORM format.
  CALL FUNCTION 'GET_PRINT_PARAMETERS'

       EXPORTING
            in_archive_parameters  = arcpar
            in_parameters          = pripar
            layout                 = lay
            line_count             = lines
            line_size              = rows
            no_dialog              = 'X'
       IMPORTING
            out_archive_parameters = arcpar
            out_parameters         = pripar
            valid                  = val
       EXCEPTIONS
            archive_info_not_found = 1
            invalid_print_params   = 2
            invalid_archive_params = 3
            OTHERS                 = 4.
  IF val <> space AND sy-subrc = 0.
    PERFORM list.
  ENDIF.
ENDFORM.

FORM list.
  NEW-PAGE PRINT ON
    NEW-SECTION
    PARAMETERS pripar
    ARCHIVE PARAMETERS arcpar
    NO DIALOG.
  DO 440 TIMES.
    WRITE (3) sy-index.
  ENDDO.
  NEW-PAGE PRINT OFF.
ENDFORM.

相關推薦

橫向縱向列印

REPORT demo_list_new_page_print_on NO STANDARD PAGE HEADING.DATA: val(1) TYPE c,       pripar TYPE 

關於RDLC列印時自主選擇橫向縱向列印的一些問題

在使用Rdlc報表時,如果列印內容的寬度大於21釐米時,自動預設橫向列印。 有時即便修改了pagesize的寬和高也無法在列印時按照想要的效果進行列印。 可以在程式中手動選擇橫向或縱向方式進行列印,程式碼如下: private void TSMI_W_Clic

使用依賴實現跑馬燈的橫向縱向實現

依賴依賴匯入依賴 //跑馬燈 implementation 'com.sunfusheng:marqueeview:1.3.3' xml檔案佈局 <!--mvAnimDuration一行文字動畫執行的時間--> <!--mvDirect

Word 紙張方向橫向縱向調整格式問題

1、下圖是Word橫向縱向切換的屬性選擇: 2、當Word紙張橫向縱向調整之後,文件裡面的格式就會出現亂的情況那麼就要調整表格的排版 選擇紅框的+的標誌,相當於選擇了當前表格 滑鼠選中表格,右

MSSQL表分割槽的建立, 橫向 縱向 多維度,多指標 分表

最近在做專案資料庫優化過程中,考慮了資料庫表分割槽的方案,MSSQL2005新增了表分割槽的概念,現在我用測試表來做一次表分割槽。表分割槽可以把不同資料放到不同資料庫檔案,按實體地址來隔開資料,理論情況下如果伺服器是多磁碟,多CPU,還做了磁碟陣列後,查詢操作效率會更明顯。 現在基本所有資料庫都存在表分

bootstrap table 表頭固定 、凍結列、橫向縱向滾動條

前提:引入對應的js,css<link rel="stylesheet" type="text/css" href="/kaoqin/js/bootstrap/css/bootstrap.min.css"> <link rel="stylesheet" ty

Python-圖片同時橫向縱向拼接

import os from PIL import Image UNIT_SIZE = 220  # the size of image # train train_save_path = '/root/……cyclegan_8.0/web/train_result/'

Android實現類似Excel的大表格,可橫向縱向滑動,帶表頭

在專案中遇到了這樣的需求,先是找到了這個庫: https://github.com/Kelin-Hong/ScrollablePanel 但是發現橫向滑動時很卡,縱向滑動也不那麼絲滑,後來網上翻了翻,想了想實現思路,自己動手做了個庫。 還有一篇文章是部

Web安全之越權操作:橫向越權與縱向越權

localhost new 用戶修改 情況 name 查看 普通用戶 新的 登錄 參考:http://blog.csdn.net/github_39104978/article/details/78265433 看了上面的文章,對越權操作的概念還是比較模糊,不明確實際場景。

AsposeWords操作表格合併單元格(word已經有的table 列 合併 指定兩個單元格 既可以橫向合併也可以縱向合併)-http://www.xiaoguo123.com/p/aspose_w

20180725 親測可以 xjh 強大的AsposeWords for java不僅支援建立表格,還支援合併單元格。今天就簡明扼要記錄下如何實現合併單元格。 大家可以完全套用本文提供的程式碼,只需要提供開始和結束的單元格即可實現合併,無需理解複雜的過程,真是簡潔好用啊。 此

CAD編輯器中怎麼設定列印橫向CAD圖紙?

CAD編輯器中怎麼設定列印橫向CAD圖紙?建築設計師們每天都有許多CAD圖紙需要進行編輯,但是編輯完成之後還需要交給客戶進行檢視,但是你的客戶要求你把CAD圖紙進行打印出來,那麼在CAD編輯器中怎麼設定列印橫向CAD圖紙?具體要怎麼來進行操作?下面就使用迅捷CAD編輯器標準版來教教大傢俱體操作過程,希望能夠幫

PHP 縱向陣列轉橫向

   /**      * select 查詢資料結果集 縱向陣列橫向排      */     function aryy_x($ary) {  &nbs

橫向越權、縱向越權安全漏洞

1、什麼是橫向越權和縱向越權: 橫向越權:攻擊者嘗試訪問與他擁有相同許可權的使用者的資源 縱向越權:低級別攻擊者嘗試訪問高級別使用者的資源 2、如何解決: 橫向越權場景: 1、在使用者忘記密碼重置密碼時,回答對了問題進入密碼重置階段時,如果知道其他使用者的使用者名

RecyclerView 實現縱向橫向,和瀑布流 的滾動佈局

實現縱向滾動 1,在app/build.gradle檔案,dependencies中新增如下內容 ----------------- compile ‘com.android.support:recyclerview-v7:24.2.1’ --------

橫向列印二叉樹

題目: 二叉樹可以用於排序。其原理很簡單:對於一個排序二叉樹新增新節點時,先與根節點比較,若小則交給左子樹繼續處理,否則交給右子樹。 當遇到空子樹時,則把該節點放入那個位置。 比如,10 8 5 7 12 4 的輸入順序,應該建成二叉樹如下圖所示,其中.表示空白。 ...|-12 1

【UGUI】橫向縱向佈局元件

1.橫向佈局元件 1.元件介紹 Horizontal Layout Group:橫向佈局元件。 表格佈局元件是功能最全的一個佈局元件,可以實現表格,橫向,縱向佈局; 而橫向佈局元件可以理解成是表格佈局元

簡訊轟炸之橫向轟炸和縱向轟炸

白帽子您好,橫向轟炸不收,故此忽略,感謝提交。如有更多疑問可諮詢平臺客服小姐姐(QQ:3459476393),非常感謝對漏洞盒子與網際網路安全的支援,對此給您帶來的不便我們深感抱歉。 收到上面一條資訊, 才知道簡訊轟炸也分橫向轟炸和縱向轟炸。 從字面上猜猜,大概如下意思。 就我遇到的,目前可被橫向轟炸的簡

橫向iscroll阻止縱向瀏覽器滾動條

在初始化iscroll時設定: var myScroll= new IScroll('.container', { // mouseWheel : true, //滑鼠滾輪支援 // scrollbars: false, //滾動條支援 scrollY: false

javascript 呼叫瀏覽器的列印方法。並設定列印橫向列印

最近做一個簡單的列印功能,要使用JavaScript呼叫瀏覽器的列印功能。並設定列印為橫向列印: 為了適應A4紙的寬和高這裡設定: body{margin:0 auto; width: 1010px; he

Android 橫向帶有吸附效果的橫向拖動控制元件(效果同縱向下拉重新整理ListView)

先上一張效果圖 中間的橫向拖動就是我們要做的效果。 一、實現思路 仔細觀察不難發現,該拖動view與listview的下拉重新整理的效果很類似,手指拖動的時候顯示隱藏的view,手指放開自動回彈。只不過區別就是一個橫向一個縱向 下拉重新整理的實現思路如下: 自定義一個佈