Johan's change, QR-56

2025-09-17 04:43:28 -04:00
parent e2e5d14e27
commit 2bdc775648
1 changed files with 2 additions and 2 deletions
--- a/CICS/RCSIGNON.cob
+++ b/CICS/RCSIGNON.cob
@ -116,7 +116,7 @@
           EXEC CICS
             SET TERMINAL(EIBTRMID)
-             UCTRANST('UCTRAN')
+             UCTRANST(DFHVALUE(UCTRAN))
           END-EXEC
           EXEC CICS