Is xmKEYFLDSPart somehow defined as a binary field (CCSID 66535) instead of
EBCDIC (37 or whatever your system is) in your code? I've hit this from
time to time when I used a field that is defined in a file and the file's
CCSID was defined as binary for some reason.
-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Eric Wolf
Sent: Wednesday, November 26, 2025 12:18 PM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: RE: SBMJOB converts command parameter to HEX
I added the %CHAR in an attempt to try to resolve this issue. I was trying
everything that I could think of to get this to work...
-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Maria
Lucia Stoppa
Sent: Wednesday, November 26, 2025 9:15 AM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: SBMJOB converts command parameter to HEX
CAUTION: This email originated from outside of the organization. Do not
click links or open attachments unless you recognize the sender and know the
content is safe.
Hi,
The variable xmKEYFLDSPart looks like a character string, why do you need to
use %char when creating the command to be executed?
I would have just concatenated cApos plus the trimmed variable.
Am I missing something?
Lucia
Il giorno mer 26 nov 2025 alle ore 18:08 Eric Wolf <EWolf@xxxxxxxxxxxxx> ha
scritto:
All,
When using a custom command interactively, the command looks like this:
ISIPMXPCMD TRID(PRCCHG)
DTFR(1251125)
TMFR(111404)
DTTO(1251125)
TMTO(111424)
USER(E05451)
KFLD('100,6514981001,,1140708100311F6000457F0892221F')
RPRC('0')
I am building the above command using this:
qcmd = 'SBMJOB CMD(ISIPMXPCMD OBCL(ITMPRC) '+
'TRID(' +%TRIM(mTRID)+ ') ' +
'DTFR(' +%EDITC(xmTRDT:'X') +') ' +
'TMFR(' +%EDITC(xmTRTMFr:'X') +') ' +
'DTTO(' +%EDITC(xmTRDT:'X') +') ' +
'TMTO(' +%EDITC(xmTRTMTo:'X') +') ' +
'USER(' +%TRIM(xmUSER) +') ' +
'KFLD('+cApost+%CHAR(%TRIM(xmKEYFLDSPart))+cApost+') ' +
'RPRC(' +cApost+'0'+cApost+')) ' +
'JOB(ITMPRCCHG) ' +
'JOBQ(QBATCHB)';
When using the SBMJOB, the command converts the KFLD parameter to this:
ISIPMXPCMD OBCL(ITMPRC) TRID(PRCCHG) DTFR(1251125) TMFR(163403)
DTTO(12511
25) TMTO(163423) USER(E05451)
KFLD(X'F1F0F06BF6F5F1F4F9F8F1F0F0F76B6B11407
08103251F7000602F0892221F') RPRC('0')
What feature of the SBMJOB command or the command itself do I need to
change to get the SBMJOB command to look like the interactive version?
TIA,
Eric
This communication is intended only for the use of the individual or
entity to which it is addressed and may contain information that is
privileged, confidential, or otherwise exempt from disclosure under
applicable law. If you are not the intended recipient, or the employee
or agent responsible for delivering this communication to the intended
recipient, you are hereby notified that any dissemination,
distribution, or copying of this communication is strictly prohibited.
If you have received this communication in error, please immediately
notify the sender by telephone or email. The technical data herein
provided is subject to export control under the International Traffic
in Arms Regulations (ITAR) or the Export Administration Regulations
(EAR). Such data should not be disclosed, exported or transferred in
any manner to any foreign person or any foreign country without prior
written approval of the Office of Defense Trade Controls, U.S. Department
of State or the Bureau of Industry
and Security, U.S. Department of Commerce. This email and any
attachments may contain confidential and proprietary information and
must be treated as such. In addition, the export or re-export of this
information may be prohibited under applicable export control laws.
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit:
https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.co
m_mailman_listinfo_rpg400-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v
5A_CdpgnVfiiMM&r=PCeNSf9fhcAUxJzoAZa9Db8EQ_28MTQACuQxevMqYzc&m=BEdqKuD
iFcZh6CKvp31ZsKN7Ptnwm-tmiBfvBinWfwC37EDgAvtmg2e4V_X7q6V4&s=ZjJryfNun1
H9k2rmqnqdf7r5QG946A6f5fAimH8egxw&e=
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_rp
g400-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=PCeNSf9fhc
AUxJzoAZa9Db8EQ_28MTQACuQxevMqYzc&m=BEdqKuDiFcZh6CKvp31ZsKN7Ptnwm-tmiBfvBinW
fwC37EDgAvtmg2e4V_X7q6V4&s=BOcBzbgo7BApID2hAVaXI349VaS8whoUgcahyrdTeYw&e=.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription
related questions.
--
Maria Lucia Stoppa
mlstoppa@xxxxxxxxx
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or
change list options,
visit:
https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mail
man_listinfo_rpg400-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfii
MM&r=PCeNSf9fhcAUxJzoAZa9Db8EQ_28MTQACuQxevMqYzc&m=BEdqKuDiFcZh6CKvp31ZsKN7P
tnwm-tmiBfvBinWfwC37EDgAvtmg2e4V_X7q6V4&s=ZjJryfNun1H9k2rmqnqdf7r5QG946A6f5f
AimH8egxw&e=
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_rp
g400-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=PCeNSf9fhc
AUxJzoAZa9Db8EQ_28MTQACuQxevMqYzc&m=BEdqKuDiFcZh6CKvp31ZsKN7Ptnwm-tmiBfvBinW
fwC37EDgAvtmg2e4V_X7q6V4&s=BOcBzbgo7BApID2hAVaXI349VaS8whoUgcahyrdTeYw&e=.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.
This communication is intended only for the use of the individual or entity
to which it is addressed and may contain information that is privileged,
confidential, or otherwise exempt from disclosure under applicable law. If
you are not the intended recipient, or the employee or agent responsible for
delivering this communication to the intended recipient, you are hereby
notified that any dissemination, distribution, or copying of this
communication is strictly prohibited. If you have received this
communication in error, please immediately notify the sender by telephone or
email. The technical data herein provided is subject to export control under
the International Traffic in Arms Regulations (ITAR) or the Export
Administration Regulations (EAR). Such data should not be disclosed,
exported or transferred in any manner to any foreign person or any foreign
country without prior written approval of the Office of Defense Trade
Controls, U.S. Department of State or the Bureau of Industry
and Security, U.S. Department of Commerce. This email and any attachments
may contain confidential and proprietary information and must be treated as
such. In addition, the export or re-export of this information may be
prohibited under applicable export control laws.
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or
change list options,
visit:
https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.
midrange.com
