News Stay informed about the latest enterprise technology news and product updates.

SPLF2TIFF program

SPLF2TIFF program

SPLF2TIFF

 
/*************************************************************************/
     /*                                                                       */
     /* System....... Utility Management System                               */
     /* Program...... SPLF2TIFF - SPOOL FILE TO TIFF FILE                     */
     /* Written by... Sudhakar R Kunji                                        */
     /* Date......... 09/24/01                                                */
     /*                                                                       */
     /*                                                                       */
     /*                  Program Description                                  */
     /*                                                                       */
     /* CRTCMD   CMD(LIBRARY/SPL2TIFF)   PGM(LIBRARY/SPL2TIFFRP)        */
     /* SRCFILE(LIBRARY/QCMDSRC)   SRCMBR(SPL2TIFF)                        */
     /*                                                                       */
     /*                                                                       */
     /*                                                                       */
     /* * * * * * * * *  Indicator Usage * * * * * * * * * * * * * * * * * * **/
     /*                                                                       */
     /*                                                                       */
     /*                                                                       */
     /* * * * * * * * *  Externally Called Programs  * * * * * * * * *        */
     /*                                                                       */
     /* From/To     Program-Id    Parameters                                  */
     /*                                                                       */
     /*                                                                       */
     /*                                                                       */
     /* * * * * * * * * * *  Maintenance Log * * * * * * * * * * * *          */
     /*                                                                       */
     /* Req #       Date      Programmer     Modification Reason              */
     /*                                                                       */
     /*                                                                       */
     /*****************************************************************       */
             CMD        PROMPT('Convert Spool To TIFF File')

             PARM       KWD(FILE) TYPE(*NAME) MIN(1) MAX(1) +
                          FILE(*OUT) EXPR(*YES) PROMPT('Spooled +
                          File Name')

             PARM       KWD(JOB) TYPE(Q2) DFT(*) SNGVAL((*)) MAX(1) +
                          PROMPT('Job Name')
 Q2:         QUAL       TYPE(*NAME) LEN(10) MIN(1) EXPR(*YES)
             QUAL       TYPE(*NAME) LEN(10) MIN(1) EXPR(*YES) +
                          PROMPT('User Name')
             QUAL       TYPE(*CHAR) LEN(6) RANGE(000000 999999) +
                          SPCVAL(('      ')) EXPR(*YES) PROMPT('Job +
                          Number')

             PARM       KWD(SPLNBR) TYPE(*DEC) LEN(4) DFT(*LAST) +
                          RANGE(1 9999) SPCVAL((*ONLY 0) (*LAST +
                          -1)) PROMPT('Spooled File Number')

             PARM       KWD(TOTIFF) TYPE(*PNAME) LEN(128) MIN(1) +
                          EXPR(*YES) CASE(*MIXED) PROMPT('Stream +
                          File Name')

             PARM       KWD(REPLACE) TYPE(*CHAR) LEN(4) RSTD(*YES) +
                          DFT(*YES) VALUES(*YES *NO) +
                          PROMPT('Replace Stream File') 

Dig Deeper on iSeries programming commands

Start the conversation

Send me notifications when other members comment.

Please create a username to comment.

-ADS BY GOOGLE

SearchDataCenter

Close