'IS03.SHARE.TEXT(NCADD)' -- ART005 April 1st, 1995 6:54 a.m. -- dev(1403W8) chars(MONO) +--------------------------------------------------------+ | | | | | The Toolbox | | | | Documentation aids (continued from Dec 1992) | | | | Items in this section: | | 1. More EDIT commands and EDIT macros: | | reiteration (&), RESET. | | 2. reformatting text, drawing boxes, aligning | | JCL, making block letters. | | 3. Trapping output from commands and clists. | | 4. Documentation: SPELL, CHECKDUP. | | | | Clists and Macros described in this Newsletter: | | LABNX, / BIGS, BLOCK5, / CLISTBOX, DCFBOX, JCLBOX, | | REXXBOX, PBOX, CUSTBOX, / FIXJCL, REFORMAT, | | @STRAP, @STRAPE, / SPELL, CHECKDUP, and PROPER. | +--------------------------------------------------------+ ---------------------------------------------------------+- By David McRitchie (E-Mail ID - DMcRitchie@hotmail.com Intended audience -- TSO users somewhat familiar with the use of EDIT under PDF (Program Development Facility). The Toolbox column will provide information on using clists, utilities, and other in-house tools. If you have comments or suggestions for the Toolbox column or need a TSO tool please contact the author. Today's column will continue the focus of December's column on the use of EDIT and documentation aids not related to generating SCRIPT documents. More EDIT commands and EDIT macros reiteration of primary commands (&) By preceding a primary command with an ampersand (&) the command will be issued and will remain on the line to be modified and/or reissued by hitting the ENTRY key. RETRIEVE, usually PF24 (/PF12), will reissue the entire entry made on the command line but does not stay around. LABNX -- label non-excluded lines LABNX may be used to label non excluded lines. When the excluded lines are reset you will see that the labelled lines stand out. You might try this by first excluding all lines (X ALL) and then do a FIND ALL for some specific character strings, issue LABNX and finally RESET all excluded lines. LABNX is particularly useful when using @PRINTNX (Dec '92), and with NXNX LABEL to redisplay hidden labels. RESET -- abbreviation RES RESET is used to reset excluded lines and to eliminate special lines. Special lines include NOTE (=NOTE=) lines and MESSAGE (=MSG==) lines. The scope of a reset may be limited by using labels to identify which lines are to be involved. The line the cursor is on has a label of .ZCSR, the first line has a label of .ZF (or .ZFIRST), and the last line has a label of .ZL (or .ZLAST). RESET may also be used to reset only excluded lines (RESET X), to reset labels (RESET LABEL), also to reset error message lines (RESET ERR), changed lines (RESET CHG), unentered line commands (RESET CMD), and special lines (RESET SPE). You may read the tutorials on RESET by forcing an error in the use of RESET by typing in RESET ?. After you have hit the help key (PF1) twice you will be in the correct area of the tutorials. Clists that reformat, create, or add text BLOCK letters The BIGS macro will allow you to create block letters (also slanted box letters) like those used on the job separator pages. Three parameters may appear before the text to control format. When the first word is not numeric a default control of 0 0 0 will be used. The first control parameter is for extra space between letters, at least 1 is recommended when slanting characters. The second number indicates a slant to the left for negative numbers, to the right for positive numbers (0-4). The third indicates a vertical displacement between adjacent characters. Negative numbers are used to raise each subsequent letter. To try an example, get into a new member, create a blank line, key in but do not enter a BIGS primary command as show below, place the cursor on position 2 of the first line and then hit enter. Subsequently type in another BIGS command and position the cursor on the last line to continue with new material. BIGS creates letters 13 x 13, BLOCK5 creates letters 5 x 5 (additional spacing used between letters). Text will be overlaid unless you only add these letters to the bottom of your text. When the third parameter is negative, the lines above the cursor will be overlaid as well as on and below the starting cursor location. ===> BIGS big letters ===> bigs 1 1 0 slant ===> bigs 1 0 1 drop ===> bigs 1 1 1 Combination ===> block5 Creates a smaller lettering After keying in one of the commands above, place the cursor where you want the upper left corner of the first letter to appear and then hit enter. By using a stacked command you need only place the cursor one time. (a semi-colon is the default stack delimiter, yours is determined by whatever you have chosen in option 0.1). ===> bigs 1 1 0 slant;bigs 1 0 1 drop BOX macros Box macros that create comment boxes around text denoted as a copy block with a pair of CC line commands include the following: CLISTBOX, DCFBOX, JCLBOX, REXXBOX Box macros that create flowchart type boxes using a mask that overlays your text will create a box with the upper lefthand corner positioned at the cursor. These boxes are not recommended for use in conjunction with DCF formatted documents. PBOX -- creates a box 12 bytes wide and 6 rows deep including connection CUSTBOX -- customized box, 20 x 10 or specify desired width and depth FIXJCL macro The FIXJCL macro will realign JCL so that it has a neater appearance. JCL statements will be aligned so that EXEC, and DD will be aligned on column 12 with continuation in column 16 when possible. Lines will not be merged with other lines. The use of !EDCHEK before and after use is recommended. REFORMAT macro The REFORMAT macro allows the user to move columns around and has proved to be very useful. The lines involved may be limited by including label range pointers and/or limiting lines processed to the nonexcluded lines (NX). Column pairs are used denote the beginning and ending columns. Use the COLS line command to see the columns. The macro deals only with the data portion so if you have variable length records with sequence numbers you will have to subtract 8 from the column indicated by COLS. A string enclosed in single quotes may be substituted for a column pair. A column pair with a starting column of 0 indicates blanks are to be inserted, the paired column indicating the number of blanks to be inserted. Up to nine column pairs or constant strings may be specified. Refer to Documentation for more complete information. ===> reformat entire 10 30 0 5 31 40 ===> reformat .zf .zl 10 30 'string' 31 40 Trapping lines One problem with TSO commands and clists that display many lines is that you cannot see previously viewed lines. LISTCAT and HELP are prime examples. By trapping and storing the output into a dataset we can view the content with BROWSE or EDIT and even move or copy this information for use in documentation. The TSO clist TSOTRAP will allow you invoke a TSO command or clist and place you into edit of the results. The dataset created will be deleted upon leaving EDIT. This macro is very effective when used the in conjunction with the CUT macro (Dec '92) for pasting (PASTE) somewhere else later. Lines created by the TPUT assembler macro cannot be trapped, so the trapping of lines is not 100 per cent effective. ===> TSOTRAP LISTCAT The @STRAP macro will cause the trapped lines to be included at the bottom of the member that you are editing. @STRAPE is a variation that includes an EDIT mask for documentation purposes. ===> @STRAP LISTCAT Documentation aids SPELL macro The SPELL macro will invoke SCRIPT to check the spelling of anything in EDIT. Your data does not need to be saved beforehand, nor will SPELL change or cause your data to be saved. It is recommended that X ALL be used before invoking SPELL, and the use of a dictionary after invoking SPELL is also recommended. Over 7600 words have been added to the SCRIPT dictionary in order to support computer related documentation. SPELL will flag words that are correctly spelled, but we have worked to keep these to a minimum. In extreme cases where SPELL fails you should refer to the note at the end of the SPELL documentation. CHECKDUP The CHECKDUP macro will examine text for the occurrence of the same word used without intervening words. This is a frequent error which occurs when typing, and a thought is interrupted such as at the end of line. PROPER The PROPER macro will capitalize some words that are normally capitalized based on the word itself not on usage. This process will take awhile. Saving your data before use is recommended as well as the use of @COMPARE * afterwards to compare the unsaved changed text to the previously saved text. Documentation Refer to Dec 1992 Newsletter (ART004) on how to obtain or view documentation. If you have changed your mail address or have never received your own copy of the CIS Newsletter, please contact Celeste Onka (PROFs id ONKA) with your name, phone number, and mailing address.