All Z' modified PROD server code merge 09/10/2025
This commit is contained in:
@ -583,8 +583,10 @@
|
||||
00582 GO TO S910-MSTR-IO. DTSBD120
|
||||
00583 DTSBD120
|
||||
00584 S910-MSTR-IO. DTSBD120
|
||||
RCCODE DISPLAY 'START-Time:' CURRENT-DATE.
|
||||
00585 CALL 'DTSBU910' USING L910-LINK-AREA DTSBD120
|
||||
00586 MSKL-REC. DTSBD120
|
||||
RCCODE DISPLAY 'END-Time:' CURRENT-DATE.
|
||||
00587 S910-EXIT. EXIT. DTSBD120
|
||||
00588 SKIP3 DTSBD120
|
||||
00589 S921-OPEN-READ. DTSBD120
|
||||
|
||||
Reference in New Issue
Block a user