Re: SBMJOB converts command parameter to HEX

[Maria Lucia Stoppa <mlstoppa@xxxxxxxxx>]

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://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.