Use of ‘THRU’ in cobol ?
Hi. i have 2 questions in cobol : 1) Suppose i have a para : 1000-process Now while processing if i use : perform 1000-process thru 1000-exitand perform 1000-process .What will be the difference. 2) Suppose there is a cobol pgm named ABC .and in indentification division, i i give the name XYZ.Then i call [...]

Answer Question   |  February 22, 2011  7:00 AM
AS/400, COBOL, COBOL Programs, COBOL statements

Comment the compile time values in AS/400
HI,        I  am using compile time array.        I NEED TO COMMENT THE VALUES SPECIFIED which i specified after ** i can able to comment E spec but the values i cant….

Answer Question   |  April 2, 2012  7:49 AM
AS/400 administration, AS/400 command functions, AS/400 compile

Sort a table in COBOL on the Output Side
Warning: I have limited knowledge of tables!  I have a COBOL program that calculates GPAs on the fly in the OUTPUT section of the program.  I have to store these on-the-fly GPAs in a table, and then sort them by school, grade level, GPA total, then student id.  I can load my table, but I am not sorting [...]

Answer Question   |  March 2, 2011  9:38 PM
COBOL, COBOL Programs, ILE COBOL, iSeries Cobol programming

SFTP in batch mode
Hi How can we perform SFTP in batch mode? Is it possible to perform SFTP without using public and private keys? It would be of great help if provided some sample code to refer also.   Thanks, Vivek

Answer Question   |  February 18, 2011  2:31 PM
AS/400, AS/400 SFTP, RPG Batch Mode, SFTP

Command documentation problem . GENCMDDOC
I used the GENCMDDOC command with the INSLNXSVR and got this error (command works well with other commands): +>> GENCMDDOC CMD(INSLNXSVR) TODIR (‘/temp’)                                     Java Virtual Machine is Classic.                                            Command documentation not generated for proxy command INSLNXSVR in QSYS.     1 command documents failed; 0 command documents created successfully.   Any hints on how to ‘repair’ [...]

Answer Question   |  February 20, 2011  12:16 PM
COMMANDS, GENCMDDOC, i5/OS, iSeries Commands

How to send packets in peer-to-peer networking
hello.. i’m still new in IT field.. i want to ask some question about networking.. how do i want to send tcp and udp packet in peer to peer network environment which is without any server in my topology. i don’t know what software should i use. after send both packet, i have to capture [...]

Answer Question   |  February 19, 2011  11:18 AM
Advanced Peer-to-Peer Networking, Packets, Peer-to-Peer, TCP, UDP

AS/400 EndJob Issue
Hi I have been working on my as/400 session but suddenly it was ended by some remote user. How can I identify which user has ended my session remotely? Thanks, Vivek

Answer Question   |  February 18, 2011  10:16 AM
AS/400 jobs, AS/400 remote access, AS/400 Workstations, ENDJOB

Subfile in As400
Hi below pasted is my code which i am running but i am getting an error ‘Attemp to write duplicate records” DDS A*                                                         A                                      CF03(03)            A                                      DSPSIZ(24 80 *DS3)  A          R RECSFL                    SFL                 A  30                                  SFLNXTCHG           A            UPC           20   B  9  3TEXT(‘UPC 2ND ITEM’) A  31                                  DSPATR(UL)          A*                                                         A          R RECCTL                    SFLCTL(RECSFL)      A*                                                         A                                      OVERLAY             [...]

Answer Question   |  February 22, 2011  9:20 AM
AS/400, AS/400 Subfiles, Duplicate records, OS/400

What has to change in this EXECIO Scripting?
What has to change in the script below in order to generate more than one entry to the outfile? I am capturing the data to send to an outfile but it only posted the first occurence to the dataset   /* REXX */ ADDRESS TSO “ALLOC FI(OUTFILE) DSNAME(‘xxxxx.xxxxxxxx.xxxxxx’) MOD REUSE” DAYS = DATE(“B”) NEWDATE = [...]

Answer Question   |  February 18, 2011  3:34 AM
EXECIO Scripting, Outfile, Scripting

SST password in AS/400
i have installed V6R1 on my machine and i am not able to enter in SST whoever i have entered in DST and tried to change the password of my SST. I have not setup and ID and password for SST , please advise what do i need to do now, 1111111 and 2222222 is also [...]

Answer Question   |  February 18, 2011  1:57 AM
AS/400, DST, SST, V6R1

How can I concatenate files for transfer from the iseries
I have 3 files with a common layout in a common library on the i5. The source files (query results) have different definitions so I am unable to append the result of query2 to query1. So what I want is to perform a UNION or concatenate them into a single download file. I have tried a [...]

Answer Question   |  February 28, 2011  3:12 PM
AS/400 Query, Concatenate, i5, i5 Commands

Position cursor when back to subfile
I have to position the cursor of a subfile in the same field where i am selected after back from some other screen validation. The subfile type is SFLSIZ>SFLPAG . Please help

Answer Question   |  February 17, 2011  1:42 PM
AS/400 Subfiles, SFL subfile, SFLSIZ, Subfile Control

Create a calender using RPG
my requirement is to create a calender using rpg.first it show the present date calender,after user select month,year.then it show that month calender.please give example code

Answer Question   |  February 18, 2011  10:49 AM
AS/400, AS/400 administration, AS/400 command functions, RPG

AS/400 RSTD mode?
to install a LIC PGM , do we need to put the system in RSTD mode ?

Answer Question   |  February 18, 2011  2:01 AM
AS/400, AS/400 LIC, RSTDSP

AS/400 distribution not working
I have setup destribution between 2 as400 systems, I have created queue both side and inroll user in dir entry , QSNADS is also active but i am not able to send the file from one system to another.  when i use SNDNETF i receive the file on the same system. Please advise what else [...]

Answer Question   |  February 22, 2011  1:58 AM
AS/400 queue, AS400 distribution, SNDNETF

CPYFRMIMPF CPF2845 reason code 10
OS/400 V5R2. I’m running a CPYFRMIMPF to import a file from the IFS drive to a database file. this is the command: CPYFRMIMPF FROMSTMF(‘/FTP/CPA/NUMERICT’) TOFILE(ASPONITE/SCPA00_TMP) MBROPT(*REPLACE) RCDDLM(*CRLF) DTAFMT(*FIXED) STRDLM(*NONE) RMVBLANK(*NONE) FLDDFNFILE(ASPONITE/TBX400 SCPAFDF) RPLNULLVAL(*FLDDFT) The to-file and the field definition file both exist and match each other. And yet I get CPF2845 reason code 10, which [...]

Answer Question   |  February 17, 2011  1:35 AM
AS/400 command functions, AS/400 commands, CPF2845, CPYFRMIMPF, OS/400, V5R2

Using CLOSE & OPEN commands IN RPG ILE program
What is the best technique of using CLOSE & OPEN commands for USROPN DB files, if I need use CLOSE more then one time in program?

Answer Question   |  February 17, 2011  12:25 AM
RPG ILE, RPG Program, USROPN, USROPN files

Open IT Forum: What’s high on your priority list for 2011?
We’re a good month and a half into the year, and we wanted to know what’s at the top of your priority list. Does your company want to deploy at least one new application to the cloud or improve holes in your cloud security? Are you learning a new development language to keep up with [...]

Answer Question   |  September 27, 2011  9:04 PM
AS/400, Channel, CIO, Cloud Security, CRM, Database, DataCenter, Development, Exchange, Linux, Lotus Domino, Microsoft Windows, Mobile, Networking, Open IT Forum, Oracle, SAP, Security, SQL Server, Storage, Virtualization, VoIP, Windows Server

Find string in AS/400 library
my requirement is find out string and which file contain that string,file name,file type,source file name this information find

Answer Question   |  February 17, 2011  6:06 PM
AS/400, AS/400 Library, String

I have more than 1000 objects in one library need to segregate type wise.
I have more than 1000 objects in one library need to segregate type wise like Program, Report, CL, Display Screens & also we write some Report Programs in RPG.[o:p][/o:p] Anyone have idea to segregate objects without any manual efforts.[o:p][/o:p]

Answer Question   |  February 16, 2011  2:39 PM
AS/400 Library, AS/400 objects, CL Program