Edit macro FLOC Edit macro FLOC Author: David McRitchie formatted on 1995/04/01 06:54 for assistance contact: D. McRitchie DMcRitchie@hotmail.com -------------------------------------------------------------------------------- CLIST NAME. FLOC users. PDF EDIT users particularly of EDITC001 demo type. Edit Macro resides in SYS1.TSOCLIST -------------------------------------------------------------------------------- FLOC Find and then Locate to cursor position -------------------------------------------------------------------------------- related FIND edit command, LOCATE edit command, and Appendix D -------------------------------------------------------------------------------- The FLOC macro has two basic forms. In the first form a FIND is is- sued and then a LOCATE to place the found line at the top of the screen. The second form includes the BEGIN(nn) option and is used in the dem- onstration clist EDITC001 which is documented in Appendix D. EDITC001 invokes macros EDITD001 and FLOC, as well as copying some ma- terial into a test dataset for temporary usage. A printed listing as found in Appendix D is handy to look at while proceding within the EDITC001 demonstration. Member NCDEMO01 in the text library can be scripted. -------------------------------------------------------------------------------- Since square brackets are not available, optional material is enclosed in European brackets <...>. ISREDIT FLOC {find options} Special usage forms as found in demonstration EDITC001. ISREDIT FLOC BEGIN(nn) PFX(#) SFX() SET ISREDIT FLOC BEGIN(nn) ISREDIT FLOC -------------------------------------------------------------------------------- find options Anything normally entered on a find command. After a suc- cessful FIND a locate to the CURSOR line will occur. This would be the normal use outside of the special demonstration forms. (no options) Utilizes the stored variables FLOCPFX FLOCCNT FLOCSFX after adding +1 to FLOCCNT. BEGIN(nn) FLOCCNT will be set to the BEGIN() value and will be stored. When SET is not used the FIND will be issued using the sup- plied value of BEGIN(). Normal invocation from executed might be. FIND '#5' FIRST -- when BEGIN(5) LOCATE .ZCSR PFX(#) Specifies the prefix to be used. SFX() Specifies the suffix to be used, null is the default. Other possibilities include SFX( ), and SFX(.). SET Set the ISPF variables, but do not issue the Find and Locate. Setting up for usage of FLOC without operands. SET will de- fault PFX(#) and SFX(). You might specify SFX( ) to mean a single space is required. Examples FLOC demonstration FLOC PFX(#) begin(0) SFX() SET FLOC FLOC FLOC BEGIN(8)