Sorting alphanumeric field with hexadecimal values
Yes,By assuming Keyword ALTSEQ(QSYS/QASCII) in LF can only solve the sort sequence problem,How to value the KEYID,I think Tom’s say is a right way. So others about the sequence like these: 1: The table which you use is decided by your pratical applications. This table QASCII is tranfer the EBCDIC code to ASCII code,because the [...]
View Answer
| March 23, 2012 6:14 AM
AS/400, CL, RPG
Yes,By assuming Keyword ALTSEQ(QSYS/QASCII) in LF can only solve the sort sequence problem,How to value the KEYID,I think Tom’s say is a right way. So others about the sequence like these: 1: The table which you use is decided by your pratical applications. This table QASCII is tranfer the EBCDIC code to ASCII code,because the [...]
Overlay Printing Issue
Well I figured out the solution but still don’t know why it’s happening. When I printed my regular voucher I looked at the spool file attributes and noticed that the AFP RESOURCE was flagged as an ‘ Y ‘, I then ran the reprint program looked at the spool file attributes and noticed it was [...]
View Answer
| March 22, 2012 4:52 PM
CL Program, iSeries Overlay Printing Issue
Well I figured out the solution but still don’t know why it’s happening. When I printed my regular voucher I looked at the spool file attributes and noticed that the AFP RESOURCE was flagged as an ‘ Y ‘, I then ran the reprint program looked at the spool file attributes and noticed it was [...]
how to copy tables between two libraries without repeat cpyf command using script?
We’ve created a generic CL program which accepts 2 parameters. The first parameter is the “From” Library and the 2nd parm is the “TO” Library. The “TO” library is the library that you want to copy the data to and of course the “From” is where it’s coming from. We do a chkobj to verify [...]
View Answer
| March 20, 2012 2:56 PM
CPYF, iSeries v7.1
We’ve created a generic CL program which accepts 2 parameters. The first parameter is the “From” Library and the 2nd parm is the “TO” Library. The “TO” library is the library that you want to copy the data to and of course the “From” is where it’s coming from. We do a chkobj to verify [...]
How many types of Data Area are there in RPGLE
There are 3 types of data area – Local Data area, Group data area and Programmer initialization parameter data area
View Answer
| March 20, 2012 6:22 AM
AS/400, RPGLE
There are 3 types of data area – Local Data area, Group data area and Programmer initialization parameter data area
as/400 INFDS
The easiest way to eliminate duplicate records is to put a UNIQUE key on the file. Is there some reason you cannot do that?
View Answer
| March 19, 2012 12:47 PM
AS400 Data Definitions, AS400 iseries, INFDS
The easiest way to eliminate duplicate records is to put a UNIQUE key on the file. Is there some reason you cannot do that?
CLRPFM
To do a CLRPFM, no other program can be using the file. So you need to end the othter program(s). If you cannot do thet,, you can use an SQL SELETE statement. THis will removed the records, but the object size will not change because the records are still associated with the file as deleted [...]
View Answer
| March 19, 2012 12:43 PM
CLRPFM, PF file
To do a CLRPFM, no other program can be using the file. So you need to end the othter program(s). If you cannot do thet,, you can use an SQL SELETE statement. THis will removed the records, but the object size will not change because the records are still associated with the file as deleted [...]
Printing AS/400 ouptputs in diffrent printers,results in different outcome.
We have implemented something very similar. We write the data to a work file. This file is then merged with a word document (via the mail-merge function and using ODBC) All users can now print them on their own printers, regardless of make and model. A very simple solution. An even simpler solution that will [...]
View Answer
| March 17, 2012 1:24 PM
AS/400, CLP, DataCenter, Printing
We have implemented something very similar. We write the data to a work file. This file is then merged with a word document (via the mail-merge function and using ODBC) All users can now print them on their own printers, regardless of make and model. A very simple solution. An even simpler solution that will [...]
Power7 SDLC protocol
You can do this by using something like Remote Access Server (RAS) connected to your local Network, and have phone lines and modems connected to the RAS. Once they dial in to the RAS, the remote dial-in user is part of your local network and can use and standard TCP/IP connetivity software like IBM’s Client [...]
View Answer
| March 17, 2012 1:14 PM
AS/400 Client Access, iSeries communication, iSeries hardware
You can do this by using something like Remote Access Server (RAS) connected to your local Network, and have phone lines and modems connected to the RAS. Once they dial in to the RAS, the remote dial-in user is part of your local network and can use and standard TCP/IP connetivity software like IBM’s Client [...]
Cum and Group PTF’s
Mani1017, It is a 2 step process. Go to the PTF menu. Take Option1 to Load the specified PTF, in this case SI31223, then take Option 2 to Apply the specific PTF, again SI31223. Ensure that you specify *PERM on the Extent of change parameter. When reviewing the cover letters this requirement should have been [...]
View Answer
| March 17, 2012 5:41 AM
AS400 V6R1M1, CUM PTFs, PTFs
Mani1017, It is a 2 step process. Go to the PTF menu. Take Option1 to Load the specified PTF, in this case SI31223, then take Option 2 to Apply the specific PTF, again SI31223. Ensure that you specify *PERM on the Extent of change parameter. When reviewing the cover letters this requirement should have been [...]
Module
Option ’14′ is for creating a program <b>Create Bound RPG Program (CRTBNDRPG)</b>. Where as Option ’15′ is for creating a module <b>Create RPG Module (CRTRPGMOD)</b>. Modules can be bound together as a program using <b>CRTPGM</b>. Modules can also be bound together as a ‘service program’ using <b>CRTSRVPGM</b>. Pradeep.
View Answer
| March 17, 2012 4:43 AM
AS/400, RPGLE
Option ’14′ is for creating a program <b>Create Bound RPG Program (CRTBNDRPG)</b>. Where as Option ’15′ is for creating a module <b>Create RPG Module (CRTRPGMOD)</b>. Modules can be bound together as a program using <b>CRTPGM</b>. Modules can also be bound together as a ‘service program’ using <b>CRTSRVPGM</b>. Pradeep.
USER AND PASSWORD BY PRESSING TWO KEYS
Hi Surya, I think, You are looking for an automatic way of populating your User name & Password whenever you are trying to login to the AS/400 System. For this, You can Record a Macro and save it on your computer. When ever you open the Navigator, You can play the Recorded Macro. It will [...]
View Answer
| March 17, 2012 4:28 AM
AS/400 passwords, AS/400 user profiles
Hi Surya, I think, You are looking for an automatic way of populating your User name & Password whenever you are trying to login to the AS/400 System. For this, You can Record a Macro and save it on your computer. When ever you open the Navigator, You can play the Recorded Macro. It will [...]
Highlighting messages in a queue?
Hi Rod, I think no. Characters attributes are analyzed when the message is displayed on the queue, and all non “normal” characters are displayed with reverse video. (it can be a solution) exemple : PGM DCL VAR(&MSG) TYPE(*CHAR) LEN(30) DCL VAR(&C) TYPE(*CHAR) LEN(1) VALUE(X’20′) CHGVAR VAR(&MSG) VALUE(&C *CAT ‘Test Message’ *TCAT &C) SNDMSG MSG(&MSG) TOUSR(*SYSOPR) [...]
View Answer
| March 17, 2012 1:33 AM
iSeries message queues, iseries v5r4
Hi Rod, I think no. Characters attributes are analyzed when the message is displayed on the queue, and all non “normal” characters are displayed with reverse video. (it can be a solution) exemple : PGM DCL VAR(&MSG) TYPE(*CHAR) LEN(30) DCL VAR(&C) TYPE(*CHAR) LEN(1) VALUE(X’20′) CHGVAR VAR(&MSG) VALUE(&C *CAT ‘Test Message’ *TCAT &C) SNDMSG MSG(&MSG) TOUSR(*SYSOPR) [...]
File Update
Hi, Your question didn’t mention whether user files will contain all the records from your customized file or every user file will have some records from your customized file? For any case, it will be better to use RPG program, so that you can update any number of files by using different CL Program with [...]
View Answer
| March 16, 2012 8:51 AM
AS/400, AS/400 SQL, AS400 RPGLE
Hi, Your question didn’t mention whether user files will contain all the records from your customized file or every user file will have some records from your customized file? For any case, it will be better to use RPG program, so that you can update any number of files by using different CL Program with [...]
files in folders
I have a SAGE V6 software in windows server 2008 R2 SP1, that generates an output TXT to put at a specific folder in AS400 V5R2M0 When SAGE put the output at c:, no problem. if i use command line copy to mapped folder, is ok, but if i put the file in C: and [...]
View Answer
| March 14, 2012 11:09 AM
.txt file, AS/400 Folders
I have a SAGE V6 software in windows server 2008 R2 SP1, that generates an output TXT to put at a specific folder in AS400 V5R2M0 When SAGE put the output at c:, no problem. if i use command line copy to mapped folder, is ok, but if i put the file in C: and [...]
How to get different font sizes to print on an iSeries report
I think you need to provide more information, such as the printer model you are using, and the OS that you are working on. With more information, we are able to better identify where the problem lies and how best to help you. Kathy – <a href=”http://www.cartridgeshop.co.uk”>printer inks</a>
View Answer
| March 14, 2012 1:59 AM
AS/400 Print Problems, AS/400 printing, iSeries, iSeries printing
I think you need to provide more information, such as the printer model you are using, and the OS that you are working on. With more information, we are able to better identify where the problem lies and how best to help you. Kathy – <a href=”http://www.cartridgeshop.co.uk”>printer inks</a>
FTP a file from the IFS
I agree, if the server responds with “file format not valid”, you reached an iSeries. namefmt 1 command in FTP changes from file/library to IFS file structure Try this in a CL: PGM DCL &SYSNAM *CHAR 10 VALUE(’10,1,1,254′) DCL &CMDFILE *CHAR 10 VALUE(‘FTPCMD ‘) DCL &LOGFILE *CHAR 10 VALUE(‘FTPLOG ‘) OVRDBF FILE(INPUT) TOFILE(*LIBL/&CMDFILE) + OVRSCOPE(*CALLLVL) [...]
View Answer
| March 13, 2012 10:07 PM
.CSV files, IFS, iSeries AS/400
I agree, if the server responds with “file format not valid”, you reached an iSeries. namefmt 1 command in FTP changes from file/library to IFS file structure Try this in a CL: PGM DCL &SYSNAM *CHAR 10 VALUE(’10,1,1,254′) DCL &CMDFILE *CHAR 10 VALUE(‘FTPCMD ‘) DCL &LOGFILE *CHAR 10 VALUE(‘FTPLOG ‘) OVRDBF FILE(INPUT) TOFILE(*LIBL/&CMDFILE) + OVRSCOPE(*CALLLVL) [...]
CL program to CL Command
You may have already done this . . . a command is typically defined by source statements, similar to creating a CL or RPG program. When using the CRTCMD just specify the program that will be launched by the command. It can be any type of program your iSeries supports – CLP, Cobol, RPG, etc.
View Answer
| March 13, 2012 3:31 PM
CL Program, iSeries, iSeries V6R1
You may have already done this . . . a command is typically defined by source statements, similar to creating a CL or RPG program. When using the CRTCMD just specify the program that will be launched by the command. It can be any type of program your iSeries supports – CLP, Cobol, RPG, etc.
Changing a logical file, need to recompile the physical?
You only need to recompile the Logical and any programs using it. The PF is not changing so not need to redo.
View Answer
| March 12, 2012 2:30 PM
AS/400, AS400 - COBOL
You only need to recompile the Logical and any programs using it. The PF is not changing so not need to redo.
Ques Regarding Date in Iseries cobol.
I have not done COBOL for 25 years. In RPG, you would convert that date from a packed filed to a date field. Then use ADDDUR which would all you to add 1 day to the date. Then put in pack in the packed field. I’s sure it is the same in COBOL ILE.
View Answer
| March 11, 2012 9:57 PM
AS400 iseries, COBOL, PGM
I have not done COBOL for 25 years. In RPG, you would convert that date from a packed filed to a date field. Then use ADDDUR which would all you to add 1 day to the date. Then put in pack in the packed field. I’s sure it is the same in COBOL ILE.
AS/400
Where is BCENTH defined. If it is in the O spec as you are showing then you are defined it as a timestamp. My guess is you what the Z to be the edit code so it will do a zero supress. If that is the case you need to create a D spec to [...]
View Answer
| March 9, 2012 1:54 PM
AS400 Data Definitions, AS400 iseries, AS400 RPGLE
Where is BCENTH defined. If it is in the O spec as you are showing then you are defined it as a timestamp. My guess is you what the Z to be the edit code so it will do a zero supress. If that is the case you need to create a D spec to [...]





