Chinaunix首页 | 论坛 | 博客
  • 博客访问: 717212
  • 博文数量: 158
  • 博客积分: 6010
  • 博客等级: 准将
  • 技术积分: 1643
  • 用 户 组: 普通用户
  • 注册时间: 2007-10-11 14:37
个人简介

人法地,地法天,天法道,道法自然

文章分类

全部博文(158)

文章存档

2022年(1)

2020年(3)

2016年(1)

2014年(7)

2013年(4)

2010年(5)

2009年(86)

2008年(25)

2007年(26)

我的朋友

分类: 系统运维

2010-10-11 20:05:34

影像  19:35:10

影像  19:35:30
需要读取项目文本的内容
影像  19:35:55
点击项目问进去后看到的内容为
影像  19:36:12

东园公  19:37:00
這裏看到的是read_text所需要的參數
东园公  19:37:50

东园公  19:38:05

东园公  19:40:19
*&---------------------------------------------------------------------*
*&      Form  GET_LONG_TEXT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      -->P_AUFNR  text
*----------------------------------------------------------------------*
FORM GET_LONG_TEXT  USING    P_AUFNR CHANGING MCTXT.
  DATA:L_TDNAME LIKE RSTXT-TDNAME .
  DATA:L_LINES LIKE TABLE OF TLINE WITH HEADER LINE .

  CLEAR L_TDNAME.
  CONCATENATE SY-MANDT P_AUFNR INTO L_TDNAME .

  CALL FUNCTION 'READ_TEXT'
    EXPORTING
      CLIENT                  = SY-MANDT
      ID                      = 'B01'
      LANGUAGE                = SY-LANGU
      NAME                    = '006000796200010'
      OBJECT                  = 'EBAN'
    TABLES
      LINES                   = L_LINES
    EXCEPTIONS
      ID                      = 1
      LANGUAGE                = 2
      NAME                    = 3
      NOT_FOUND               = 4
      OBJECT                  = 5
      REFERENCE_CHECK         = 6
      WRONG_ACCESS_TO_ARCHIVE = 7
      OTHERS                  = 8.

    READ TABLE L_LINES INDEX 1.
    IF SY-SUBRC = 0 .
      CONDENSE L_LINES-TDLINE NO-GAPS.
      IF L_LINES-TDLINE CS '成本中心' .
        MCTXT = L_LINES-TDLINE.
      ENDIF.
    ENDIF.

ENDFORM.                    " GET_LONG_TEXT

东园公  19:40:30

东园公  19:40:44
上面代碼對應的就是圖中的寫法
东园公  19:44:06

影像  19:44:33
SY-MANDT一般是不需要更改的吧

影像  19:44:53
好 这次真的明白了
东园公  19:45:11
圖文並茂
影像  19:45:20
牛人啊
影像  19:45:31
可以去开个补习班了
影像  19:45:35
呵呵
东园公  19:45:36
sy-开头的都为系统变量,你双击进去后能看到它的意思
影像  19:45:46
这知道
东园公  19:45:46
一般是不要改的
影像  19:45:52

东园公  19:46:09
sy-langu,是系统登陆时的语言
影像  19:46:15
我那个是采购申请
东园公  19:46:28
一般会有一个默认的
影像  19:46:42
NAME的参数就是 采购申请号吧
东园公  19:46:47

东园公  19:47:23
name为什么,这个可以看出的
东园公  19:47:34
是采购申请号加项目号
东园公  19:47:38
注意长度
东园公  19:47:49
注意位数
东园公  19:48:12
006000796200010
东园公  19:48:22
我输入的采购申请是60007962
东园公  19:48:39
但采购申请长度为10,不够,怎么办,前面加0
东园公  19:48:54
所以就有了内部编号和外部显示之分
东园公  19:49:06
一般通过这两个function进行转化:
影像  19:49:16
如果是输入参数的时候还需要把采购申请号和项目号和在一起
东园公  19:49:22
 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
      EXPORTING
        INPUT  = S_VBELN-LOW
      IMPORTING
        OUTPUT = S_VBELN-LOW.


 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        INPUT  = ITAB_DISPLAY-MATNR
      IMPORTING
        OUTPUT = L_MATNR.
影像  19:49:58
合在一起
东园公  19:50:03
是的,这个要合在一起才能当做read_textname的值,
东园公  19:51:00
对于不同的地方,这个name是不同的,所以name为什么值,你得找到表头,看看有什么规则没有,
东园公  19:51:20
一般是有规则的,那可以确定他的值,就这样,就可以获取它的文本
影像  19:51:24
ID号如果确定就不用改了吧
东园公  19:51:46
在系统中文本没有特定的字段存储,这些在表中存储时是十六进制!
东园公  19:52:21
一个地方的文本,它的ID是确认的,就看表头,表头里是什么,那它就是什么,
东园公  19:52:34

东园公  19:52:59
在这个里面只有内文(文本)名称是变量,其他都是可确认
东园公  19:53:15

影像  19:53:41
NAME 应该也是变量吧
东园公  19:53:40
这个明白了吧,明白了这个,以后对于这类的,用法都是这样的,都是这样找的!
东园公  19:54:02
name指的就是(内文)文本名称
东园公  19:54:19

东园公  19:54:32
当然这两个也是变量,但只要这样指定就可以了

阅读(5750) | 评论(1) | 转发(0) |
给主人留下些什么吧!~~

chinaunix网友2010-10-14 17:31:04

很好的, 收藏了 推荐一个博客,提供很多免费软件编程电子书下载: http://free-ebooks.appspot.com