2001-07-02 如何於 SEU 中編輯 CLP 時直接執行 Command ？（不是按 F21 ㄡ）而是將 Command 輸入於 SEU 編輯區，按執行鍵，馬上執行 Command。

如何於 SEU 中編輯 CLP 時直接執行 Command ？（不是按 F21 ㄡ）而是將 Command 輸入於 SEU 編輯區，按執行鍵，馬上執行 Command。

如何於 SEU 中編輯 CLP 時直接執行  Command ？（不是按 F21 ㄡ）
而是將 Command 輸入於 SEU 編輯區，按執行鍵，馬上執行 Command。

Step 1: Create Command Source

/*  QCMDSRC for source CMD                                           */
/*           *************** Beginning of data ***********************/
/*           0001.00 CMD                                             */
/*           ****************** End of data **************************/

Step 2: Create Command Processing PGM

/*  QCLSRC for source RETURN                                         */
/*           *************** Beginning of data ***********************/
/*           0001.00 RETURN                                          */
/*           ****************** End of data **************************/
                                                                       
Step 3: Create '@' Command 使用 QSYS/QCMD 當成 Command 的檢核程式
           Validity checking program

/* Create Command (CRTCMD)                                             
/*                                                                     
/* Command . . . . . . . . . . . . . . . . . . . . . .>_@_________ Name
/* Library . . . . . . . . . . . . . . . . . . . . . . . .  _*CURLIB___
/* Program to process command . . .  . >_RETURN_____ Name, *REXX       
/* Library . . . . . . . . . . . . . . . . . . . . . . . . . _*LIBL____
/* Source file . . . . . . . . . . . . . . . . . . . . . _QCMDSRC____ N
/* Library . . . . . . . . . .. . . . . . . . . .  . . . .  ._*LIBL____
/* Source member . . . . . . . . . . . . . . . . >_CMD________ Name, *C
/* Text 'description' . . . ._*SRCMBRTXT____________________           
/*                                                                     
/*                                                                     
/*                                                                     
/*                                  Additional Parameters              
/*                                                                     
/* Validity checking program . . . >_QCMD_______ Name, *NONE           
/* Library . . . . . . . . . . . . . . . . . . . . > _QSYS_______ Name,


附註: 你也可以 Create 自己含 CL Command 的 CLP 程式，例如 WAJ 
      技巧在於 利用Command 的檢核程式 Validity checking program。 

/*  QCMDSRC for source WAJ                                           */
/*           *************** Beginning of data ***********************/
/*           0001.00 WAJ                                             */
/*           ****************** End of data **************************/

Step 2: Create Command Processing PGM

/*  QCLSRC for source WAJ                                            */
/*           *************** Beginning of data ***********************/
/*           0001.00 WRKACTJOB                                       */
/*           ****************** End of data **************************/
                                                                       
Step 3: Create 'WAJ' Command 使用 library/WAJ 當成 Command 的檢核程式

/* Create Command (CRTCMD)                                             
/*                                                                     
/* Command . . . . . . . . . . . . . . . . . . . . . .>_WAJ_______ Name
/* Library . . . . . . . . . . . . . . . . . . . . . . . .  _*CURLIB___
/* Program to process command . . .  . >_RETURN_____ Name, *REXX       
/* Library . . . . . . . . . . . . . . . . . . . . . . . . . _*LIBL____
/* Source file . . . . . . . . . . . . . . . . . . . . . _QCMDSRC____ N
/* Library . . . . . . . . . .. . . . . . . . . .  . . . .  ._*LIBL____
/* Source member . . . . . . . . . . . . . . . . >_WAJ________ Name, *C
/* Text 'description' . . . ._*SRCMBRTXT____________________           
/*                                                                     
/*                                                                     
/*                                                                     
/*                                  Additional Parameters              
/*                                                                     
/* Validity checking program . . . >_WAJ________ Name, *NONE           
/* Library . . . . . . . . . . . . . . . . . . . . > _QSYS_______ Name,