REPORT z08_05.
TABLES : trdir.
PARAMETERS: p_prog LIKE trdir-name OBLIGATORY.
START-OF-SELECTION.
SELECT SINGLE * FROM trdir WHERE name = p_prog.
IF sy-subrc = 0.
IF trdir-edtx = 'X'.
MOVE ' ' TO trdir-edtx.
MODIFY trdir.
WRITE: /'Editor Lock was removed from', p_prog.
ELSE.
WRITE: /'Program', p_prog, 'does not have an Editor Lock'.
ENDIF.
ELSE.
WRITE: /'No match found for program', p_prog.
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
510 | REPORT Z05_34. | sapjoy | 2012.07.30 | 823 |
509 | REPORT Z05_33. | sapjoy | 2012.07.30 | 853 |
508 | REPORT Z05_32. | sapjoy | 2012.07.30 | 816 |
507 | REPORT z05_31. | sapjoy | 2012.07.30 | 877 |
506 | REPORT z05_30. | sapjoy | 2012.07.30 | 850 |
505 | REPORT z05_29. | sapjoy | 2012.07.30 | 974 |
504 | REPORT z05_28. [1] | sapjoy | 2012.07.30 | 824 |
503 | REPORT z05_27. | sapjoy | 2012.07.30 | 867 |
502 | REPORT z05_26. | sapjoy | 2012.07.30 | 918 |
501 | REPORT z05_25. [1] | sapjoy | 2012.07.30 | 870 |
500 | REPORT z05_24. | sapjoy | 2012.07.30 | 878 |
499 | REPORT z05_23. | sapjoy | 2012.07.30 | 888 |
498 | REPORT z05_22. | sapjoy | 2012.07.30 | 874 |
497 | REPORT z05_21. | sapjoy | 2012.07.30 | 865 |
496 | REPORT z05_20. | sapjoy | 2012.07.30 | 1021 |
495 | REPORT z05_19. | sapjoy | 2012.07.30 | 996 |
494 | REPORT z05_18. | sapjoy | 2012.07.30 | 901 |
493 | REPORT z05_17. | sapjoy | 2012.07.30 | 898 |
492 | REPORT z09_02. | sapjoy | 2012.07.30 | 992 |
» | REPORT z08_05. | sapjoy | 2012.07.30 | 810 |