Customized Work Center List
* * The standard SAP Work Center List - CR05 includes the flag for * deletion work center. This customized work center list allows * you to include or exclude those work center that have been flag * for deletion. Those with a 'X' in the list are flag for deletion. * * Written by : SAP Basis, ABAP Programming and Other IMG Stuff * http://www.erpgreat.com * REPORT ZPPWORKCENTER LINE-SIZE 120 NO STANDARD PAGE HEADING LINE-COUNT 058(001). TABLES: CRHD, "Work Center Header CRTX, "Text for the Work Center or Production Resource/Tool CRCO. "Assignment of Work Center to Cost Center SELECT-OPTIONS: S_WERKS FOR CRHD-WERKS DEFAULT 'XX', S_LVORM FOR CRHD-LVORM. SELECT * FROM CRHD WHERE LVORM IN S_LVORM AND WERKS IN S_WERKS. CLEAR CRCO. SELECT SINGLE * FROM CRCO WHERE OBJTY = 'A' AND OBJID = CRHD-OBJID AND ENDDA => SY-DATUM. CLEAR CRTX. SELECT SINGLE * FROM CRTX WHERE OBJTY = 'A' AND OBJID = CRHD-OBJID AND SPRAS = 'E'. WRITE: / CRHD-LVORM, CRHD-WERKS UNDER 'Plnt', CRHD-ARBPL UNDER 'Work Center', CRCO-KOSTL UNDER 'Cost Center', CRTX-KTEXT UNDER 'Description'. ENDSELECT. TOP-OF-PAGE. WRITE: / SY-DATUM, SY-UZEIT, SY-REPID, SY-UNAME, SY-PAGNO. SKIP. WRITE:/3 'Plnt', 8 'Work Center', 20 'Cost Center', 33 'Description'. *-- End of Program |
Related ABAP Topics:
Get help for your ABAP problems
More ABAP Tips
BDC Programming Tips - Sapscripts Tips - Smartforms Tips SAP ERP Modules, Basis, ABAP and Other IMG Stuff All the site contents are Copyright © www.erpgreat.com
and the content authors. All rights reserved.
|