Hello. I am currently running my software on Windows 2019 server and I am experiencing a serious problem. The CALL SYSTEM instructions are not working, they are ignored on the new platform. Everything was working fine on Windows Server 2009 R2. Below are my instructions and I hope to receive your help in determining the problem.
02 COMP-D.
03 FILLER PIC X(43) VALUE "CMD.EXE /C COPY /Y .\\WG\\WGCOMPA .\\WG\\WGCOMP".
03 COMP-ANO-D PIC 9(4).
03 COMP-MES-D PIC 9(2).
02 ALMC-D.
03 FILLER PIC X(43) VALUE "CMD.EXE /C COPY /Y .\\WG\\WGALMC .\\WG\\WGALMC".
03 ALMC-ANO-D PIC 9(4).
03 ALMC-MES-D PIC 9(2).
02 MAES-D.
03 FILLER PIC X(43) VALUE "CMD.EXE /C COPY /Y .\\WG\\WGMAEST .\\WG\\WGMAES".
03 MAES-ANO-D PIC 9(4).
03 MAES-MES-D PIC 9(2).
02 TRAN-D.
03 FILLER PIC X(43) VALUE "CMD.EXE /C COPY /Y .\\WG\\WGTRANS .\\WG\\WGTRAN".
03 TRAN-ANO-D PIC 9(4).
03 TRAN-MES-D PIC 9(2).
02 ESTA-D.
03 FILLER PIC X(43) VALUE "CMD.EXE /C COPY /Y .\\WG\\WGESTAD .\\WG\\WGESTA".
03 ESTA-ANO-D PIC 9(4).
03 ESTA-MES-D PIC 9(2).
02 TOTA-D.
03 FILLER PIC X(43) VALUE "CMD.EXE /C COPY /Y .\\WG\\WGTOTAL .\\WG\\WGTOTA".
03 TOTA-ANO-D PIC 9(4).
03 TOTA-MES-D PIC 9(2).
HACER-BACKUP-MES-D.
MOVE I-MES-LINK TO COMP-MES-D
ALMC-MES-D
MAES-MES-D
TRAN-MES-D
ESTA-MES-D
TOTA-MES-D.
MOVE I-ANO-LINK TO COMP-ANO-D
ALMC-ANO-D
MAES-ANO-D
TRAN-ANO-D
ESTA-ANO-D
TOTA-ANO-D.
CALL "SYSTEM" USING COMP-D.
CALL "SYSTEM" USING ALMC-D.
CALL "SYSTEM" USING MAES-D.
CALL "SYSTEM" USING TRAN-D.
CALL "SYSTEM" USING ESTA-D.
CALL "SYSTEM" USING TOTA-D.