Home
Silvers Genealogy
IBM i Links
IBM i Utilities
IBM i ODBC
z/OS Links
ISPF Power Tips
ISPF Utilities
ISPF C/S & WSA
ISPF Scrnsavers
Rexx
390/ILE/LE Cobol
Screen Cams
Saved Stuff
Dish Hopper
TVersity
Audio to Dish Hopper
Miracast
Chromecast
Slideshows
About Rick Silvers

Resume Fun

EPCF

 

           Up

 

EPCF will edit any PC file (C drive or attached drive) from ISPF. *NOTE: A connection must exist between ISPF C/S and WSA.     

   Menu  Utilities  Compilers  Options  Status  Help                            
 ------------------------------------------------------------------------------
                            ISPF Primary Option Menu
 Option ===> EPCF
 
 0  Settings      Terminal and user parameters            <     Calendar     >
 1  +-------------- Edit PC File with ISPF Edit or PC Editor ---------------+ 
 2  |                                                                       | 
 3  | Command =====>                                                        | 
 4  |                (no quotes required)                                   | 
 5  | File Location: C:\$$FANDEZHI\LINKS2\COBOL_DEBUG_WORK.HTM              | 
 6  |                                                                       | 
 7  | Edit with PC Editor: N                                                | 
 9  |                                                                       | 
 10 +-----------------------------------------------------------------------+ 
 11 Workplace     ISPF Object/Action Workplace            Day of year. :   366
 S  SDSF          SDSF Panels
 D  DB2           DB2 Product, SPUFI and DB2 Commands
 A  DB2ADM        DB2 Administration Tools
 M  More          Additional IBM Products
 
      Enter X to Terminate using log/list defaults
 
 

 
 EDIT       C:\$$FANDEZHI\EPCF.REX                          Columns 00001 00072 
 Command ===>                                                  Scroll ===> 0005
 ****** ***************************** Top of Data ******************************
 000001 /* REXX */
 000002 /*-------------------------------------------------------------------*/
 000003 /*                         REXX                                      */
 000004 /*          (Restructured EXtended eXecutor language)                */
 000005 /*-------------------------------------------------------------------*/
 000006 /* Program  Name...: EPCF                                            */
 000007 /* Original Author.: Richard Silvers                                 */
 000008 /* Original Date...: 08-19-2009                                      */
 000009 /* Program  Purpose: Edit any file on PC or attached drive           */
 000010 /*-------------------------------------------------------------------*/
 000011 /* Maintenance Log.:                                                 */
 000012 /*-------------------------------------------------------------------*/
 000013 /* MM-DD-CCYY Programmer Comment                                     */
 000014 /* ---------- ---------- -------                                     */
 000015 /* 08-19-2009 R.Silvers  Created Program                             */
 000016 /*-------------------------------------------------------------------*/
 000017 address tso
 000018 
 000019 'ISPEXEC VGET (WSFNAME) PROFILE'
 000020 epcf=strip(wsfname,b,'"')
 000021 'ISPEXEC ADDPOP ROW(5) COLUMN(1)'

 

EPCF Source Code

Name

Type

Source Description
EPCF Rexx 
Exec

Rexx Exec

EPCFP ISPF
Panel

ISPF Panel

EPCFH ISPF
Panel

ISPF Panel Help

W011 MSG

ISPF MSG

 

Back Up Next

 

Last Updated 03/26/2017 10:37:50 AM by Rick Silvers

contact me: rsilvers@mebtel.net or rick_silvers@rsilvers.com