Return to Mainframe Utilities Page

Module


ISREDIT MACRO
ISPEXEC CONTROL ERRORS RETURN
/**** SET MESSAGE DISPLAY ON/OFF BASED ON THE DEBUG SWITCH ***/
ISPEXEC VGET (DBGSWTCH) PROFILE
IF &DBGSWTCH = &STR(ON) THEN CONTROL MSG LIST CONLIST SYMLIST NOFLUSH
ELSE CONTROL NOMSG NOLIST NOFLUSH NOPROMPT
/**********************************************************************
/* UTILITY : PC                                                       *
/* AUTHOR : DAVE LEIGH                                                *
/* FUNCTION : PRINT A COMPILE LISTING.                                *
/**********************************************************************

ISREDIT (MEMBER) = MEMBER

%PRINTIT PDSN(&SYSUID..COMPILE.LISTING.&MEMBER)

EXIT
            


Documentation


 PC is an edit macro which works just like EC, and BC (edit compile and browse
 compile).  It captures the member name of the COBOL program you're editing, and
 creates a dataset name in the format of:
 youruserid.COMPILE.LISTING.programmemembername.  This dataset name is then
 passed to the PRINTIT print utility for printing.
            


Archives

Categories

Important links

leighweb.com – our family web site
surleslinteaux.leighweb.com – my wife’s French Sunday School blog
eglisejosue.fr – our church in France
tdr-guebwiller.eu – our house of prayer (HOP) in France
informatique.leighweb.com – My web development freelance business
My CV/Resume in English (PDF)