CL Program
You would need to create a display file — Lets say its named DSPRUNQDF with a record DSPRUNQR which would show the options and have an input capable field say SLFLD In the CL this field would be used as &SLFLD The CL Pgm Pgm DCLF DSPRUNQDF SNDRCVF DEV(*FILE) RCDFMT(DSPRUNQR) if (&SLFLD = ’1′) then [...]
View Answer
| August 27, 2010 7:47 AM
CL, CL Program
You would need to create a display file — Lets say its named DSPRUNQDF with a record DSPRUNQR which would show the options and have an input capable field say SLFLD In the CL this field would be used as &SLFLD The CL Pgm Pgm DCLF DSPRUNQDF SNDRCVF DEV(*FILE) RCDFMT(DSPRUNQR) if (&SLFLD = ’1′) then [...]
Migration of Rexx/390 to Rexx/400
Hello i have never heard about rex390 and rex 400 i worked only on rpg/400 ,clp/400,db2/400 =================================================== Migrate REXX/390 to REXX/400 by copying the REXX/390 source into a source file on an AS/400. The ‘migration’ is then complete. The REXX is the same on both platforms. However, you almost certainly have a large number of [...]
View Answer
| August 27, 2010 7:44 AM
REXX/390, REXX/400
Hello i have never heard about rex390 and rex 400 i worked only on rpg/400 ,clp/400,db2/400 =================================================== Migrate REXX/390 to REXX/400 by copying the REXX/390 source into a source file on an AS/400. The ‘migration’ is then complete. The REXX is the same on both platforms. However, you almost certainly have a large number of [...]
Enforce only alphabets in a particular field of physical file
This SQL create .. you could also use an alter Creates a constraint on the first postion of the field to A-Z For this method you would use a seperate constraint for each position of the field This won’t allow the position to be blank or lower case or anything but A-Z. CREATE TABLE COCCLEVIN/TBL1 [...]
View Answer
| August 27, 2010 3:45 AM
AS/400 development, Data Types
This SQL create .. you could also use an alter Creates a constraint on the first postion of the field to A-Z For this method you would use a seperate constraint for each position of the field This won’t allow the position to be blank or lower case or anything but A-Z. CREATE TABLE COCCLEVIN/TBL1 [...]
Is it posssible to get a list of program objects which run with adopted authority
Try GO SECTOOLS, then option 21., Adopting objects. Alternatively, run the PRTADPOBJ (Print Adopting Objects) command. The help-text for the command can supply most details that you might need. Tom
View Answer
| August 26, 2010 10:10 PM
AS/400, AS/400 objects, iSeries, iSeries AS/400
Try GO SECTOOLS, then option 21., Adopting objects. Alternatively, run the PRTADPOBJ (Print Adopting Objects) command. The help-text for the command can supply most details that you might need. Tom
Edit codes using Strqmqry
Hello… When using INSERT processing without SELECT, the date format is taken from the user’s profile. When using INSERT processing with SELECT, SQL assumes the value is for output and provides it to Query Management in the SAA format (ddmmyyyy). See the <a href=”http://publib.boulder.ibm.com/iseries/v5r1/ic2924/index.htm?info/qmp/rbaromst288.htm”>iSeries website</a> for further information… Hope this helps… ================================================================ Edit codes are [...]
View Answer
| August 26, 2010 2:27 PM
Query, STRQMQRY
Hello… When using INSERT processing without SELECT, the date format is taken from the user’s profile. When using INSERT processing with SELECT, SQL assumes the value is for output and provides it to Query Management in the SAA format (ddmmyyyy). See the <a href=”http://publib.boulder.ibm.com/iseries/v5r1/ic2924/index.htm?info/qmp/rbaromst288.htm”>iSeries website</a> for further information… Hope this helps… ================================================================ Edit codes are [...]
Receiving result sets in RPG (prior to release 7.1) from an SQL SP
<i>Wouldn’t the compiler complain that it doesn’t have the definition of the global temp table. </i> You know the exact format of the GTT since you designed it. If you need the definition for a compiler, then create a temporary version to compile over. This is no different from any file that must be created [...]
View Answer
| August 26, 2010 6:23 AM
i5, RPG, SQL, SQL stored procedures, Stored Procedures
<i>Wouldn’t the compiler complain that it doesn’t have the definition of the global temp table. </i> You know the exact format of the GTT since you designed it. If you need the definition for a compiler, then create a temporary version to compile over. This is no different from any file that must be created [...]
How can you see the records in the new i 515 series?
nope, no way of doing it….unless you write a utility to do it of course
View Answer
| August 25, 2010 2:52 PM
i515, iSeries, iSeries Commands
nope, no way of doing it….unless you write a utility to do it of course
AS400 – Robot Schedule List – can I see job schedule for next week?
Option 1 in Robot shows the days the job is due to run on, so Monday, if today is Wednesday will be next monday. If this is a temporary change, you can simply remove it for that day and put Monday back on Tuesday. You will have to run the job specially with a DO [...]
View Answer
| August 25, 2010 2:50 PM
AS/400, AS/400 job scheduler, AS/400 jobs, ROBOT, Robot Job Scheduler
Option 1 in Robot shows the days the job is due to run on, so Monday, if today is Wednesday will be next monday. If this is a temporary change, you can simply remove it for that day and put Monday back on Tuesday. You will have to run the job specially with a DO [...]
AS/400 to excel
it’s already been done. go to <a href=”www.rpgworld.com”>RPGWorld</a> or <a href=”www.easy400.net”>Easy400</a> and look for the tool. if you dont find it there, just google it and i am certain you will find pre-defined solutions that already work or can be tailored to your needs. -Sarge
View Answer
| August 24, 2010 5:32 PM
AS/400 File Transfer, excel, Excel Formatting
it’s already been done. go to <a href=”www.rpgworld.com”>RPGWorld</a> or <a href=”www.easy400.net”>Easy400</a> and look for the tool. if you dont find it there, just google it and i am certain you will find pre-defined solutions that already work or can be tailored to your needs. -Sarge
Changing authority to access /qntc files
<i>i tried compiling as usrprf(*owner) with a profile whose userid and password are the same on both i5 and network, but that didn’t seem to have any effect.</i> The IFS access methods do not honor adopted authority. The file systems have no concept of ‘adopted authority’. <i>i see “set job user identity” api’s, “set profile [...]
View Answer
| August 24, 2010 6:55 AM
AS/400, authority issue, QNTC File System, RPG Program, RPGILE, USRPRF, V5R4
<i>i tried compiling as usrprf(*owner) with a profile whose userid and password are the same on both i5 and network, but that didn’t seem to have any effect.</i> The IFS access methods do not honor adopted authority. The file systems have no concept of ‘adopted authority’. <i>i see “set job user identity” api’s, “set profile [...]
zebra printer as/400
Bidmac46, thank you. Looks like we are doing the same with printng UPS labels. How can I embed ZPL file to RPG? example of 2 line label we use for ID labels for in house use.(1X3 labels.) If *in21 is on it will print 2 lines up to 19 Characters that are 10/32″ high If [...]
View Answer
| August 23, 2010 2:58 PM
AS/400 printing, OUTQ, Zebra printers
Bidmac46, thank you. Looks like we are doing the same with printng UPS labels. How can I embed ZPL file to RPG? example of 2 line label we use for ID labels for in house use.(1X3 labels.) If *in21 is on it will print 2 lines up to 19 Characters that are 10/32″ high If [...]
Need help with what is required when they change Subnet mask?
Hello, When a change is done to the Subnet Mask, if you have only one default route (gateway), you will need to go into CFGTCP, option 2 and change the subnet mask on the IP address. It could take a while before the new IP addresses are known to the other machines so you may [...]
View Answer
| August 23, 2010 10:08 AM
IBM 570, Subnet mask, Subnets, System i
Hello, When a change is done to the Subnet Mask, if you have only one default route (gateway), you will need to go into CFGTCP, option 2 and change the subnet mask on the IP address. It could take a while before the new IP addresses are known to the other machines so you may [...]
Can you embed SQL statements in RPG program
Whether it’s possible or not depends on whether or not your system has the option to allow it — the 57xx-ST1 SQL Development Kit. The SQL Dev Kit supplies the SQL pre-compiler that processes the SQL statements to convert them into the appropriate data structures and other RPG statements so that the RPG compiler can [...]
View Answer
| August 22, 2010 10:33 PM
Embedded SQL, RPG, SQL, SQLRPGLE
Whether it’s possible or not depends on whether or not your system has the option to allow it — the 57xx-ST1 SQL Development Kit. The SQL Dev Kit supplies the SQL pre-compiler that processes the SQL statements to convert them into the appropriate data structures and other RPG statements so that the RPG compiler can [...]
how can i see data of a savefile which i have transferred by ftp from my pc to as/400 system?
Hello, On the as/400 system, you can type DSPSAVF lib/file and see the contents of the save file. Hope this helps, TPinky =========================================================== DSPSAVF will not show the content of a savefile — it will only list the objects that were saved into the savefile. There are no functions to see the content of a [...]
View Answer
| August 22, 2010 10:25 AM
AS/400 FTP
Hello, On the as/400 system, you can type DSPSAVF lib/file and see the contents of the save file. Hope this helps, TPinky =========================================================== DSPSAVF will not show the content of a savefile — it will only list the objects that were saved into the savefile. There are no functions to see the content of a [...]
B-tech graduate planning for as/400 training
Hi Rashish, Its the Good Decision. Go on with AS/400. Pioneer in IBM i AS/400 Training, Chennai.
View Answer
| January 30, 2013 7:08 AM
AS/400, AS/400 careers, AS/400 training
Hi Rashish, Its the Good Decision. Go on with AS/400. Pioneer in IBM i AS/400 Training, Chennai.
V5R1-Cache battery status
You check the battery cache status in the SST. 1. Type: STRSST 2. Login with your SST username and password 3. Option 1, Start Service Tool 4. Option 7, Hardware Service Manager 5. Option 9, Work with resources containing cache battery packs 6. Option 5 on the resource that you want to check the status [...]
View Answer
| August 21, 2010 10:38 AM
Cache battery, OS/400, V5R1
You check the battery cache status in the SST. 1. Type: STRSST 2. Login with your SST username and password 3. Option 1, Start Service Tool 4. Option 7, Hardware Service Manager 5. Option 9, Work with resources containing cache battery packs 6. Option 5 on the resource that you want to check the status [...]
File update
Hi, In a word – No. Not without the journals. Regards, Martin Gilbert. That is, there is no way to tell what program did it yesterday. If you change the programs and file you could add a field for the chg program id, chgDt, chgUsr. Or you could set up a trigger program to capture [...]
View Answer
| August 21, 2010 10:20 AM
AS/400, AS/400 journaling, AS/400 logs
Hi, In a word – No. Not without the journals. Regards, Martin Gilbert. That is, there is no way to tell what program did it yesterday. If you change the programs and file you could add a field for the chg program id, chgDt, chgUsr. Or you could set up a trigger program to capture [...]
Can an AS/400 COBOL pgm have a logical & physical file open and referenced at the same time
It has been a while since I did Cobol but you can do this by renaming the record format to on of the files. I don’t remember the command but redefine sounds right. ======================================================= A COBOL program has no problem opening both a physical file and any or all of its associated logical files. There [...]
View Answer
| August 21, 2010 9:54 AM
COBOL, Logical File, Physical File
It has been a while since I did Cobol but you can do this by renaming the record format to on of the files. I don’t remember the command but redefine sounds right. ======================================================= A COBOL program has no problem opening both a physical file and any or all of its associated logical files. There [...]
compatible printers for SAP System
Supplied by <a href=”http://itknowledgeexchange.techtarget.com/profile/Tpinky”>Tpinky</a>: Found this website that shows compatible printers…. <a href=”https://unebapps01.nebraska.edu/slugo/faq.nsf/f5adb8ab8250e7f186256798006a0f00/13852b5298a6608386256ff2006320fb?OpenDocument”>SAP: COMPATIBLE PRINTERS</a> CANON laser printer The CANON laser printers imageCLASS 4000, imageRUNNER 210E/210S, imageRUNNER 330E/330S, imageRUNNER 400E/400S, imageRUNNER 550, imageRUNNER 600, LASER CLASS 3170/3170MS/3175/3175MS, LBP-1260 Plus, LBP 1760/2460/3260 can be operated in PCL-5 mode with device types HPLJ5/HPLJ4000. In PostScript mode, they [...]
View Answer
| August 21, 2010 8:57 AM
AS/400 printing, Canon ImageRUNNER, SAP printing
Supplied by <a href=”http://itknowledgeexchange.techtarget.com/profile/Tpinky”>Tpinky</a>: Found this website that shows compatible printers…. <a href=”https://unebapps01.nebraska.edu/slugo/faq.nsf/f5adb8ab8250e7f186256798006a0f00/13852b5298a6608386256ff2006320fb?OpenDocument”>SAP: COMPATIBLE PRINTERS</a> CANON laser printer The CANON laser printers imageCLASS 4000, imageRUNNER 210E/210S, imageRUNNER 330E/330S, imageRUNNER 400E/400S, imageRUNNER 550, imageRUNNER 600, LASER CLASS 3170/3170MS/3175/3175MS, LBP-1260 Plus, LBP 1760/2460/3260 can be operated in PCL-5 mode with device types HPLJ5/HPLJ4000. In PostScript mode, they [...]
Does QSECOFR have access to the content of all partitions and data?
Any *SECOFR user class profile with all special authorities has access to all data and all objects on the partition that it is created. You can remove special authorities from profiles that you create. Note that special authorities, e.g., *ALLOBJ, cannot be removed from QSECOFR. Tom
View Answer
| August 21, 2010 7:24 AM
QSECOFR - ACCESS
Any *SECOFR user class profile with all special authorities has access to all data and all objects on the partition that it is created. You can remove special authorities from profiles that you create. Note that special authorities, e.g., *ALLOBJ, cannot be removed from QSECOFR. Tom





