Confused about the career path
End of the Day what Matters is Job satisfaction. So Choose the Path you are interested. Since you are not interested in Testing job Learn more on AS400 Development and get into a Development.
View Answer
| November 9, 2011 12:00 PM
AS/400, BMC Patrol, QA
End of the Day what Matters is Job satisfaction. So Choose the Path you are interested. Since you are not interested in Testing job Learn more on AS400 Development and get into a Development.
IFS & PDFs
Hi, You can do this by using STRPCCMD command. It holds two Parameters(Command & Pause). Command should hold the link(IFS) for opening PDF. <pre>DCL VAR(&PDFADR) TYPE(*CHAR) LEN(100) + VALUE(‘//3.100.10.10/reports/PDF/ABC001′) CHGVAR VAR(&CMD) VALUE(‘START ‘ || &RPTLNK ) /* RUN THE PC COMMAND */ STRPCO PCTA(*NO) MONMSG MSGID(IWS4010) STRPCCMD PCCMD(&CMD) PAUSE(*NO) </pre> Make sure that Command will [...]
View Answer
| November 9, 2011 6:14 AM
IFS, PDF
Hi, You can do this by using STRPCCMD command. It holds two Parameters(Command & Pause). Command should hold the link(IFS) for opening PDF. <pre>DCL VAR(&PDFADR) TYPE(*CHAR) LEN(100) + VALUE(‘//3.100.10.10/reports/PDF/ABC001′) CHGVAR VAR(&CMD) VALUE(‘START ‘ || &RPTLNK ) /* RUN THE PC COMMAND */ STRPCO PCTA(*NO) MONMSG MSGID(IWS4010) STRPCCMD PCCMD(&CMD) PAUSE(*NO) </pre> Make sure that Command will [...]
AS/400 disaster recovery procedures
Are you asking how to plan for DR or how to recover in a DR situation? For recovery, you foillow your plan. Creating the plan is a long process. You can take classes on this. Start with what do you do in a total disaster – ie: something (fire, tornado, etc) totally wipes out you [...]
View Answer
| November 8, 2011 3:23 PM
AS/400 backup and recovery
Are you asking how to plan for DR or how to recover in a DR situation? For recovery, you foillow your plan. Creating the plan is a long process. You can take classes on this. Start with what do you do in a total disaster – ie: something (fire, tornado, etc) totally wipes out you [...]
backup
It can be based on the application. Eg: A financial application may require Backup on Daily basis & Monthly basis. And they will be keeping Monthend tapes for future reference. Main use of having backup is to be safe, Pradeep.
View Answer
| November 8, 2011 12:33 PM
AS/400 backup and recovery
It can be based on the application. Eg: A financial application may require Backup on Daily basis & Monthly basis. And they will be keeping Monthend tapes for future reference. Main use of having backup is to be safe, Pradeep.
User profile modified date in as 400
Look at the DSPAUDJRNE & CPYAUDJRNE commands. I imagine they only work if you have journaling turned on. http://publib.boulder.ibm.com/infocenter/iseries/v5r4/index.jsp?topic=%2Fcl%2Fdspaudjrne.htm
View Answer
| November 4, 2011 4:26 PM
AS/400
Look at the DSPAUDJRNE & CPYAUDJRNE commands. I imagine they only work if you have journaling turned on. http://publib.boulder.ibm.com/infocenter/iseries/v5r4/index.jsp?topic=%2Fcl%2Fdspaudjrne.htm
Disk space clean-up.
If you installed the cume or PTF(s) by virtual optical, then delete the images in the IFS and any savfs you may have created. Of course if you installed by CD you don’t have to worry about that. There are also savfs to delete if you used Download Director to get your PTFs from IBM. [...]
View Answer
| November 4, 2011 10:07 AM
AS/400, Disk space, Program Temporary Fix
If you installed the cume or PTF(s) by virtual optical, then delete the images in the IFS and any savfs you may have created. Of course if you installed by CD you don’t have to worry about that. There are also savfs to delete if you used Download Director to get your PTFs from IBM. [...]
EMLSTMF – Email Address
If you have TAATOOL installed in your i Series, Then you can retieve mail ID using RTVDIRE in your CL Program. <pre> DCL &RTNADDR *CHAR LEN(8) DCL &RTNDSC *CHAR LEN(50) . RTVDIRE USERID(xxx) RTNADDR(&RTNADDR) + RTNDSC(&RTNDSC) </pre> You can use EMLSTMF as usual for sending email. Pradeep.
View Answer
| November 3, 2011 6:37 AM
AS/400, CLLE, RPGLE
If you have TAATOOL installed in your i Series, Then you can retieve mail ID using RTVDIRE in your CL Program. <pre> DCL &RTNADDR *CHAR LEN(8) DCL &RTNDSC *CHAR LEN(50) . RTVDIRE USERID(xxx) RTNADDR(&RTNADDR) + RTNDSC(&RTNDSC) </pre> You can use EMLSTMF as usual for sending email. Pradeep.
log of commands executed on command line
for a particular user or for all users?
View Answer
| November 2, 2011 3:23 PM
AS/400, COMMANDS
for a particular user or for all users?
message ID: CPF1213 Subsystem QDP had an allocation error for device XXXXXXXX
I will try your suggestions when this problem happens again. To date we haven’t had the problem since. Thanks for your help.
View Answer
| November 2, 2011 2:28 PM
AS/400 administration, AS/400 error messages, AS/400 subsystems
I will try your suggestions when this problem happens again. To date we haven’t had the problem since. Thanks for your help.
Full system backup in AS400
GO MAIN will take you to the main AS400 menu Take option 6 = Save Take option 21 = Entire system Note you must sign on with QSECOFR authority anddo this from the System Console. This will end all subsystems so you should have all users off the system. ========= If you are using a [...]
View Answer
| November 2, 2011 1:19 PM
AS/400 backup, AS400 backups, System backups, V5R4
GO MAIN will take you to the main AS400 menu Take option 6 = Save Take option 21 = Entire system Note you must sign on with QSECOFR authority anddo this from the System Console. This will end all subsystems so you should have all users off the system. ========= If you are using a [...]
FTP a Synon edtrcd1
Did you send all the components of the function? As with RPGLE or COBOL – there is a *PGM and a *DSPF component at least. You usually transfer all objects at the same time.
View Answer
| November 2, 2011 9:46 AM
FTP, iSeries, Synon/2E
Did you send all the components of the function? As with RPGLE or COBOL – there is a *PGM and a *DSPF component at least. You usually transfer all objects at the same time.
Synon/2e, Model library creation
From the product menu, Option 51 is ‘Commands to set up or alter a model ‘ use that, or the YCRTMDLLIB (Create Model Library. ) command as a generator, some objects have to exist in the library, and this command places them there.
View Answer
| November 2, 2011 9:44 AM
Synon/2E
From the product menu, Option 51 is ‘Commands to set up or alter a model ‘ use that, or the YCRTMDLLIB (Create Model Library. ) command as a generator, some objects have to exist in the library, and this command places them there.
Sharing files between Windows XP and Windows 7
Please consider the followings: 1. First make sure both machines are members of the same Workgroup which by default is named Workgroup or u may change…. 2. On the Windows 7 machine go into Control Panel > All Control Panel Items > Network and Sharing Center then click on Change advanced sharing settings. 3. Verify [...]
View Answer
| November 2, 2011 8:32 AM
File sharing protocols, Peer-to-Peer file sharing, Shared folders, Windows 7, Windows XP
Please consider the followings: 1. First make sure both machines are members of the same Workgroup which by default is named Workgroup or u may change…. 2. On the Windows 7 machine go into Control Panel > All Control Panel Items > Network and Sharing Center then click on Change advanced sharing settings. 3. Verify [...]
How to prevent + sign or ‘More’ from displaying on Synon generated display file when no records left to load?
Ah So this was the question? In the function options for the function – you set the options to use text instead of a plus sign. here… Subfile End . . . . . . . : M ( M-MDLVAL, P-Plus, T-Text ) the current model level default will be highlighted. If you want all [...]
View Answer
| November 1, 2011 8:36 AM
Synon, Synon 2E, Synon/2E, Synon/Cool 2E
Ah So this was the question? In the function options for the function – you set the options to use text instead of a plus sign. here… Subfile End . . . . . . . : M ( M-MDLVAL, P-Plus, T-Text ) the current model level default will be highlighted. If you want all [...]
Are there any Synon experts out there? (20 plus years)
Yes – I’m familiar with plus signs to indicate ‘more’ when using CA 2e, aka ‘Cool 2e’ aka ‘Synon 2e’ What would you like to know about it?
View Answer
| November 1, 2011 8:03 AM
RPG, RPG ILE, RPG IV, RPG Language Support, RPG/400, RPGILE, RPGLE, Synon, Synon 2E, Synon/2E, Synon/Cool 2E
Yes – I’m familiar with plus signs to indicate ‘more’ when using CA 2e, aka ‘Cool 2e’ aka ‘Synon 2e’ What would you like to know about it?
OPNQRY File
Hey, I finally got what I wanted — while creating my &QRYSLT I divided the Query in 2 part and then concatenated it. And Voila.. it works… CHGVAR VAR(&QRYSLT) VALUE(‘(DQB8ST *EQ “A” *AND + DQJRCE *EQ %VALUES( ‘ *TCAT &MARKET + *CAT ‘ )) *OR (DQB8ST = “D” *AND DQZRCD = + “A” *AND DQETCD [...]
View Answer
| October 28, 2011 9:58 PM
AS/400, CLP, OPNQRYF, RPG, value
Hey, I finally got what I wanted — while creating my &QRYSLT I divided the Query in 2 part and then concatenated it. And Voila.. it works… CHGVAR VAR(&QRYSLT) VALUE(‘(DQB8ST *EQ “A” *AND + DQJRCE *EQ %VALUES( ‘ *TCAT &MARKET + *CAT ‘ )) *OR (DQB8ST = “D” *AND DQZRCD = + “A” *AND DQETCD [...]
CL Back up job failing
Replace line 3400 with LOOP: ALCOBJ OBJ((TAP01 *DEVD *SHRUPD *N)) MONMSG CPF1002 EXEC(DO) DLYJOB DLY(300) GOTO LOOP ENDDO Replace line 4000 with DLCOBJ OBJ((TAP01 *DEVD *SHRUPD *N)) +++ This will check to see if the tape drive is available. If not, it will wait 5 minutes and then try again. Look may want to add [...]
View Answer
| October 28, 2011 4:53 PM
CL programming, CL Programming issue, iseries v5r3
Replace line 3400 with LOOP: ALCOBJ OBJ((TAP01 *DEVD *SHRUPD *N)) MONMSG CPF1002 EXEC(DO) DLYJOB DLY(300) GOTO LOOP ENDDO Replace line 4000 with DLCOBJ OBJ((TAP01 *DEVD *SHRUPD *N)) +++ This will check to see if the tape drive is available. If not, it will wait 5 minutes and then try again. Look may want to add [...]
AS/400 Scenario
Thank you for visiting ITKE. We are happy to help you with solving specific IT questions, but need as much information as possible to do so. Let us know about the problem you are trying to solve, how you are approaching it and what work you’ve done so far, and we can help guide you [...]
View Answer
| May 13, 2013 6:33 PM
AS/400, AS/400 Records, RRN
Thank you for visiting ITKE. We are happy to help you with solving specific IT questions, but need as much information as possible to do so. Let us know about the problem you are trying to solve, how you are approaching it and what work you’ve done so far, and we can help guide you [...]
Message from QZSOSIGN that userid is disabled
If you go the QSYS/QSYSMSG route you could use a monitor program similar to <a href=”http://www.as400pro.com/tipView.php?cat=iSeriesTools&key=3780″>Monitors the QSYSMSG queue for disabled User profiles</a>. This program is set to Enable the profile after a wait period, which you may/may not want to do. A flaw in this program is that it uses a delay for the [...]
View Answer
| October 27, 2011 1:38 PM
AS/400, QZSOSIGN
If you go the QSYS/QSYSMSG route you could use a monitor program similar to <a href=”http://www.as400pro.com/tipView.php?cat=iSeriesTools&key=3780″>Monitors the QSYSMSG queue for disabled User profiles</a>. This program is set to Enable the profile after a wait period, which you may/may not want to do. A flaw in this program is that it uses a delay for the [...]
How to read from a subfile and copy the data into a PF
If *in06 = *on (I like to link my F keys to indicators in DDS – else you can If KF) *loval setll subfilename DoW not%eof(Subfilename) Read Subfilename If not%eof(Subfilename) <load fields> Write PFFormatname Enddo Endif
View Answer
| October 26, 2011 2:09 PM
RPG ILE, Subfile
If *in06 = *on (I like to link my F keys to indicators in DDS – else you can If KF) *loval setll subfilename DoW not%eof(Subfilename) Read Subfilename If not%eof(Subfilename) <load fields> Write PFFormatname Enddo Endif





