%SST
Hi, Im traying to get out put of this below mention simple logic code.But im geting out of different.(im trying with my laptop trhough my company server. DCL &FIELD1 *CHAR 10 VALUE('TCS AS/400') DCL &FIELD2 *CHAR 10 CHGVAR(%SST(&FIELD2 1 10))(%SST(&FIELD1 10 1) Can you tell me the...
Hi, Im traying to get out put of this below mention simple logic code.But im geting out of different.(im trying with my laptop trhough my company server. DCL &FIELD1 *CHAR 10 VALUE('TCS AS/400') DCL &FIELD2 *CHAR 10 CHGVAR(%SST(&FIELD2 1 10))(%SST(&FIELD1 10 1) Can you tell me the...
125 pts.
RPG/400 ,CL/400 lifecycle
Hi, Very good morning my friends.Can any body tell me rpg/400 and cl/400 life cycle.please
Hi, Very good morning my friends.Can any body tell me rpg/400 and cl/400 life cycle.please
Performance tunning in iseries
Hi everyboby, How to do performance tunning in iseries ?Corrently we are using V5R3.Now a days system is going slow.anybody have CL program to do performance tunning.Or give same easy steps to do this. "Thanks in advance" Regards,...
Hi everyboby, How to do performance tunning in iseries ?Corrently we are using V5R3.Now a days system is going slow.anybody have CL program to do performance tunning.Or give same easy steps to do this. "Thanks in advance" Regards,...
Selecting a UserProfile
Friends, I have this CL and this CL select all users on this command: WRKSPLF SELECT(*ALL) OUTPUT(*PRINT) In a parameter (30 days) I retain all spooled files that users. I have a unique User to and this needs reatins Your spooled file by 90 dias. How can I select this condition on my...
Friends, I have this CL and this CL select all users on this command: WRKSPLF SELECT(*ALL) OUTPUT(*PRINT) In a parameter (30 days) I retain all spooled files that users. I have a unique User to and this needs reatins Your spooled file by 90 dias. How can I select this condition on my...
delete records from a directory with IFS root using CL
How to delete records from a directory with IFS root using CL based on the timestamp of the records.
How to delete records from a directory with IFS root using CL based on the timestamp of the records.
how to Move one file(flat file or PF) which is created in a batch job, to the systems C: drive.
how to Move one file(flat file or PF) which is created in a batch job, to the systems C: drive. sing CL
how to Move one file(flat file or PF) which is created in a batch job, to the systems C: drive. sing CL
What is the best way to execute SQL statements in a CL program.
What is the best way to execute SQL statements in a CL program. We can run sql statements in a RPG program. I want to delete some records from a file using the sql delete statement then organize it.
What is the best way to execute SQL statements in a CL program. We can run sql statements in a RPG program. I want to delete some records from a file using the sql delete statement then organize it.
RTVDSKINF
Hi Friends, I have a Cl and this CL contains this lines: PGM PARM(&RTV) DCL VAR(&SISTEMA) TYPE(*CHAR) LEN(10) DCL VAR(&PFILE) TYPE(*CHAR) LEN(10) DCL VAR(&LFILE) TYPE(*CHAR) LEN(10) DCL ...
Hi Friends, I have a Cl and this CL contains this lines: PGM PARM(&RTV) DCL VAR(&SISTEMA) TYPE(*CHAR) LEN(10) DCL VAR(&PFILE) TYPE(*CHAR) LEN(10) DCL VAR(&LFILE) TYPE(*CHAR) LEN(10) DCL ...
how to pass DATA AREA to RPGLE PROGRAM
hi, I have one data area called ABC of type *CHAR length is 10 in that i have some data i want pass that data area to RPGLE program as parameter, with in RPGLE program how can i receive that data area values in my program as PLIST and i am just calling this program from command line not from CL...
hi, I have one data area called ABC of type *CHAR length is 10 in that i have some data i want pass that data area to RPGLE program as parameter, with in RPGLE program how can i receive that data area values in my program as PLIST and i am just calling this program from command line not from CL...
Generic rename object
Hi, I'm trying to work out a way of generically renaming objects (files in specific) on an iseries. I have a large number of files which have names that begin with a letter which needs to be changed and end in a number which also needs to be changed, for example :- Axxxxx01 Ayyyyy01 Azzzz01 ...
Hi, I'm trying to work out a way of generically renaming objects (files in specific) on an iseries. I have a large number of files which have names that begin with a letter which needs to be changed and end in a number which also needs to be changed, for example :- Axxxxx01 Ayyyyy01 Azzzz01 ...
results of CL commands
how can i see the result of a cl command which i execute. For example, if i executing a command runsqlstm and it says command failed. how do i see the detailed description for the same result like why the command failed
how can i see the result of a cl command which i execute. For example, if i executing a command runsqlstm and it says command failed. how do i see the detailed description for the same result like why the command failed
Job Information
I want to retrieve Job number & user name for a particular job name. I come to know that through 'QUSLJOB'or 'QUSRJOBI' we can retrieve Job number & user name for a given job name.Is it possible ? I tried doing in the system through CL but it retrieves the current job name info running in the...
I want to retrieve Job number & user name for a particular job name. I come to know that through 'QUSLJOB'or 'QUSRJOBI' we can retrieve Job number & user name for a given job name.Is it possible ? I tried doing in the system through CL but it retrieves the current job name info running in the...
EDTOBJAUT
I am no expert, but I would like to try and make my life easier. I need to find out if there is a way for me to add/edit/delete these authorities per user in a CL program for instance. I am sitting with the problem that multiple files need to be created in multiple libraries, and the authorities...
I am no expert, but I would like to try and make my life easier. I need to find out if there is a way for me to add/edit/delete these authorities per user in a CL program for instance. I am sitting with the problem that multiple files need to be created in multiple libraries, and the authorities...
Calling non-as/400 programs via an RPGLE or CL program
Can it be done? If so, how would I go about doing this? Let's say I just have a small VB program I wrote that displays a picture. Can I let's say somehow link the VB program call to a CF key, like CF08?
Can it be done? If so, how would I go about doing this? Let's say I just have a small VB program I wrote that displays a picture. Can I let's say somehow link the VB program call to a CF key, like CF08?
CPF1236
What would cause CPF1236 to be issued for an overnight job we submit via a CL program? CPF1236 is "Subsystem &1 cannot start prestart job &2."
What would cause CPF1236 to be issued for an overnight job we submit via a CL program? CPF1236 is "Subsystem &1 cannot start prestart job &2."
Rename the uploaded file....
hi all i want to rename the just uploaded file to a PC from AS400. Like what happening is that i have used some commands to upload a PF to a .txt file to a PC that are written in CLLE. now i just want to rename the file name with a longer name that is not supported in that CLLE commands..... How...
hi all i want to rename the just uploaded file to a PC from AS400. Like what happening is that i have used some commands to upload a PF to a .txt file to a PC that are written in CLLE. now i just want to rename the file name with a longer name that is not supported in that CLLE commands..... How...
CL/400 - I want to know about QRYSLT(Please see below explanation)
Hi, I am not well versed with code in CL/400, i know the concepts. I want to know what is he doing in the below code. e.g usibng the symbols '|>' and '||' and '<|' IF COND(&TODUE7 *NE '0000000') THEN(DO) CHGVAR VAR(&QRYSL) VALUE(&QRYSL |> ' *AND (ODUDT *GE + ...
Hi, I am not well versed with code in CL/400, i know the concepts. I want to know what is he doing in the below code. e.g usibng the symbols '|>' and '||' and '<|' IF COND(&TODUE7 *NE '0000000') THEN(DO) CHGVAR VAR(&QRYSL) VALUE(&QRYSL |> ' *AND (ODUDT *GE + ...
