All Z' modified PROD server code merge 09/10/2025
This commit is contained in:
@ -419,7 +419,7 @@
|
||||
00418 P0100-EXIT. DTSBU910
|
||||
00419 EXIT. DTSBU910
|
||||
00420 EJECT DTSBU910
|
||||
00421 P1100-READ. DTSBU910
|
||||
00421 P1100-READ. DTSBU910
|
||||
00422 IF FILE-SUB = +1 DTSBU910
|
||||
00423 MOVE MSKL-KEY-AREA OF LINK-REC DTSBU910
|
||||
00424 TO MSKL-KEY-AREA OF MSTA-SKL-REC DTSBU910
|
||||
|
||||
Reference in New Issue
Block a user