To avoid confusions about the origin of printed documents a Test Indicator can be printed on each page of all SAP-Script documents that are issued from a Test System.
This Test Indicator shows in the top line of the page -The user who initiated the print. -The test system that was used to print. -The date and time the document was issued. -in the center of the page the word 'TEST' in big gray characters.
To add a Test Indicator to every new or copied SAP-Script document
apply the following code. 1. Edit the Script in the original language. 2. Create a paragraph = 'ZI' Description = 'Test Indicator' Alignment = 'CENTER' Font family = 'HELVE' Points = '8' Attributes = 'BOLD'. 3. Create a Window = 'TESTINDI' Description = 'Test Indicator' Type = 'CONST' Default Paragraph = 'ZI' 4. Add the next command to this window '/: INCLUDE Z_TESTINDICATOR OBJECT 'TEXT' ID 'ZSCR' LANGUAGE 'EN' PARAGRAPH 'ZI'' 5. Add this window to every page of the form Width = '21 CM' Height = '1 LN' 6. Edit the Script in every available language open window 'TESTINDI' and apply step 4. The include 'Z_TESTINDICATOR' does the formatting and printing and tests for the production system (no output). Standard Text Z_TESTINDICATOR /* INCLUDE TO PRINT THE WORD "TEST" USING BOXES /* /* MAKE SURE WE ARE NOT ON THE PRODUCTION SYSTEM /: IF &SY-SYSID& <> 'P01' /: BOX HEIGHT
Requires Free Membership to View
When you register, you will start receiving targeted emails from my award-winning team of editorial writers. Our goal is to keep you informed on the hottest topics and biggest challenges faced by SAP professionals today.
Hannah Smalltree, Editorial Director
7 MM INTENSITY 20 /* Character "T" /: POSITION WINDOW /: POSITION XORIGIN 40 MM YORIGIN 100 MM /: BOX HEIGHT 5 MM WIDTH 26 MM INTENSITY 20 /: POSITION WINDOW /: POSITION XORIGIN 51 MM YORIGIN 100 MM /: BOX HEIGHT 40 MM WIDTH 5 MM INTENSITY 20 /* Character "E" /: POSITION WINDOW /: POSITION XORIGIN 70 MM YORIGIN 100 MM /: BOX HEIGHT 5 MM WIDTH 24 MM INTENSITY 20 /: POSITION WINDOW /: POSITION XORIGIN 70 MM YORIGIN 115 MM /: BOX HEIGHT 4 MM WIDTH 20 MM INTENSITY 20 /: POSITION WINDOW /: POSITION XORIGIN 70 MM YORIGIN 135 MM /: BOX HEIGHT 5 MM WIDTH 24 MM INTENSITY 20 /: POSITION WINDOW /: POSITION XORIGIN 70 MM YORIGIN 100 MM /: BOX HEIGHT 40 MM WIDTH 5 MM INTENSITY 20 /* Character "S" /: POSITION WINDOW /: POSITION XORIGIN 105 MM YORIGIN 100 MM /: BOX HEIGHT 5 MM WIDTH 20 MM INTENSITY 20 /: POSITION WINDOW /: POSITION XORIGIN 105 MM YORIGIN 115 MM /: BOX HEIGHT 5 MM WIDTH 15 MM INTENSITY 20 /: POSITION WINDOW /: POSITION XORIGIN 100 MM YORIGIN 135 MM /: BOX HEIGHT 5 MM WIDTH 20 MM INTENSITY 20 /: POSITION WINDOW /: POSITION XORIGIN 100 MM YORIGIN 105 MM /: BOX HEIGHT 10 MM WIDTH 5 MM INTENSITY 20 /: POSITION WINDOW /: POSITION XORIGIN 120 MM YORIGIN 120 MM /: BOX HEIGHT 15 MM WIDTH 5 MM INTENSITY 20 /* Character "T" /: POSITION WINDOW /: POSITION XORIGIN 130 MM YORIGIN 100 MM /: BOX HEIGHT 5 MM WIDTH 26 MM INTENSITY 20 /: POSITION WINDOW /: POSITION XORIGIN 140 MM YORIGIN 100 MM /: BOX HEIGHT 40 MM WIDTH 5 MM INTENSITY 20 ZI printed by &SY-UNAME& from test system &SY-SYSID& on &SY-DATUM& = &SY-UZEIT& /: ENDIF
This was first published in April 2001