ABAP - 我的文章 - 小新爱上小丸子

小新爱上小丸子

seikeci.cublog.cn

关于作者

姓名： 小新
职业： sap
年龄： 25
位置： 上海

我的分类

文章列表 - ABAP

管理我的文章

获取table control某个单元格

查看全文
发表于:2007-06-20 ┆ 阅读(816) ┆ 评论(0)

Type group SYM

查看全文
发表于:2007-06-14 ┆ 阅读(659) ┆ 评论(0)

TEXTEDIT

查看全文
发表于:2007-06-14 ┆ 阅读(614) ┆ 评论(0)

se38程序加密

查看全文
发表于:2007-06-14 ┆ 阅读(1123) ┆ 评论(0)

字符与ASCII互转

查看全文
发表于:2007-06-08 ┆ 阅读(896) ┆ 评论(2)

alv 颜色设定list

查看全文
发表于:2007-06-01 ┆ 阅读(812) ┆ 评论(0)

如何从SAP中连接其他数据库

查看全文
发表于:2007-04-26 ┆ 阅读(1081) ┆ 评论(2)

guid 字段限制问题

查看全文
发表于:2007-04-26 ┆ 阅读(568) ┆ 评论(0)

ALV行颜色的设置

查看全文
发表于:2007-04-25 ┆ 阅读(812) ┆ 评论(0)

如何避免ALV长数字导出到EXCEL显示为科学计数法

查看全文
发表于:2007-04-25 ┆ 阅读(2450) ┆ 评论(1)

abap progress indicator实用实例

查看全文
发表于:2007-03-23 ┆ 阅读(692) ┆ 评论(0)

ABAP CHECKBOX 和LISTBOX使用指南

查看全文
发表于:2007-03-23 ┆ 阅读(1062) ┆ 评论(1)

用abap实现内表的行列转换-源代码2

查看全文
发表于:2007-03-23 ┆ 阅读(814) ┆ 评论(2)

ABAP实现对变式的修改

查看全文
发表于:2007-03-23 ┆ 阅读(708) ┆ 评论(3)

受注伝票: 受注伝票登録

<DIV>REPORT ZTESTDB01. data : iBAPISDHEAD like BAPISDHEAD occurs 10 with header line, iBAPIITEMIN like BAPIITEMIN occurs 10 with header line,"Item data input iBAPIPARTNR like BAPIPARTNR occurs 10 with header line."partners iBAPISDHEAD-doc_type = 'BV'. iBAPISDHEAD-SALES_ORG = '1000'. iBAPISDHEAD-DISTR_CHAN = '10'. iBAPISDHEAD-DIVISION = '10'. append iBAPISDHEAD. *****Item details iBAPIITEMIN-ITM_NUMBER = '10'. *HG_LV_ITEM = ''. *PO_ITM_NO = ''. iBAPIITEMIN-MATERIAL = 'SMB_FERT04'. append iBAPIITEMIN. *clear iBAPIITEMIN. ***** End Item details *****Partner functions iBAPIPARTNR-PARTN_ROLE = 'AG'. iBAPIPARTNR-PARTN_NUMB = '0000000001'. iBAPIPARTNR-ITM_NUMBER = '10'. iBAPIPARTNR-TITLE ='Company'. iBAPIPARTNR-name = 'Test Customer1'. iBAPIPARTNR-street = 'kandivali'. iBAPIPARTNR-country ='IN'. iBAPIPARTNR-POSTL_CODE = '400101'. append iBAPIPARTNR. *clear iBAPIPARTNR. *****end partner functions data : iBAPI_VBELN like BAPIVBELN-VBELN." value '0020000054'. data : iBAPISOLDTO like BAPISOLDTO occurs 10 with header line."SOLD TO PARTY data : iBAPISHIPTO like BAPISHIPTO occurs 10 with header line."SHIP TO PARTY data iBAPIRETURN1 like BAPIRETURN occurs 10 with header line. ***end addition loop at iBAPISOLDTO. CALL FUNCTION 'BAPI_SALESORDER_CREATEFROMDAT1' EXPORTING ORDER_HEADER_IN = iBAPISDHEAD WITHOUT_COMMIT = space * CONVERT_PARVW_AUART = 'X' IMPORTING SALESDOCUMENT = iBAPI_VBELN SOLD_TO_PARTY = iBAPISOLDTO SHIP_TO_PARTY = iBAPISHIPTO * BILLING_PARTY = '1' RETURN = iBAPIRETURN1 TABLES ORDER_ITEMS_IN = iBAPIITEMIN ORDER_PARTNERS = iBAPIPARTNR * ORDER_ITEMS_OUT = * ORDER_CFGS_REF = * ORDER_CFGS_INST = * ORDER_CFGS_PART_OF = * ORDER_CFGS_VALUE = * ORDER_CCARD = * ORDER_CFGS_BLOB = * ORDER_SCHEDULE_EX = . append iBAPIRETURN1. endlo……

查看全文
发表于:2007-03-02 ┆ 阅读(614) ┆ 评论(0)

bapi list and 拡張一覧

<TABLE style="BORDER-COLLAPSE: collapse" borderColor=#dddddd cellSpacing=0 cellPadding=0 width=360 align=center border=1>
<TBODY>
<TR height=60>
<TD align=middle width=60><IMG alt="" src="http://control.cublog.cn/fileicon/rar.gif" border=0></TD>
<TD>
<TABLE style="BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR height=20>
<TD align=middle width=40>文件:</TD>
<TD>拡張一覧.rar</TD></TR>
<TR height=20>
<TD align=middle width=40>大小:</TD>
<TD>71KB</TD></TR>
<TR height=20>
<TD align=middle width=40>下载:</TD>
<TD><A href="http://blogimg.chinaunix.net/blog/upfile/070301212714.rar">下载</A></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<DIV>bapi list</DIV>
<DIV>&nbsp;</DIV>
<DIV>拡張一覧</DIV>
<TABLE style="BORDER-COLLAPSE: collapse" borderColor=#dddddd cellSpacing=0 cellPadding=0 width=360 align=center border=1>
<TBODY>
<TR height=60>
<TD align=middle width=60><IMG alt="" src="http://control.cublog.cn/fileicon/rar.gif" border=0></TD>
<TD>
<TABLE style="BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR height=20>
<TD align=middle width=40>文件:</TD>
<TD>BAPI一覧.rar</TD></TR>
<TR height=20>
<TD align=middle width=40>大小:</TD>
<TD>46KB</TD></TR>
<TR height=20>
<TD align=middle width=40>下载:</TD>
<TD><A href="http://blogimg.chinaunix.net/blog/upfile/070301212633.rar">下载</A></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>

查看全文
发表于:2007-03-01 ┆ 阅读(448) ┆ 评论(0)

sap table

查看全文
发表于:2007-03-01 ┆ 阅读(503) ┆ 评论(0)

ABAP访问外部SQL

<DIV id=msgcns!B13B4B449C2F7496!232>这是一个ABAP访问外部SQL的你可以参照一下： 首先： 　　下面将ABAP访问外部SQL Server的做法完整贴出（已经测试通过） 首先在dbco中建立一个连接。 Connection name：Z_CONN DBMS ：MSS User name ：sa DB password : sa密码 Conn. info ：MSSQL_SERVER=服务器名称或IP地址 MSSQL_DBNAME=数据库名称 然后这是一个ABAP的测试例子： REPORT ZRPPTEST . DATA F1(40). TABLES dbcon. PARAMETERS: conexion LIKE dbcon-con_name. try. EXEC SQL. CONNECT TO :conexion ENDEXEC. EXEC SQL. SET CONNECTION :conexion ENDEXEC. CATCH cx_sy_native_sql_error. WRITE 'FALLUSE'. endtry. *DATA: BEGIN OF WA, * ContainerName(40), * END OF WA. *EXEC SQL. * SELECT ContainerName INTO :WA FROM Container *ENDEXEC. * try. * EXEC SQL. * CONNECT TO :p_dbconname * ENDEXEC. * EXEC SQL. * SET CONNECTION :p_dbconname * ENDEXEC. * * CATCH cx_sy_native_sql_error. * p_subrc = '99'. * ENDTRY. * IF sy-subrc = 0. WRITE 'ok'. ELSE. WRITE 'FALLUSE'. ENDIF. EXEC SQL. OPEN C1 FOR SELECT ContainerName FROM Container ENDEXEC. DO. EXEC SQL. FETCH NEXT C1 INTO :F1 ENDEXEC. IF SY-SUBRC &lt;&gt; 0. EXIT. ENDIF. WRITE: / F1. ENDDO. EXEC SQL. CLOSE C1 ENDEXEC. *EXEC SQL. *DO. * FETCH NEXT CURSOR C1 INTO wa. * IF SY-SUBRC &lt;&gt; 0. * CLOSE CURSOR C1. * EXIT. * ENDIF. * WRITE: / wa-ContainerName. * *ENDDO. *ENDEXEC.</DIV>
<DIV></DIV>
<DIV></DIV>

查看全文
发表于:2007-03-01 ┆ 阅读(713) ┆ 评论(0)

取IP地址的方法

<DIV id=msgcns!B13B4B449C2F7496!477>
<DIV>*&amp;---------------------------------------------------------------------* *&amp; Report&nbsp; Z_IP&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; * *&amp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; * *&amp;---------------------------------------------------------------------* *&amp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; * *&amp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; * *&amp;---------------------------------------------------------------------*</DIV>
<DIV>REPORT&nbsp; Z_IP&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp……

查看全文
发表于:2007-03-01 ┆ 阅读(625) ┆ 评论(0)

Workflow模塊

查看全文
发表于:2007-03-01 ┆ 阅读(514) ┆ 评论(0)

関連テーブル

<DIV>
<DIV>ロジスティクス SD関連テーブル■ </DIV>
<DIV>SD関連図　拡大 &nbsp;&#12539;トランザクションデータ 分類 TABLE名 内容　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 &nbsp; 共通 VBFA SD伝票の伝票フロー情報を格納。 共通 VBUK SD伝票の伝票ステータスをヘッダレベルで格納。 共通 VBUP SD伝票の伝票ステータスを明細レベルで格納。 共通 KONV SD伝票の価格情報を格納。SD伝票の伝票条件をキーに検索。 共通 VBPA SD伝票の取引先情報を格納。 共通 ADRC 取引先の住所情報を格納。住所番号をキーに検索。 受注 VBAK 受注伝票ヘッダ情報を格納。 受注 VBAP 受注伝票明細情報を格納。 受注 VBEP 受注伝票納入日程情報（納期情報）を格納。 受注 VBKD 受注伝票ビジネスデータを格納。 受注 VBPMA 伝票検索用。品目コードをキーに受注伝票を検索する際に利用。 受注 VBKPA 伝票検索用。得意先コードをもとに受注伝票を検索する際に利用。 出荷 LIKP 出荷伝票ヘッダ情報を格納。 出荷 LIPS 出荷伝票明細情報を格納。 出荷 VTTK シップメント伝票ヘッダ情報を格納。 出荷 VTTP シップメント伝票明細情報を格納。 出荷 VEPO 梱包ヘッダ情報を格納。 出荷 VEKP 梱包明細情報を格納。 出荷 VLPPA 伝票検索用。品目コードをキーに出荷伝票を検索する際に利用。 出荷 VLKMA 伝票検索用。得意先コードをもとに出荷伝票を検索する際に利用。 請求 VBRK 請求伝票ヘッダ情報を格納。 請求 VBRP 請求伝票明細情報を格納。 請求 VKDFS 未請求伝票情報を格納。 請求 VRPPA 伝票検索用。品目コードをキーに出荷伝票を検索する際に利用。 請求 VRKMA 伝票検索用。得意先コードをもとに出荷伝票を検索する際に利用。 &#12539;マスタデータ分類 TABLE名 内容　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 &nbsp; 得意先 KNA1 得意先の一般レベル情報を格納 得意先 KNB1 得意先の会社コードレベル情報を格納 得意先 KNVV 得意先の販売組織レベル情報を格納 得意先 KNBK 得意先の銀行口座情報を格納 得意先 KNMT 得意先/品目マスタ情報を格納 得意先 KNVI 得意先の税分類情報を格納 得意先 KNVP 得意先の取引先機能情報を格納 得……

查看全文
发表于:2007-03-01 ┆ 阅读(608) ┆ 评论(0)

ABAPレポートプログラムの出力結果をPDFに出力する

<DIV id=msgcns!B13B4B449C2F7496!930>
プログラムの手順としては下記の３つの手順のみとなります。 　①レポートからスプール依頼を登録する。 　②汎用モジュールCONVERT_ABAPSPOOLJOB_2_PDFを元にスプールをPDFデータに変換 　③PDCデータを拡張子を.PDF、バイナリ形式でファイルに保存する。 　①のスプール依頼の作成は 　&#12539;SUBMIT rep TO SAP-SPOOL 命令を使 用してレポートを実行する。 　&#12539;レポートをバックグラ ウンドジョブとして実行する。 　&#12539;ABAP 命令の NEW-PAGE PRINT ON を使用し 、レポートからの印刷機能を有効にする。 　といった３つの手法がありますので、運用にあった手法を用いてください。 　②汎用モジュール実行時のパラメータ設定はサンプルプログラムをご覧下さい。 　 　③バイナリ形式のダウンロードはファイルサイズを指定するのを忘れないで下さい。 どうでしょう非常に簡単ですね。上記の３点を実施するだけでレポート帳票をPDFファイルとして出力することが可能になります。皆さんもぜひ有効利用してください。 
 
REPORT ZPDFSAMPLE . DATA : PDFTAB LIKE TLINE OCCURS 100 WITH HEADER LINE. DATA : WK_SIZE TYPE I. *スプール情報をPDFに変換 CALL FUNCTION 'CONVERT_ABAPSPOOLJOB_2_PDF' EXPORTING 　SRC_SPOOLID = '9999' "スプール番号 　NO_DIALOG = ' ' IMPORTING 　PDF_BYTECOUNT = WK_SIZE "ファイルサイズ TABLES 　PDF = PDFTAB "PDFデータ EXCEPTIONS 　ERR_NO_ABAP_SPOOLJOB = 1 　ERR_NO_SPOOLJOB = 2 　ERR_NO_PERMISSION = 3 　ERR_CONV_NOT_POSSIBLE = 4 　ERR_BAD_DESTDEVICE = 5 　USER_CANCELLED = 6 　ERR_SPOOLERROR = 7 　ERR_TEMSEERROR = 8 　ERR_BTCJOB_OPEN_FAILED = 9 　ERR_BTCJOB_SUBMIT_FAILED = 10 　ERR_BTCJOB_CLOSE_FAILED = 11 　OTHERS = 12. *PDFデータをダウンロード CALL FUNCTION 'DOWNLOAD' EXPORTING 　BIN_FILESIZE = WK_SIZE 　FILENAME = 'c:\TestPDF.PDF' 　FILETYPE = 'BIN' TABLES 　DATA_TAB = PDFTAB.</FO……

查看全文
发表于:2007-03-01 ┆ 阅读(443) ┆ 评论(0)

プロセス一覧をプログラムから取得するには汎用モジュールTH_WPINFOを利用します

<DIV id=msgcns!B13B4B449C2F7496!931>
<DIV>プロセス一覧をプログラムから取得するには汎用モジュールTH_WPINFOを利用します。TH_WPINFOを実行するとSM50と同様の内容を取得することができます。</DIV>
<DIV>&nbsp;</DIV>
<DIV>DATA : WT_WPINFO LIKE WPINFO&nbsp; OCCURS 50 WITH HEADER LINE. CALL FUNCTION 'TH_WPINFO' &nbsp;TABLES &nbsp;&nbsp;&nbsp; WPLIST = WT_WPINFO &nbsp;EXCEPTIONS &nbsp;&nbsp;&nbsp; SEND_ERROR = 1 &nbsp;&nbsp;&nbsp; OTHERS = 2 . LOOP AT WT_WPINFO. &nbsp;&nbsp;&nbsp; WRITE : / WT_WPINFO-WP_NO, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_ITYPE, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_TYP, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_PID, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_ISTATUS, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_STATUS, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_IWAIT, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_WAITING, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_SEM, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_IRESTRT, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_RESTART, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_DUMPS, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_CPU, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_ELTIME, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_MANDT, &nbsp;&nbsp;&nbsp; WT_WPINFO-WP_BNAME. ENDLOOP.</DIV></DIV>
<DIV></DIV>

查看全文
发表于:2007-03-01 ┆ 阅读(411) ┆ 评论(0)

エクセルVBAからR/3の機能をリモートで呼びだ

<DIV>エクセルVBAからR/3システムの機能を呼び出すにはSAP社提供のActiveXコントロールを利用してリモートアクセス可能なR/3汎用モジュールを起動することで実現します。ActiveXやらCOMやらは何やらわからんという人はあまり気にしてもらわなくてもかまいません。下記の手順に従えば、エクセルVBAからR/3につながりますので、その基盤技術としてActiveXやらが使われていると思ってください。 さて、本題に入ります。まず<A href="http://seikeci.spaces.live.com/mmm2006-09-13_01.00/topic01.zip">ここから</A>エクセルファイルをダウンロードして開いてみてください。 <A style="TEXT-DECORATION: none" href="mailto:これはエクセルVBAからR/3データを取得するサンプルで入力項目にR/3データベースのテーブル名を入力して情報取得ボタンを押下するとテーブルの構成情報を取得することができます。(※ダウンロードファイルはExcelマクロが含まれています（VBAのサンプルですのであたりまえですが&#12539;&#12539;）。一部のウイルス検知ソフトウエアがインストールされていると、マクロ付のエクセルファイルをウイルスファイルとみなし、ダウンロードができない場合があります。このファイルにはウイルスは含まれておりませんのでご安心ください。ファイルがダウンロードできない方はdesigner@nifty.comまでご連絡ください。サンプルプログラムをメールにて送付させていただきます">これはエクセルVBAからR/3データを取得するサンプルで入力項目にR/3データベースのテーブル名を入力して情報取得ボタンを押下するとテーブルの構成情報を取得することができます。(※ダウンロードファイルはExcelマクロが含まれています（VBAのサンプルですのであたりまえですが&#12539;&#12539;）。一部のウイルス検知ソフトウエアがインストールされていると、マクロ付のエクセルファイルをウイルスファイルとみなし、ダウンロードができない場合があります。このファイルにはウイルスは含まれておりませんのでご安心ください。ファイルがダウンロードできない方はdesigner@nifty.comまでご連絡ください。サンプルプログラムをメールにて送付させていただきます</A>。） サンプルプログラムがうまく動かない人ぁ�

查看全文
发表于:2007-03-01 ┆ 阅读(481) ┆ 评论(0)

R3サーバー側にあるファイルの一覧を取得する

查看全文
发表于:2007-03-01 ┆ 阅读(433) ┆ 评论(0)

idoc

<DIV id=msgcns!B13B4B449C2F7496!954>
<DIV>查看idoc：WE02，WE05</DIV>
<DIV>端口定义：WE21</DIV>
<DIV>RFC目标定义：SM59</DIV>
<DIV>开发IDOC segment：WE31</DIV>
<DIV><SPAN lang=EN-US style="FONT-SIZE: 10.5pt; FONT-FAMIL……

查看全文
发表于:2007-03-01 ┆ 阅读(628) ┆ 评论(0)

在smartforms里动态取得程序里内表的值

查看全文
发表于:2007-03-01 ┆ 阅读(589) ┆ 评论(2)

SMARTFORMS不弹出打印，预览的窗口，直接预览

<H4>DATA: ctrl_param TYPE ssfctrlop, out_option TYPE ssfcompop, fm_name TYPE rs38l_fnam.</H4>
<DIV>
<DIV>ctrl_param-preview = 'X'. out_option-tddest = 'LP01'. " in your case it is LOCL ctrl_param-no_dialog = 'X'.</DIV>
<DIV>CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME' &nbsp; EXPORTING &nbsp;&nbsp;&nbsp; formname&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'Z_TESTJSW' &nbsp; IMPORTING &nbsp;&nbsp;&nbsp; fm_name&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = fm_name &nbsp; EXCEPTIONS &nbsp;&nbsp;&nbsp; no_form&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 1 &nbsp;&nbsp;&nbsp; no_function_module = 2 &nbsp;&nbsp;&nbsp; OTHERS&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 3. IF sy-subrc &lt;&gt; 0. &nbsp; MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno &nbsp; WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. ENDIF.</DIV>
<DIV>CALL FUNCTION fm_name &nbsp; EXPORTING &nbsp;&nbsp;&nbsp; control_parameters = ctrl_param &nbsp;&nbsp;&nbsp; output_options&nbsp;&nbsp;&nbsp;&nbsp; = out_option &nbsp;&nbsp;&nbsp; user_settings&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = space *&nbsp; TABLES *&nbsp;&nbsp;&nbsp; itab&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = itab[] &nbsp; EXCEPTIONS &nbsp;&nbsp;&nbsp; OTHERS&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 1.</DIV></DIV>
<DIV></DIV>
<DIV></DIV>

查看全文
发表于:2007-03-01 ┆ 阅读(596) ┆ 评论(0)

如何从SAP中查找BADI

BADI作为SAP的第三代用户出口，他的应用也越来越广泛，但如何找到合适的badi是许多abap程序员的困惑。我这里就介绍一下我个人的应用的经验，供大家参考。 
1、badi对象的信息存储在SXS_INTER, SXC_EXIT, SXC_CLASS 和SXC_ATTR&nbsp;这四个表中（参见SECE包）； 
2、sap程序都会调用cl_exithandler=&gt;get_instance来判断对象是否存在，并返回实例；其实get_instance就是对上述几个表和他们的视图（V_EXT_IMP&nbsp;和 V_EXT_ACT）进行查询和搜索。 
3、基于这个机理，我查用ST05来监控一个TCODE来跟踪，然后选择查找有关上述几个表和视图的操作，就可获得相关BADI。 
&nbsp;4、se18 查找接口，se19 实现接口就可以实现用户增强。 示例：用LE_SHP_DELIVERY_PROC控制跨月Cancel METHOD IF_EX_LE_SHP_DELIVERY_PROC~CHANGE_DELIVERY_HEADER . data : thismonth(2) type c. data : wa_likp type line of SHP_LIKP_T. data : wa_log type line of SHP_BADI_ERROR_LOG_T. clear ct_log[],thismonth. thismonth = sy-datum+4(2). "-----&gt;這一個月的月份 loop at it_xlikp into wa_likp. check IS_V50AGL-WARENAUSG_STORNO ='X'."---&gt;代表作GI cancel if wa_likp-WADAT_IST+4(2) &lt; thismonth. wa_log-VBELN = cs_likp-vbeln. wa_log-MSGTY = 'E'. "錯誤訊息 wa_log-MSGID = 'ZDN_ERROR'. "這一個class要自己建 wa_log-MSGNO = '001'. append wa_log to ct_log. "Error log寫入 endif. endloop. ENDMETHOD. 
<DIV></DIV>
<DIV>
 
<DIV><A href="http://www.yok.com.cn/blog/arron99/archive/2006/11/20/4429.html">SD相关的BADI </A></DIV>
<DIV>
<DIV>&nbsp;</DIV>
<DIV>
<TABLE style="WIDTH: 486pt; BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=647 border=0>
<COLGROUP>
<COL style="WIDTH: 152pt" width=202>
<COL style="WIDTH: 334pt" width=445>
<TBODY>
<TR style="HEIGHT: 14.25pt" height=19>
<TD style="BORDER-RIGHT: windowtext 0.5pt solid; BORDER-TOP: windowtext 0.5pt solid; BORDER-LEFT: windowtext 0.5pt solid; WIDTH: 152pt; BORDER-BOTTOM: windowtext 0.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" width=202 height=19><FONT face=宋体 size=……

查看全文
发表于:2007-03-01 ┆ 阅读(830) ┆ 评论(1)

读取内表的字段名

查看全文
发表于:2007-03-01 ┆ 阅读(544) ┆ 评论(0)

获取SAP系统用户出口列表程序

*&amp;---------------------------------------------------------------------* <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>*&amp;&nbsp;Report&nbsp;&nbsp;Y_FIND_USEREXIT&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;* <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>*&amp;&nbsp;获取SAP系统用户出口列表程序&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;* <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>*&amp;---------------------------------------------------------------------* <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>*&amp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;* <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>*&amp;<SPAN style="COLOR: #000000"……

查看全文
发表于:2007-03-01 ┆ 阅读(597) ┆ 评论(0)

批量下载程序和表结构

*&amp;---------------------------------------------------------------------* <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>*&amp;&nbsp;Report&nbsp;&nbsp;ZZHENGXB_TEST_DOWNLOAD <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>*&amp;&nbsp;批量下载程序和表结构 <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>*&amp;---------------------------------------------------------------------* <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>*&amp; <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>*&amp; <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>*&amp;---------------------------------------------------------------------* <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top> <IMG alt="" src="http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif" align=top>REPORT&nbsp;&nbsp;ZZHENGXB_TEST_UPLOAD&nbsp;NO&nbsp;STANDARD&nbsp;PAGE&nbsp;HEADING&nbsp;LINE-SIZE&nbsp;200&nbsp;MESSAGE-ID&nbsp;WA. <IM……

查看全文
发表于:2007-03-01 ┆ 阅读(527) ┆ 评论(1)

ABAP新手资料-函数的使用

ABAP新手资料-函数的使用 
函数名 描述 SD_VBAP_READ_WITH_VBELN 根据销售订单读取表vbap中的信息 EDIT_LINES 把READ_TEXT返回的LINES中的行按照TDFORMAT=“*”重新组织 VIEW_MAINTENANCE_CALL 维护表视图 函数名 描述 DY_GET_FOCUS 获得屏幕焦点 DY_GET_SET_FIELD_VALUE 获得或者设置屏幕字段的值 函数名 描述 F4IF_INT_TABLE_VALUE_REQUEST 显示检索help READ_TEXT 读取长文本 CONVERSION_EXIT_CUNIT_OUTPUT 单位转换 SJIS_DBC_TO_SBC 全角转半角 SJIS_SBC_TO_DBC 半角转换为全角 CO_R0_CHECK_DECIMAL_POINT 根据单位检查数据的小数位 POSTAL_CODE_CHECK 检查邮政编码 函数名 描述 CONVERSION_EXIT_ALPHA_INPUT 全数字则在前面补0 CONVERSION_EXIT_ALPHA_INPUT 和上面相反 GET_JOB_RUNTIME_INFO 获得job相关信息 TERMINAL_ID_GET 获得端末id DATE_CONVERT_TO_FACTORYDATE 把输入日期转为工厂日历日期 MESSAGE_TEXT_BUILD 把消息转为文本 函数名 描述 POPUP_TO_CONFIRM 弹出确认窗口 函数名 描述 CONVERSION_EXIT_MATN1_INPUT 物料号码转换函数 CONVERSION_EXIT_MATN1_OUTPUT 同上相反 CONVERT_TO_LOCAL_CURRENCY 按照指定日期汇率转换金额为指定货币类型 SSF_FUNCTION_MODULE_NAME 根据form名取得对应的函数名(SmartForm) 函数名 描述 DATE_CHECK_PLAUSIBILITY 日期CHECK cl_gui_frontend_services=&gt;gui_upload 上传到服务器 cl_gui_frontend_services=&gt;gui_download 下载到服本地 SSF_FUNCTION_MODULE_NAME SMARTFORMS输出报表时，生成一个函数名称，然后CALL这个名称 函数名 描述 POPUP_TO_DECIDE_LIST 弹出供选择窗口
<DIV></DIV>
<DIV></DIV>

查看全文
发表于:2007-03-01 ┆ 阅读(573) ┆ 评论(0)

会計期間：期間間隔の設定を更新

<DIV> *&amp;&nbsp;&nbsp;&nbsp; &#12539;BAPI_MESSAGE_GETDETAIL&nbsp;&nbsp;&nbsp;&nbsp; ：&#65396;&#65431;&#65392;&#65426;&#65391;&#65406;&#65392;&#65404;&#65438;の取得 *&amp;&nbsp;&nbsp;&nbsp; &#12539;BAPI_COMPANYCODE_GET_PERIO : 会計期間取得 *&amp;---------------------------------------------------------------------* REPORT&nbsp; ZTRZ001 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; NO STANDARD&nbsp; PAGE&nbsp; HEADING &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; LINE-SIZE&nbsp; 132 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; LINE-COUNT&nbsp; 66. *----------------------------------------------------------------------* *&nbsp;&nbsp;&nbsp;&nbsp; Ｔ００１Ｂ関係定義 *----------------------------------------------------------------------* DATA:WK_1B&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; LIKE&nbsp; T001B. *----------------------------------------------------------------------* *&nbsp;&nbsp;&nbsp;&nbsp; バッチインプット結果ＬＯＧ *----------------------------------------------------------------------* &nbsp;TYPES: BEGIN OF TYP_LOG_FILE, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ID&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; LIKE&nbsp; BAPIRET2-ID,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "メッセージクラス &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; NUMBER&nbsp;&nbsp; LIKE&nbsp; BAPIRET2-NUMBER,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "メッセージ番号 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MESSAGE&nbsp; LIKE&nbsp; BAPIRET2-MESSAGE,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "Msg. テキスト (短) &nbsp;END&nbsp;&nbsp; OF&nbsp; TYP_LOG_FILE. &nbsp;DATA:WK_LOG_FILE&nbsp; TYPE TYP_LOG_FILE.……

查看全文
发表于:2007-03-01 ┆ 阅读(514) ┆ 评论(0)

月末日の取得

查看全文
发表于:2007-03-01 ┆ 阅读(415) ┆ 评论(0)

請求書転記

FUNCTION Z_BAPI_INCOMINGINVOICE_POST. *"---------------------------------------------------------------------- *"*"Local interface: *"&nbsp; IMPORTING *"&nbsp;&nbsp;&nbsp;&nbsp; VALUE(INVOICEDOCNUMBER) LIKE&nbsp; BAPI_INCINV_FLD-INV_DOC_NO *"&nbsp;&nbsp;&nbsp;&nbsp; VALUE(FISCALYEAR) LIKE&nbsp; BAPI_INCINV_FLD-FISC_YEAR *"&nbsp; TABLES *"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; RETURN STRUCTURE&nbsp; BAPIRET2 *"----------------------------------------------------------------------
&nbsp; DATA: s_rbkpv&nbsp;&nbsp; TYPE mrm_rbkpv, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; tab_drseg TYPE mmcr_tdrseg, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; f_subrc&nbsp;&nbsp; TYPE sy-subrc.
*--- Read header and item data ----------------------------------------* &nbsp; PERFORM parked_invoice_data_read USING invoicedocnumber &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; fiscalyear &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CHANGING s_rbkpv &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; tab_drseg &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; return[] &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs……

查看全文
发表于:2007-03-01 ┆ 阅读(497) ┆ 评论(0)

ツールバーボタン押さない

DATA cl_gui_toolbar1 TYPE REF TO cl_gui_toolbar. &nbsp;&nbsp;&nbsp;&nbsp; cuscontainer&nbsp;&nbsp; TYPE REF TO cl_gui_custom_container. &nbsp;&nbsp;&nbsp;&nbsp; buttons_data&nbsp;&nbsp; TYPE ttb_button WITH HEADER LINE.
*process at screen 100
MODULE status_0100 OUTPUT. &nbsp; CREATE OBJECT cuscontainer &nbsp;&nbsp;&nbsp;&nbsp; EXPORTING &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; container_name&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'CONTAINER' &nbsp;&nbsp;&nbsp;&nbsp; EXCEPTIONS &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; cntl_error&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 1 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; cntl_system_error&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 2 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; create_error&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 3 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; lifetime_error&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 4 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; lifetime_dynpro_dynpro_link = 5 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; OTHERS&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 6. &nbsp; IF sy-subrc &lt;&gt; 0. &nbsp;&nbsp;&nbsp; MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. &nbsp; ENDIF.
&nbsp; CREATE OBJECT cl_gui_toolbar1 &nbsp;&nbsp;&nbsp; EXPORTING &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; parent&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = cuscontainer *&nbsp;&nbsp;&nbsp; SHELLSTYLE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = *&nbsp;&nbsp;&nbsp; LIFETIME&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =<B……

查看全文
发表于:2007-03-01 ┆ 阅读(429) ┆ 评论(0)

system message send

REPORT zsend. data: list like uinfo occurs 0 with header line. *data: ZSEND like ZSEND occurs 0 with header line. DATA: IT_F4_DENNO&nbsp;&nbsp;&nbsp;&nbsp; LIKE STANDARD TABLE OF ZSEND. data lf_dynprofield LIKE help_info-dynprofld. DATA ret_tab like DDSHRETVAL occurs 0 with header line. DATA RET_FIELD LIKE DFIES occurs 0 with header line. DATA&nbsp; T_ZSEND TYPE STANDARD TABLE OF ZSEND. DATA: L_CPROG TYPE SY-CPROG, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; L_DYNNR TYPE SY-DYNNR. DATA t_return like ddshretval occurs 0 with header line.
tables zdata.
parameters:P_USER like SY-UNAME, p_mess like SM04DIC-POPUPMSG.
INITIALIZATION.
*********************************************************** *AT SELECTION-SCREEN *********************************************************** at selection-screen. perform check.
*********************************************************** *AT SELECTION-SCREEN *********************************************************** AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_user.
CALL FUNCTION 'TH_USER_LIST' TABLES LIST = list.
&nbsp; SELECT NUM NAME &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; INTO CORRESPONDING FIELDS OF TABLE T_ZSEND &nbsp;&nbsp;&nbsp; FROM ZSEND &nbsp;&nbsp;&nbsp; FOR ALL ENTRIES IN list &nbsp;&nbsp;&nbsp; where num = list-BNAME.
&nbsp;
&nbsp;&nbsp;&nbsp; L_CPROG = SY-CPROG. &nbsp;&nbsp;&nbsp; L_DYNNR = SY-DYNNR. &nbsp; CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' &nbsp;&nbsp;&nbsp; EXPORTING &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DDIC_STRUCTURE&nbsp; = 'ZSEND' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; RETFIELD&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'NUM' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DYNPPROG&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = L_CPROG &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; DYNPNR&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&……

查看全文
发表于:2007-03-01 ┆ 阅读(499) ┆ 评论(1)

write tree

<DIV>REPORT ZIB_EXP_TREE_REP_SAMPLE LINE-COUNT 65 LINE-SIZE 80 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; NO STANDARD PAGE HEADING. ************************************************************************ * Author: Igor Barbaric * Expandable hierarchy tree report sample - very easy to build an * include program for universal usage! Consists of two main forms and * a sample tree. * Forms: *&nbsp;&nbsp;&nbsp; - "print_tree" prints the tree to the list out of *&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; the given internal table; items may be mixed in any order *&nbsp;&nbsp;&nbsp; - "expand_collapse" - maintains the internal table in such way that *&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; the selected branch is expanded or collapsed ********************************************************************* DATA: BEGIN OF ITEMS OCCURS 100, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ID(10), &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; PARENT_ID(10), &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; TEXT(20), &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; SYMBOL, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; END OF ITEMS, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; TABIX_STACK LIKE SY-TABIX OCCURS 10 WITH HEADER LINE, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ITEMS_SHOW LIKE ITEMS OCCURS 100 WITH HEADER LINE. INCLUDE &lt;SYMBOL&gt;. * append sample items (mixed order) PERFORM APPEND_ITEM USING: &nbsp;&nbsp; "no.&nbsp; par. no.&nbsp; title &nbsp;&nbsp;&nbsp; '1'&nbsp; ''&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Food', &nbsp;&nbsp;&nbsp; '2'&nbsp; ''&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Drinks', &nbsp;&nbsp;&nbsp; '12' '9'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Jack Daniels', &nbsp;&nbsp;&nbsp; '17' '11'&nbsp;&n……

查看全文
发表于:2007-03-01 ┆ 阅读(450) ┆ 评论(0)

bom function

查看全文
发表于:2007-03-01 ┆ 阅读(623) ┆ 评论(0)

BOM 明細追加と削除

CSAP_MAT_BOM_MAINTAIN
REPORT Z_TESTYM18 . DATA I_STKO TYPE STKO_API01. DATA T_STPO TYPE TABLE OF STPO_API03. DATA I_STPO TYPE STPO_API03. DATA I_DATUM(10). DATA FL_WARNING.
CALL FUNCTION 'CALO_INIT_API' &nbsp;EXCEPTIONS &nbsp;&nbsp; LOG_OBJECT_NOT_FOUND&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 1 &nbsp;&nbsp; LOG_SUB_OBJECT_NOT_FOUND&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 2 &nbsp;&nbsp; OTHERS&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 3.
IF SY-SUBRC &lt;&gt; 0. &nbsp; MESSAGE ID SY-MSGID TYPE 'E' NUMBER SY-MSGNO &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4. ENDIF.
I_STPO-ID_ITM_CTG = 'L'. I_STPO-ID_ITEM_NO = '0320'. I_STPO-ID_COMP = 'ZZXIAOXIN398'. I_STPO-ID_SORT = '0123003'. I_STPO-FLDELETE = 'X'. APPEND I_STPO TO T_STPO.
WRITE&nbsp; SY-DATUM TO I_DATUM. CALL FUNCTION 'CSAP_MAT_BOM_MAINTAIN' &nbsp; EXPORTING &nbsp;&nbsp;&nbsp; MATERIAL&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'ZZXIAOXIN393' &nbsp;&nbsp; PLANT&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'DCZE' &nbsp;&nbsp;&nbsp; BOM_USAGE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'A' &nbsp;&nbsp; ALTERNATIVE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = '01' &nbsp;&nbsp; VALID_FROM&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = '01.01.2008' "I_DATUM &nbsp;&nbsp;&nbsp; I_STKO&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = I_STKO &nbsp; IMPORTING &nbsp;&nbsp;&nbsp;&nbsp; FL_WARNING……

查看全文
发表于:2007-03-01 ┆ 阅读(524) ┆ 评论(0)

alv

<DIV>alvタイトル垂直表示</DIV>
<DIV>GRID 用 CALL FUNCTION 'LVC_ITEM_DETAIL'</DIV>
<DIV>LIST 用 CALL FUNCTION 'K_KKB_OUTTAB_DETAIL_SHOW'</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>ALV直接システムテーブルフィールド取得</DIV>
<DIV>REUSE_ALV_FIELDCATALOG_MERGE</DIV>
<DIV>&nbsp;</DIV>請求書のヘッダデータと請求書の明細データ登録
<DIV>BAPI_INCOMINGINVOICE_CREATE</DIV>
<DIV>&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>ALV二行表示と変更</DIV>
<DIV>*&amp;---------------------------------------------------------------------* *&amp; Report&nbsp; Z_TESTALV&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; * *&amp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; * *&amp;---------------------------------------------------------------------* *&amp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; * *&amp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp……

查看全文
发表于:2007-03-01 ┆ 阅读(635) ┆ 评论(1)

cc01 cc02

<DIV>CCAP_ALT_DATE_CHANGE CCAP_ALT_DATE_CREATE CCAP_ALT_DATE_DELETE CCAP_ASSIGN_OBJECT_TO_ALT_DATE</DIV>
<DIV> CALL FUNCTION 'CCAP_ASSIGN_OBJECT_TO_ALT_DATE' EXPORTING &nbsp;&nbsp;&nbsp; ALT_DATE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = '01.01.2007_00005' &nbsp;&nbsp;&nbsp; CHANGE_NO&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'ZD' &nbsp;&nbsp;&nbsp; CHG_OBJECT_TYPE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = '1' "BOM&nbsp;&nbsp; ref to se11:TCC03 &nbsp;&nbsp; BOM_CATEGORY&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'M' "Material BOM &nbsp;&nbsp; BOM_USAGE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = '1' &nbsp;&nbsp; MATERIAL&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'E-BOM-TEST01' &nbsp;&nbsp; PLANT&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'CZ00' &nbsp;&nbsp; FL_DELETE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'X' "Cancel assign &nbsp;&nbsp; FL_COMMIT_AND_WAIT&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'X' &nbsp;EXCEPTIONS &nbsp;&nbsp; ERROR&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 1 &nbsp;&nbsp; OTHERS&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 2.</DIV>
<DIV>IF SY-SUBRC &lt;&gt; 0. &nbsp; MESSAGE ID SY-MSGID TYPE 'S' NUMBER SY-MSGNO &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4. ENDIF.</DIV>

查看全文
发表于:2007-03-01 ┆ 阅读(454) ┆ 评论(0)

function

* ファイル選択時のデフォルトパスの取得（汎用モジュール） &nbsp; IF&nbsp; p_iofile IS INITIAL. &nbsp;&nbsp;&nbsp; CALL FUNCTION 'WS_ULDL_PATH' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; IMPORTING &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; upload_path = p_iofile.
&nbsp;
* ファイル選択ボックス（汎用モジュール） &nbsp; CALL FUNCTION 'WS_FILENAME_GET' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; EXPORTING &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; def_filename&nbsp;&nbsp;&nbsp;&nbsp; = ' ' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; def_path&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = p_iofile &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; mask&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = ',*.*,*.*.' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; mode&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = p_imode &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; title&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'ファイルの選択' &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; IMPORTING &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; filename&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = lp_file &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; EXCEPTIONS &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; inv_winsys&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 1 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; no_batch&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 2 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; selection_cancel = 3 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; selection_error&nbsp; = 4 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; OTHERS&nbsp;&nbsp;&nbsp;&nbs……

查看全文
发表于:2007-03-01 ┆ 阅读(453) ┆ 评论(0)

BAPI_MATERIAL_SAVEDATA

<DIV>FUNCTION ZD01_MM_COMMON. *"---------------------------------------------------------------------- *"*"Local interface: *"&nbsp; IMPORTING *"&nbsp;&nbsp;&nbsp;&nbsp; REFERENCE(I_INTAB) TYPE&nbsp; ZDS0001 *"&nbsp;&nbsp;&nbsp;&nbsp; REFERENCE(I_HEAD) TYPE&nbsp; BAPIMATHEAD *"&nbsp; EXPORTING *"&nbsp;&nbsp;&nbsp;&nbsp; REFERENCE(E_ERROR) TYPE&nbsp; P08_SP420 *"----------------------------------------------------------------------</DIV>
<DIV> &nbsp; data:w_HEADDATA&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; like BAPIMATHEAD, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_CLIENTDATA&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; like BAPI_MARA, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_CLIENTDATAX&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; like BAPI_MARAX, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_PLANTDATA&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; like BAPI_MARC, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_PLANTDATAX&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; like BAPI_MARCX, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_VALUATIONDATA&nbsp;&nbsp;&nbsp;&nbsp; like BAPI_MBEW, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_VALUATIONDATAX&nbsp;&nbsp;&nbsp; like BAPI_MBEWX, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_FORECASTPARAMETERS&nbsp; like BAPI_MPOP, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_FORECASTPARAMETERSX&nbsp; like BAPI_MPOPX, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_PLANNINGDATA&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; like BAPI_MPGD, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_PLANNINGDATAX&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; like BAPI_MPGDX, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_STORAGELOCATIONDATA&nbsp; like BAPI_MARD, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_STORAGELOCATIONDATAX like BAPI_MARDX,&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_SALESDATA&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; like BAPI_MVKE, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; w_SALESDATAX&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; like BAPI_MVKEX, &nbsp;&nbsp;&nbsp……

查看全文
发表于:2007-03-01 ┆ 阅读(1248) ┆ 评论(1)

日付を稼働日で求め直す

* 日付を稼働日で求め直す &nbsp; l_date = pi_date. &nbsp; CALL FUNCTION 'DATE_CONVERT_TO_FACTORYDATE' &nbsp;&nbsp;&nbsp; EXPORTING &nbsp;&nbsp;&nbsp;&nbsp; correct_option&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = '+' &nbsp;&nbsp;&nbsp;&nbsp; date&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = l_date *--&lt;2003/09/10 仕様変更 LINE 1 T.HAYASHI *&nbsp;&nbsp;&nbsp;&nbsp; FACTORY_CALENDAR_ID&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 'TE'&nbsp;&nbsp;&nbsp;&nbsp; "稼働日&#65398;&#65434;&#65437;&#65408;&#65438;&#65392; &nbsp;&nbsp;&nbsp;&nbsp; factory_calendar_id&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = lc_id&nbsp;&nbsp;&nbsp;&nbsp; "稼働日&#65398;&#65434;&#65437;&#65408;&#65438;&#65392; &nbsp;&nbsp; IMPORTING &nbsp;&nbsp;&nbsp;&nbsp; date&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = l_date *&nbsp;&nbsp;&nbsp;&nbsp; FACTORYDATE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = *&nbsp;&nbsp;&nbsp;&nbsp; WORKINGDAY_INDICATOR&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = &nbsp;&nbsp; EXCEPTIONS &nbsp;&nbsp;&nbsp;&nbsp; calendar_buffer_not_loadable&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 1 &nbsp;&nbsp;&nbsp;&nbsp; correct_option_invalid&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 2 &nbsp;&nbsp;&nbsp;&nbsp; date_after_range&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = 3 &nbs……

查看全文
发表于:2007-03-01 ┆ 阅读(471) ┆ 评论(0)

品目標準単価変更

查看全文
发表于:2007-03-01 ┆ 阅读(394) ┆ 评论(0)

alv 颜色设定和动态内表生成

REPORT ZPCRCO007. TABLES: MKAL,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "Production Versions of Material &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MAKT, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; PLAF,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "Planned order &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; AUFK,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "Order master data &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; AFPO,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "Order item &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; AFKO,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "Order header data PP orders &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; AUFM,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "Goods movements for order &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CRHD,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "WORK CENTER HEADER &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; AFVC,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "Operation within an order &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; AFRU,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "Order completion confirmations &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CRTX ,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "DETAILS &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; KAKO. *----------------------------------------------------------------------* *&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;……

查看全文
发表于:2007-03-01 ┆ 阅读(1002) ┆ 评论(0)

ｱﾄﾞｵﾝﾃｰﾌﾞﾙのDOWNLOAD＆UPLOAD処

<DIV>*----------------------------------------------------------------------* * [プログラム名] *&nbsp;&nbsp; ZFICS007 FI関係&#65393;&#65412;&#65438;&#65397;&#65437;&#65411;&#65392;&#65420;&#65438;&#65433;のDOWNLOAD＆UPLOAD処理 * [処理概要] *&nbsp;&nbsp; ＦＩ関係アドオンテーブルのダウンロード＆アップロード処理を行う。 * [改定履歴] *&nbsp;&nbsp;&nbsp; 2006/04/25 T.ITOU&nbsp;&nbsp;&nbsp; 新規作成 *----------------------------------------------------------------------* REPORT zfics007&nbsp; NO STANDARD PAGE HEADING&nbsp; MESSAGE-ID zc. *----------------------------------------------------------------------* *&nbsp; テーブル定義 *----------------------------------------------------------------------* TABLES: t001,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; " 会社コード &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; zfim0001,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; " TEC自動仕訳マスタ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; zfit0002,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; " 買掛金 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; zfit0003,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; " 買掛計上仕訳 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; zfit0004,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; " TEC仕訳ヘッダデータ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; zfit0005.&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; " TEC仕訳明細データ *----------------------------------------------------------------------* *&nbsp; アドオンテーブル編集用 *----------------------------------------------------------------------* * ZFIM0001 DATA: BEGIN OF it_zfim0001 OCCURS 0. &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; INCLUDE STRUCTURE zfim0001. DATA: END&nbsp;&nbsp; OF it_zfim0001. * ZFIT0002 DATA: BEGIN OF it_zfit0002 OCCURS 0. &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; INCLUDE STRUCTURE zfit0002. DATA: END&nbsp;&nbsp; OF it_zfit0002. * ZFIT0003 DATA: BEGIN OF it_zfit0003 OCCURS 0. &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; IN……

查看全文
发表于:2007-03-01 ┆ 阅读(590) ┆ 评论(0)

mb01 BAPI_GOODSMVT_CREATE

BAPI_GOODSMVT_CREATE to post Goods Movement The following is an abap program making used of the BAPI function BAPI_GOODSMVT_CREATE to do Goods Receipts for Purchase Order after importing the data from an external system. 
* * BAPI TO Upload Inventory Data * * GMCODE Table T158G - 01 - MB01 - Goods Receipts for Purchase Order *&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 02 - MB31 - Goods Receipts for Prod Order *&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 03 - MB1A - Goods Issue *&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 04 - MB1B - Transfer Posting *&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 05 - MB1C - Enter Other Goods Receipt *&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 06 - MB11 * * Domain: KZBEW - Movement Indicator *&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Goods movement w/o reference *&nbsp; B - Goods movement for purchase order *&nbsp; F - Goods movement for production order *&nbsp; L - Goods movement for delivery note *&nbsp; K - Goods movement for kanban requirement (WM - internal only) *&nbsp; O - Subsequent adjustment of "material-provided" consumption *&nbsp; W - Subsequent adjustment of proportion/product unit material * report zbapi_goodsmovement.
parameters: p-file like rlgrap-filename default &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'c:\sapdata\TEST.txt'. parameters: e-file like rlgrap-filename default &nbsp;&nbs……

查看全文
发表于:2007-03-01 ┆ 阅读(948) ┆ 评论(0)

Conversion of date specifications

<DIV>&nbsp;</DIV> 
<H1>CONVERT - Conversion of date specifications </H1>
<H2>Variants: </H2>
 1. CONVERT DATE f1 INTO INVERTED-DATE f2. 2. CONVERT INVERTED-DATE f1 INTO DATE f2. 
These variants are not allowed in an ABAP objectscontext. See <A href='sapevent:"ABENOO_OBS_CONVERT_2"'>Date conversions not allowed</A>. 
<H4>Effect </H4>
Calculates the nine's complement of the internal dateformat (YYYYMMDD - for more information about internal display,meaning and initial values of types, see <A href='sapevent:"ABAPTYPES"'>TYPES</A>) and places it in the field f2. For example, 19950511 ==&gt; 80049488 / 80049488 ==&gt; 19950511. In the inverse date format, the most recent date has the numericallysmallest value. You can make use of this effect when sorting dates. 
<H4>Note </H4>
The technique of manipulating the sort sequence of datesby inverting the internal date format is used only in very rare cases.You can sort internal tables in order of ascending or descending datevalues much more elegantly with the additions ... ASCENDING or... DESCENDING of the <A href='sapevent:"ABAPSORT"'>SORT</A>statement. 
<H4>Example</H4>
DATA DATE_INV LIKE SY-DATUM. CONVERT DATE SY-……

查看全文
发表于:2007-03-01 ┆ 阅读(490) ┆ 评论(1)

Display files on Application Server(UNIX)

*.................................................................... *: Title:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Browse file on Unix.&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; : *:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; : *: Description:&nbsp; Using internal System Call we gain access to UNIX. : *:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; The program uses the standard Unix command 'cat' to: *:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; browse the file&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; : *:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; : *:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; The program lets you browse a file record of up to : *:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 500 chars wide.&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs……

查看全文
发表于:2007-03-01 ┆ 阅读(520) ┆ 评论(0)

\|\|	<<	>>	\|\|

统计信息

·	总访问量：65374
·	文章个数：69
·	评论条数：26
·	留言条数：5
·	网友推荐：

感谢所有关心和支持过ChinaUnix的朋友们
页面生成时间：0.30022