midrange.com code scratchpad |
Name:
CQMHSNDPM
|
Scriptlanguage:
Plain Text
|
Tabwidth:
4
|
Date:
04/29/2010 02:43:38 pm
|
IP:
Logged
|
|
Description:
The user was to lazy to give a description
|
Code:
- /* Out: 3/24/00 8:21 Ver: 0. 0 Level20 Duane J. Christen */
- /* Ref: DJC 0010 Duane Christen - Small scope projects/OT01 Performanc */
- /* DJC: INITIAL COPY BOOK CREATION */
- *=========================================================================|
- * QMHSNDPM - SEND PROGRAM MESSAGE - EXECUTION CODE |
- *=========================================================================|
- * |
- * AUTHOR: DUANE J. CHRISTEN |
- * CREATION DATE: DECEMBER 29, 1999 |
- * |
- * |
- *! FOR A DESCRIPTION ON HOW TO USE THIS COPYBOOK SEE: |
- *! |
- * |
- *=========================================================================|
- * QMHSNDPM - CALL FORMATS |
- *=========================================================================|
- * |
- *-------------------------------------------------------------------------|
- * STANDARD PARAMETER GROUP |
- *-------------------------------------------------------------------------|
- * |
- C CALLP QMHSNDPM |
- * |
- C (SNDPM_MSG_ID : |
- C SNDPM_QUAL_MSGF : |
- C SNDPM_DATA : |
- C SNDPM_DATA_LENGTH : |
- C SNDPM_MSG_TYPE : |
- C SNDPM_C_STACK_ENTRY : |
- C SNDPM_C_STACK_COUNTER : |
- C SNDPM_MSG_KEY : |
- C USEC |
- * |
- *=========================================================================|
- * QMHSNDPM - OPTIONAL PARAMETER FORMATS |
- *=========================================================================|
- * |
- /IF DEFINED(QMHSNDPM_OPG1) |
- *-------------------------------------------------------------------------|
- * STANDARD PARAMETER GROUP |
- *-------------------------------------------------------------------------|
- * |
- C :SNDPM_LENGTH_C_STACK_ENTRY : |
- C SNDPM_C_STACK_ENTRY_QUAL : |
- C SNDPM_DSP_P_MSG_SCREEN_WAIT |
- /ENDIF |
- * |
- /IF DEFINED(QMHSNDPM_OPG2) |
- *-------------------------------------------------------------------------|
- * STANDARD PARAMETER GROUP |
- *-------------------------------------------------------------------------|
- * |
- C :SNDPM_C_STACK_ENTRY_DATA_TYPE: |
- C SNDPM_CCSID |
- /ENDIF |
- * |
- C ) |
- * |
- *=========================================================================|
|
|
|