すべての同期の完了後のユーザー出口

論理的な同期 (ダウンロードとアップロード) が正常に実行されるたび、モニターが次のウェイクアップまでのスリープに入る前に、ユーザー出口が存在する場合はその出口が呼び出されます。このユーザー出口には次の 1 つのパラメーター アドレスが渡されます。

• 該当サイクルでアップロードもダウンロードも実行されなかった場合は X'00'、アップロードのみが実行された場合は X'01'、ダウンロードのみが実行された場合は X'02'、アップロードとダウンロードの両方が実行された場合は X'03' という値を格納する、1 バイトの領域

必要な場合は、COBOL で独自のユーザー出口を作成することもできます。プログラムの名前は MFMONSYN にする必要があります。

IDENTIFICATION DIVISION.
PROGRAM-ID. MFMONSYN.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER.    IBM-PC.
OBJECT-COMPUTER.    IBM-PC.
DATA DIVISION.
LINKAGE SECTION.
01 P-FLAG PIC X(1).
PROCEDURE DIVISION USING P-FLAG.
*> EXECUTE CODE HERE
   GOBACK.