1. 程式人生 > >SAP alv(lvc)的擡頭標題設定(html_top_of_page)

SAP alv(lvc)的擡頭標題設定(html_top_of_page)

*&---------------------------------------------------------------------* *&      Form  html_top_of_page *&---------------------------------------------------------------------* FORM html_top_of_page USING document TYPE REF TO cl_dd_document.   DATAtext TYPE sdydo_text_element.   LOOP 
AT gt_proj INTO gwa_proj.     text text-010.                  "專案編號     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 2.     text gwa_proj-pspid.     CALL METHOD document->
add_text       EXPORTING         text         text         sap_emphasis text-052.  "加粗還是斜體  STRONG是加粗     CALL METHOD document->add_gap       EXPORTING         width 40.     text text-011.                   "專案名稱     CALL METHOD document->add_text       EXPORTING         text         
text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 2.     text gwa_proj-post1.     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->new_line.     CALL METHOD document->underline.   "Draw  an underLine     text text-012.                   "SOP時間     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 2.     text gwa_proj-zsopsj.     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 40.     text text-013.                   "客戶名稱     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 2.     text =  gwa_proj-zzjkh.     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 40.     text text-014.                   "廠房模式     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 2.     text =  gwa_proj-zcfms.     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 2.     CALL METHOD document->new_line.     CALL METHOD document->underline.   "Draw  an underLine     text text-015.                   "公司性質     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 2.     text gwa_proj-zgsxz.     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 40.     text text-016.                   "客戶產能     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 2.     text =  gwa_proj-zkhcn.     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 40.     text text-017.                   "客戶啟動會議日期     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 2.     text =  gwa_proj-zqdhysj.     CALL METHOD document->add_text       EXPORTING         text         text         sap_emphasis text-052.     CALL METHOD document->add_gap       EXPORTING         width 2.     CALL METHOD document->new_line.     CALL METHOD document->underline.   "Draw  an underLine   ENDLOOP. ENDFORM.                    "HTML_TOP_OF_PAGE