You have not provided any program code so it is difficult to understand
the logic of the problem.
Have you run the program in debug and before the exfmt check the values in
the fields that are being displayed on the screen and check for invalid
data.
Cheers
Don
Don Brown
Senior Consultant
[1]OneTeam IT Pty Ltd
P: 1300 088 400
-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of
Leandra MH Stewart
Sent: Wednesday, 6 May 2026 9:33 AM
To: midrange-l@xxxxxxxxxxxxxxxxxx
Subject: Session security issue?mlh
/Power 10, S1014 9105-41B Software v7r5. All PTF's and Cum's are
installed/
I am asking here rather then in the RPG forum since I feel like this is a
security issue and not a programming issue. Any help anyone can give would
be great. Thank you in advance
We created a new AP ACH program and when the end user runs it. It does
everything it is suppose to do but create the actual ACH file. The user is
running Rocket Legasuite Software.
When we run it, it will create the file, but it will sign us off of the
system. We are using iAccess.
*From one of our Programmers
====================================================================*
*/This is where it builds the files in QTEMP (APBK01CL) and /* */puts the
check info of hidden#, bank, check#, vendor into the file
(APBK01)/*
*/This is call from inside the Check Print (CHECK40) before printing /*
Object APDDCKA in library QTEMP not found.
Object APDDCKA in QTEMP type *FILE created.
1 objects duplicated.
Member APDDCKA file APDDCKA in QTEMP cleared.
File APCK created in library QTEMP.
1 objects duplicated.
Member APDDCKA file APDDCKA in QTEMP cleared.
*/This is the overall issue/*
Data sent to device MICHELLEMB not valid.Negative response code is
10050122.
Input or Output request failed.See message CPF5192.
Display status message request failed. See message CPF5263.
The IBM negative response code *10050122* is typically associated with
*IBM i (AS/400) 5250 terminal emulation sessions*. It indicates that the
system received invalid row or column data, causing the host to terminate
the session.
*The job log when I run the program
=================================================================*
Display Spooled File
File . . . . . : QPJOBLOG
Page/Line 1/1
Control . . . . . Columns
1 - 130
Find . . . . . .
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8....+....9....+....0....+....1....+....2....+....3
5770SS1 V7R5M0 220415 Job Log
S78B5721 05/01/26 14:58:02 MDT Page 1
Job name . . . . . . . . . . : QPADEV0008 User . . . . . .
: ANDIE Number . . . . . . . . . . . : 014346
Job description . . . . . . : QDFTJOBD Library . . . . .
: QGPL
MSGID TYPE SEV DATE TIME FROM PGM
LIBRARY INST TO PGM LIBRARY INST
CPF1124 Information 00 05/01/26 11:19:16.211650
QWTPIIPP QSYS 04DC *EXT *N
Message . . . . : Job
014346/ANDIE/QPADEV0008 started on 05/01/26 at
11:19:16 in subsystem QINTER in
QSYS. Job entered system on 05/01/26 at
11:19:16.
*NONE Request 05/01/26 11:19:31.606685
QPTKYPRC *N QUICMD QSYS 0543
Message . . . . : -STRTCPSVR
SERVER(HTTP)
*NONE Request 05/01/26 11:21:30.243348
QPTKYPRC *N QUICMD QSYS 0543
Message . . . . : -STRTCPSVR
SERVER(*AUTOSTART) RESTART(*HTTP)
HTTPSVR(*ADMIN)
*NONE Request 05/01/26 11:57:44.649672 QUICMD
QSYS 0543 QUICMD QSYS 0543
Message . . . . : -strpdm
CPF5140 Diagnostic 70 05/01/26 14:58:02.716355
QWSERROR QSYS 057B QWSGET QSYS 0683
Message . . . . : Session stopped
by a request from device QPADEV0008.
Cause . . . . . : The request
shutdown was caused by either the user turning
the power off, by a device error,
or the ASCII controller inactivity timer
expired. Recovery . . . :
Close the files and vary the device off (VRYCFG
command). If the problem occurs
again, enter the ANZPRB command to run
problem analysis.
CPF5503 Diagnostic 30 05/01/26 14:58:02.716459
QWSERROR QSYS 059D QWSGET QSYS 0683
Message . . . . : Input or Output
request failed. See message CPF5140.
Recovery . . . : See the message
CPF5140. Correct the errors and then try
the request again.
CPF1358 Escape 40 05/01/26 14:58:02.716552
QWTCCDSC QSYS 0AF6 QWSERROR QSYS 044B
Message . . . . : DSCJOB not
allowed.
Cause . . . . . : Job
014346/ANDIE/QPADEV0008 can not be disconnected for
one of the following reasons: --
The job is a source pass-through job. --
The job is a TELNET session which
did not specify a device name. Recovery .
. . : If the job is a source
pass-through job, it can not be disconnected.
If the job is a TELNET session, you
may be able to configure the TELNET
client to use a specific device.
The TELNET Device Initialization exit
point can also be used to get
specific device names for TELNET sessions.
CPF4410 Diagnostic 00 05/01/26 14:58:02.717142
QWSCLOSE QSYS 09A0 QUOIEXIT QPDA 0030
Message . . . . : File QDUODSPF in
library QPDA closed, device QPADEV0008
Cause . . . . . : The close was
successful, however the screen was not
cleared.
CPC1197 Completion 50 05/01/26 14:58:02.717781
QWTPITP2 QSYS 0651 *EXT *N
Message . . . . : Job ended because
device error occurred.
Recovery . . . : See the job log
for more information to the cause of this
error.
CPF4410 Diagnostic 00 05/01/26 14:58:02.718307
QWSCLOSE QSYS 09A0 QUIRCLAP QSYS 002D
Message . . . . : File QDUI132 in
library QSYS closed, device QPADEV0008 may
be unusable.
Cause . . . . . : The close was
successful, however the screen was not
cleared.
CPF1164 Completion 00 05/01/26 14:58:02.719501
QWTMCEOJ QSYS 0161 *EXT *N
Message . . . . : Job
014346/ANDIE/QPADEV0008 ended on 05/01/26 at 14:58:02;
.022 seconds used; end code 30 .
Cause . . . . . : Job
014346/ANDIE/QPADEV0008 completed on 05/01/26 at
14:58:02 after it used .022 seconds
processing unit time. The maximum
temporary storage used was 11
megabytes. The job had ending code 30. The job
ended after 1 routing steps with a
secondary ending code of 0. The job
Job name . . . . . . . . . . : QPADEV0008 User . . . . . . :
ANDIE Number . . . . . . . . . . . : 014346
Job description . . . . . . : QDFTJOBD Library . . . . . :
QGPL
MSGID TYPE SEV DATE TIME FROM PGM
LIBRARY INST TO PGM LIBRARY INST
ending codes and their meanings are
as follows: 0 - The job completed
normally. 10 - The job completed
normally during controlled ending or
controlled subsystem ending. 20
- The job exceeded end severity (ENDSEV job
attribute). 30 - The job ended
abnormally. 40 - The job ended before
becoming active. 50 - The job ended
while the job was active. 60 - The
subsystem ended abnormally while
the job was active. 70 - The system ended
abnormally while the job was
active. 80 - The job ended (ENDJOBABN command).
90 - The job was forced to end
after the time limit ended (ENDJOBABN
command). Recovery . . . :
For more information, see the Work management
topic collection in the Systems
management category in the IBM i Information
Center,
[2]
http://www.ibm.com/systems/i/infocenter/.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: [3]
https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
[4]
https://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.
--
Message protected by MailGuard: e-mail anti-virus, anti-spam and content
filtering.
[5]
https://www.mailguard.com.au
References
Visible links
1.
https://www.oneteamit.com.au/
2.
http://www.ibm.com/systems/i/infocenter/
3.
https://lists.midrange.com/mailman/listinfo/midrange-l
4.
https://archive.midrange.com/midrange-l.
5.
https://www.mailguard.com.au/
midrange.com
