in

MODULE POOL PROGRAM – ON CHAIN-INPUT

<strong>DATA: N1TYPEi.
DATA: N2TYPEi.
DATA: N3TYPEi.
DATA:resTYPEi.
DATA:ok_codeTYPEsy-ucomm.</strong>

<strong>MODULEstatus_9000OUTPUT.</strong>
<strong>*SETPF-STATUSxxxxxxxx.</strong>
<strong>*SETTITLEBARxxx.</strong>

<strong>ENDMODULE.STATUS_9000OUTPUT</strong>

<strong>MODULEuser_command_9000INPUT.</strong>
<strong>CASEok_code.</strong>
<strong>WHENADD.</strong>
<strong>CALLSCREEN9001.</strong>
<strong>ENDCASE.</strong>
<strong>ENDMODULE.USER_COMMAND_9000INPUT</strong>

<strong>MODULEstatus_9001OUTPUT.</strong>
<strong>*SETPF-STATUSxxxxxxxx.</strong>
<strong>*SETTITLEBARxxx.</strong>
<strong>res= N1+ N2+ N3.</strong>
<strong>ENDMODULE.STATUS_9001OUTPUT</strong>

<strong>MODULEuser_command_9001INPUT.</strong>
<strong>CASEok_code.</strong>
<strong>WHENBACK.</strong>
<strong>CALLSCREEN9000.</strong>
<strong>ENDCASE.</strong>
<strong>ENDMODULE.USER_COMMAND_9001INPUT</strong>

<strong>moduleCHECK_TWO_NUMBERinput.</strong>
<strong>N1= N1+10.</strong>
<strong>N2= N2+10.</strong>

<strong>endmodule.CKECK_THREE_NUMBERINPUT</strong>

<strong><u>FLOW LOGIC OF SCREEN 9000</u></strong>

<strong>PROCESSBEFOREOUTPUT.</strong>

<strong>MODULEstatus_9000.</strong>

<strong>PROCESSAFTERINPUT.</strong>

<strong>CHAIN.</strong>

<strong>FIELD: N1,N2.</strong>

<strong>MODULE CHECK_TWO_NUMBER ONCHAIN-INPUT.</strong>

<strong>ENDCHAIN.</strong>

<strong>MODULEuser_command_9000.</strong>


<strong><u>FLOW LOGIC OF SCREEN 9001</u></strong>

<strong>PROCESSBEFOREOUTPUT.
MODULESTATUS_9001.</strong>

<strong>PROCESSAFTERINPUT.</strong>
<strong>MODULEUSER_COMMAND_9001.</strong>

Execute the program and if you provide any value to either n1 or n2  or both  then only  CHECK_TWO_NUMBER  module will run. Click on ADD & BACK button many times to see the change.

What do you think?

-1 Points
Upvote Downvote

Written by admin

Leave a Reply

Your email address will not be published. Required fields are marked *

MODULE POOL PROGRAM – ON REQUEST

MODULE POOL PROGRAM – ON CHAIN-REQUEST