Completing the Department Application › Defining Process Modules Using IDD › Step 1: Define Process Module XXXDUPD-PREMAP

Step 1: Define Process Module XXXDUPD-PREMAP

In order to define a process module, you must be using IDD. If you did not remain signed on to IDD at the end of the previous chapter, you should now sign on to the IDD menu facility, as described in Step 1: Invoke the IDD Menu Facility.

The first process module you will define in this chapter is process module XXXDUPD-PREMAP. Statements that you will input for the process module are shown below. This process module will be the premap process for dialog XXXDUPD.

MOVE 'Y' TO XXX-WK-FIRST-TIME.                                          1


IF AGR-CURRENT-FUNCTION EQ 'MODDEP'                                  -┐
THEN                                                                  │  2
    DISPLAY MSG TEXT                                                  │
        'MODIFY -- ENTER THE DEPARTMENT ID, OR SELECT: BACK OR EXIT'.-┘


ELSE                                                                 -┐
    DISPLAY MSG TEXT                                                  │  3
        'DELETE -- ENTER THE DEPARTMENT ID, OR SELECT: BACK OR EXIT'.-┘

₁ This statement sets the flag value in XXX-WK-FIRST-TIME to Y (YES).

₂ If the MODDEP function is in use, the dialog's map is displayed with the MODIFY message (defined here between the single quotation marks).

₃ If the DELDEP function is in use, the dialog's map is displayed with the DELETE message.

Specifying Basic Information About the Process Module

You use the Process Entity screen to specify basic information for a process module. You can display and use the Process Entity screen as shown:

                      CA                  CAGJF0
      IDD REL 15.0              *** MASTER SELECTION ***                   TOP
 -> proc
                          SIGNON TO IDD WAS SUCCESSFUL

             DICTIONARY NAME...: DEMO         NODE NAME..:

[Enter]

Enter the indicated specifications:

• Type the name of the process module. You can use your initials instead of XXX.
• Deselect the DISPLAY action and select the ADD action.
• Optionally type a description of the process.

      IDD REL 15.0                *** PROCESS ENTITY ***                   PROC
 ->
                                  DICT=DEMO

    DISPLAY      PROCESS NAME....: xxxdupd-premap
 _ MODIFY
 x ADD          VERSION NUMBER..: 1       _ HIGHEST    _ NEXT HIGHEST
 _ DELETE                                 _ LOWEST     _ NEXT LOWEST

                DESCRIPTION.....: display map to mod/del departments

When you press [Enter], IDD redisplays the Process Entity screen with a message. If the process module is defined successfully, the Process Entity screen displays a message like:

PROCESS 'XXXDUPD-PREMAP' VERSION 1 ADDED

If a different message is displayed, read the message to determine the problem. You can type over any errors, and then press [Enter] again.

After you specify basic information about a process module, you can use the Process Source screen to enter process commands for the process module. For example, enter process commands for process module XXXDUPD-PREMAP as shown:

-> srcs
                                                                [Enter]

SRCE identifies the Process Source screen.

The Process Source screen is displayed.

      IDD REL 15.0           *** PROCESS SOURCE ***                        SRCE
 ->                                             NO DATA LINES CURRENTLY EXIST
                       PROCESS 'XXXDUPD-PREMAP' VERSION 1

 ---+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----

Entering Process Statements

Enter source statements for the process module:

• Enter keywords, periods, and single quotes as shown.
• The exclamation point in any column signals the start of a comment.
• You can types spaces to indent statements, making the process source easier to read and debug.

Caution: Don't type any characters beyond column 72.

      IDD REL 15.0           *** PROCESS SOURCE ***                        SRCE
 ->                                             NO DATA LINES CURRENTLY EXIST
                       PROCESS 'XXXDUPD-PREMAP' VERSION 1

 ---+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----
move 'y' to'xxx-wk-first-time.
!
if agr-current-function eq 'moddep'
then
      display msg text
          'modify -- enter the department id, or select: back or exit'.
!
else
    display msg text
        'delete -- enter the department id, or select: back or exit'.

[Enter]

The Process Source screen is redisplayed.

      IDD REL 15.0           *** PROCESS SOURCE ***                        SRCE
 ->                                                                       1/10
                       PROCESS 'XXXDUPD-PREMAP' VERSION 1

 ---+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----
MOVE 'Y' TO XXX-WK-FIRST-TIME
!
IF AGR-CURRENT-FUNCTION EQ 'MODDEP'
THEN
    DISPLAY MSG TEXT
        'MODIFY -- ENTER THE DEPARTMENT ID, OR SELECT: BACK OR EXIT'.
!
ELSE
    DISPLAY MSG TEXT
        'DELETE -- ENTER THE DEPARTMENT ID, OR SELECT: BACK OR EXIT'.

After you press [Enter], IDD adds the process module to the data dictionary and redisplays the Process Source screen with a message like:

PROCESS 'XXXDUPD-PREMAP' VERSION 1 MODIFIED

After you finish using the Process Source screen for process module XXXDUPD-PREMAP, you can proceed to define process module XXXDUPD-ENTER.