It looks like the default is the variable is equal to the job which should be 37. The CCID of the new password file is 37 as well
------------------------------
message: 5
date: Thu, 11 Apr 2024 21:20:57 +0200
from: <stefan@xxxxxxxxxx>
subject: RE: CLLE - Variable Sized Environmental Variable.
Are you using the right ccsid? Expecting sftp to run in PASE, I guess you need to set the variable in ascii?
Best regards
Stefan
--
No trees were killed in the sending of this message, but a large number of electrons were terribly upset.
Stefan Tageson
+46 732 369934
stefan@xxxxxxxxxx
-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Shane Reeves
Sent: Thursday, April 11, 2024 9:08 PM
To: midrange-l@xxxxxxxxxxxxxxxxxx
Subject: CLLE - Variable Sized Environmental Variable.
I'm trying to update a CLLE program that someone else wrote, and I'm stuck with trying to make the change I want.
The program calls a script that does a SFTP process that requires a password. Different connections require different passwords. The way the program is currently setup, the password is assigned to an ENVVAR based on the connection needed.
This works as-is. However, all of the passwords are hard-coded into the CLLE program currently.
ADDENVVAR ENVVAR(PASSWORD) VALUE('ThePassword') +
REPLACE(*YES)
What I want to do is instead pull the password from a file so that the program doesn't need to be updated every time a new connection is needed.
ADDENVVAR ENVVAR(PASSWORD) VALUE(&FL1_Pass) +
REPLACE(*YES)
However this fails. Different passwords are different length so the field has to be long enough support them all (and future passwords), so I suspect the issue is that the trailing spaces that get pulled in are causing the connection to fail. I've tried adding %Trim to get rid of the spaces; however this isn't allowed.
ADDENVVAR ENVVAR(PASSWORD) VALUE(%Trim(&FL1_Pass)) +
REPLACE(*YES)
I've also tried adding
ALWVARLEN(*YES)
To the DCLF statement, but that hasn't helped.
Can anyone please point me in the right direction?
thanks
Shane Reeves
--
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:
https://linkprotect.cudasvc.com/url?a=https%3a%2f%2flists.midrange.com%2fmailman%2flistinfo%2fmidrange-l&c=E,1,V4cMnyYfYGnWZTHD6Z-JV25HCoruDFCJSWbTUobPEVoRAqEEQeTvVvARWjdyefRRt6nr0U51KRLkQDJPQT3O_lKEbClKPCuY0CN68NL1-C4,&typo=1
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://linkprotect.cudasvc.com/url?a=https%3a%2f%2farchive.midrange.com%2fmidrange-l&c=E,1,glOd7PnrdmddwYue4gJwtJwBpqTLG04mqev4yiZj6cl6UTXZ-bubyT9DFe1TnsxYygJ7YynNiIHzXzo_luxUVIlR1CyT68S8dB1etL60ZFO76PgVXNYbHO4BZ-5P&typo=1.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
------------------------------
Subject: Digest Footer
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) digest list To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
https://linkprotect.cudasvc.com/url?a=https%3a%2f%2flists.midrange.com%2fmailman%2flistinfo%2fmidrange-l&c=E,1,OKXnsabGeZHhc6BVwLoYJPLh9XArhcGGTL5NAB25_9jPv1pYcC0wQZpeJq-ow2mkthT9kkUpGpDPxazVdXGwKgbDtdfwl0tfsprPdfYs9OVsIj9w&typo=1
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://linkprotect.cudasvc.com/url?a=https%3a%2f%2farchive.midrange.com%2fmidrange-l&c=E,1,EXWBfXgFnwwMrP6Ko2Hz2VC16pCausMvnFyThgPHmomKdrUMce7dXlsjh2hn9l6QUcQzwHnBhlNhctRg25qfu5nrSBpsHgZpPcWOqRFVCcoJyQ,,&typo=1.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
------------------------------
End of MIDRANGE-L Digest, Vol 23, Issue 327
*******************************************
midrange.com
