注册 登录
壹佰网|ERP100 - 企业信息化知识门户 返回首页

的个人空间 https://www.erp100.com/?0 [收藏] [复制] [RSS]

日志

ABAP-Sample 2

已有 461 次阅读2008/4/3 13:54

**-----------------------------------

** Sub Window

**-----------------------------------

 

*TABLES SPFLI.
*TABLES SFLIGHT.
*
* START-OF-SELECTION.
* SKIP.
* ULINE AT /(91).
*
* WRITE :/ sy-vline, (15) 'CARRID', sy-vline, (15) 'CONNID', sy-vline,
*(15) 'Country', Sy-vline, (15) 'CityFrom', sy-vline, (15) 'CityTo',
*sy-vline.
*
*ULINE AT /(91).
*
*SELECT * FROM SPFLI.
* WRITE:/ sy-vline, (15) SPFLI-CARRID, sy-vline, (15) SPFLI-CONNID,
*sy-vline, (15) SPFLI-Countryto, Sy-vline, (15) SPFLI-CityFrom, sy-vline
*,
* (15) SPFLI-AIRPFROM,sy-vline.
*
*HIDE: SPFLI-CARRID,SPFLI-CONNID.
*
* ULINE AT /(91).
*ENDSELECT.
*
*AT LINE-SELECTION.
* IF sy-lsind = 1.
* SET PF-STATUS 'STA6'.
*
*  SELECT * FROM SFLIGHT WHERE CARRID = SPFLI-CARRID and CONNID =
*SPFLI-CONNID.
*WINDOW STARTING AT 10 10 ENDING AT 40 30.
*
*
* WRITE : / SFLIGHT-CARRID, Sy-vline, SFLIGHT-Connid, Sy-vline,
*SFLIGHT-FLDATE, sy-vline, SFLIGHT-PRICE.
*
*ENDSELECT.
*ENDIF.

评论 (0 个评论)

QQ|Archiver|小黑屋|手机版|壹佰网 ERP100 ( 京ICP备19053597号-2 )

Copyright © 2005-2012 北京海之大网络技术有限责任公司 服务器托管由互联互通
手机:13911575376
网站技术点击发送消息给对方83569622   广告&合作 点击发送消息给对方27675401   点击发送消息给对方634043306   咨询及人才点击发送消息给对方138011526

GMT+8, 2025/11/30 03:04 , Processed in 0.008269 second(s), 12 queries , File On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

返回顶部