之前已经用badi实现了 po header text的copy
还有一种方法，exit
查找对应的出口
查看对应的Function 及include，可以看看输入参数，看看哪些值可以用到
添加测试代码
为方便管理和维护，也为了里面别太乱，我把代码封到一个include里面，
其实建议是用Function，直接copy EXIT_SAPMM06E_012 或者自己建一个。
Function 里面，你用check 用return都只是退出Function，Function之外的不受影响。
但是如果你用include ，在include里面如果return了，include后面如果有别的代码，也就不执行了。
真出了bug的时候比较麻烦
参考代码
DATA : lt_tekpo TYPE TABLE OF bekpo,
ls_tekpo TYPE bekpo,
lt_lines TYPE TABLE OF tline,
lv_tdname TYPE thead-tdname,
ls_header TYPE thead.
DATA: lv_spras TYPE thead-tdspras.
lt_tekpo[] = tekpo[].
LOOP AT lt_tekpo INTO ls_tekpo.
"for header level
lv_tdname = ls_tekpo-banfn.
SELECT SINGLE spras INTO lv_spras FROM eban WHERE banfn = ls_tekpo-banfn.
CALL FUNCTION 'READ_TEXT'
EXPORTING
client = sy-mandt
id = 'B01'
language = lv_spras
name = lv_tdname
object = 'EBANH'
TABLES
lines = lt_lines
EXCEPTIONS
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
wrong_access_to_archive = 7
OTHERS = 8.
IF sy-subrc <> 0.
* MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
* WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ls_header-tdobject = 'EKKO'.
ls_header-tdid = 'F02'.
ls_header-tdspras = i_ekko-spras.
CALL FUNCTION 'SAVE_TEXT'
EXPORTING
client = sy-mandt
header = ls_header
insert = 'X'
TABLES
lines = lt_lines
EXCEPTIONS
id = 1
language = 2
name = 3
object = 4
OTHERS = 5.
IF sy-subrc <> 0.
* MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
* WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDLOOP.
至于item level的copy ，可以通过配置实现，在这里实现好像有问题
就是 ls_header-tdname 这个字段赋值问题。
因为还没有生成PO，所以 订单号 行项目号拼接 name的时候，前面要么留空，要么留0，
我看有人说可以用十个0代替，但是我测试没成功。
我分别对F01 F02 F03 赋值，拼接的时候分别用的 ：仅仅行项目号、0 行项目、空格 行项目。
都没有成功，有兴趣你们自己可以试试。可能跟版本 note等有关系。
不过行项目的copy 可以在之前说的那个badi实现，其实没必要，直接spor配置最简单
不过有一点
就是点击copy PR的时候，header text不会直接过来
只有点保存后，text才会生成，点保存的时候才会走那个出口
而之前那个BADI，不需要点保存，只要点copy，text就会带过来了。
带过来以后是可以修改的，修改完保存后，修改的内容不会被覆盖的，两种增强方法都可以，没问题。
另外本人开通了一个微信订阅号
欢迎关注：SAP学习记录 （SAPlearning ）