alv到处数据不全，系统bug 找到原因

T-McGrady1

你少的都是金额,
肯定是参照字段之类的设置有问题

ravi_zhou

有参考的啊~~

ravi_zhou

T-McGrady1 发表于 2012-6-27 16:34
你少的都是金额,
肯定是参照字段之类的设置有问题

有的 啊

T-McGrady1

对比一下和其它的有什么不同
还有你的结构里有货币参考单位么

ravi_zhou

T-McGrady1 发表于 2012-6-27 16:34
参照字段定义了没,用F1技术设置里看得到吗

这个嘛！考虑过了，一般是dn号，物料号有 零 被截断 ，加参考字段有用啊！这个主要开发机，和测试机是好好的！没有问题，只有在生产机上才发生这么诡异的问题。我快吐了
调试进去发现是
t_output放到栈里
在重栈里取出来，数据就不全了。下载download 函数没有问题，是栈出了问题，就是内存啊。

ravi_zhou

T-McGrady1 发表于 2012-6-27 17:04
对比一下和其它的有什么不同
还有你的结构里有货币参考单位么

不同嘛！就是我加了个负号提前的函数啊。但是负号提前，如果有问题，应该在测试机就不能下载啊~很晕。

T-McGrady1

ravi_zhou 发表于 2012-6-28 13:31
不同嘛！就是我加了个负号提前的函数啊。但是负号提前，如果有问题，应该在测试机就不能下载啊~很晕。

估计就是符号转换函数的问题,已经将数字转换成了字符吧
方便把代码贴出来看看

ravi_zhou

T-McGrady1 发表于 2012-6-28 14:12
估计就是符号转换函数的问题,已经将数字转换成了字符吧
方便把代码贴出来看看

function conversion_exit_z0002_output.
*"----------------------------------------------------------------------
*"*"Local interface:
*"  IMPORTING
*"     REFERENCE(INPUT)
*"  EXPORTING
*"     REFERENCE(OUTPUT)
*"----------------------------------------------------------------------

  data: output1(19)   type c,
             output2(19),
             outdatum   type p decimals 2.
  if  not input is initial.
    outdatum = input.
    if input > 0.
      write outdatum to output1 ."right-justified .
      concatenate ' ' output1 into output1.
    else.
      outdatum = outdatum * ( -1 ).
      write outdatum to output1 ."right-justified.
      concatenate '-' output1 into output1.
    endif.
  else.
*    output = ’0.00′.
    clear output1.
  endif.
  condense output1 no-gaps .
  write output1 to output2 right-justified .
  output = output2.

endfunction.

这个是代码 负号提前的代码啊

ravi_zhou

T-McGrady1 发表于 2012-6-28 14:12
估计就是符号转换函数的问题,已经将数字转换成了字符吧
方便把代码贴出来看看

gt_fieldcat-fieldname = 'UMBTR'.
  gt_fieldcat-seltext_m = text-t12.
  gt_fieldcat-edit_mask = '==Z0002'.   "负号提前
  gt_fieldcat-do_sum      = 'X'.           "小计
  append gt_fieldcat.
  clear gt_fieldcat.

  gt_fieldcat-fieldname = 'DEBTR'.
  gt_fieldcat-seltext_m = text-t13.
  gt_fieldcat-edit_mask = '==Z0002'.   "负号提前
  gt_fieldcat-do_sum      = 'X'.           "小计
  append gt_fieldcat.
  clear gt_fieldcat.

这个是负号提前代码

ravi_zhou

data: stack type slist_listlevel_stack with header line,
        listlevel type slist_listlevel.

  data tab_index_liststack type i.

  field-symbols: <tabh>.

  if list_index < 0.
    raise list_index_invalid.
  endif.

  system-call load listlevel-stack into stack.

  tab_index_liststack = list_index + 1.

  read table stack index tab_index_liststack into listlevel
                                 transporting listobject-listtab
                                              listobject-fmbstab
                                              listobject-fmbxtab
                                              listobject-fseltab
                                              listobject-pagetab.