OPM COBOL Calling ILE Program – Passing Parameters
I have created two modules. One with the CRTCBLMOD. This is *MODULE type named TESTCBLLE. The other one, using the CRTCMOD, I created *MODULE type named TESTCILE. Then I used the CRTPGM to create the single program TESTING with the *PGM type and the attribute *CBLLE. When I did the CRTPGM command, the first entry [...]
Answer Question
| October 14, 2010 3:27 PM
CL Parameters, COBOL, COBOL ILE, ILE Program
I have created two modules. One with the CRTCBLMOD. This is *MODULE type named TESTCBLLE. The other one, using the CRTCMOD, I created *MODULE type named TESTCILE. Then I used the CRTPGM to create the single program TESTING with the *PGM type and the attribute *CBLLE. When I did the CRTPGM command, the first entry [...]
Answer Question
| October 14, 2010 3:27 PM
CL Parameters, COBOL, COBOL ILE, ILE Program
Using CL to COPY text files to QNTC share
I have tried to use CPY to copy file from the AS400 to a QNTC windows share and I get an error that the command is not supported. What command can I use to copy these file over?
Answer Question
| October 8, 2010 2:19 PM
AS400 Command, CL Commands, QNTC File System
I have tried to use CPY to copy file from the AS400 to a QNTC windows share and I get an error that the command is not supported. What command can I use to copy these file over?
Answer Question
| October 8, 2010 2:19 PM
AS400 Command, CL Commands, QNTC File System
SFLRCDNBR
what is the use of SFLRCDNBR(CURSOR) & SFLRCDNBR(*TOP) how its differ from DSPATR(PC).
Answer Question
| October 8, 2010 12:12 PM
AS/400 commands, AS/400 Subfiles, SFLRCDNBR, Subfiles
what is the use of SFLRCDNBR(CURSOR) & SFLRCDNBR(*TOP) how its differ from DSPATR(PC).
Answer Question
| October 8, 2010 12:12 PM
AS/400 commands, AS/400 Subfiles, SFLRCDNBR, Subfiles
What happened in the IBM RPG market?
I was active in this market for 10 years, and attained a high degree of competency – cranking out business systems on behalf of mainly blue chip clients. But it all came to a stop in 2002. Was this a political matter, an outsourcing matter? Or a technology change matter (I am now open source [...]
Answer Question
| October 15, 2010 8:37 AM
AS/400 careers, iSeries RPG programming, Open IT Forum, Open source, OS/400, RPG market
I was active in this market for 10 years, and attained a high degree of competency – cranking out business systems on behalf of mainly blue chip clients. But it all came to a stop in 2002. Was this a political matter, an outsourcing matter? Or a technology change matter (I am now open source [...]
Answer Question
| October 15, 2010 8:37 AM
AS/400 careers, iSeries RPG programming, Open IT Forum, Open source, OS/400, RPG market
Save only DLO changes with BRMS
Hi, I’m looking for a way to save only changed documents/folders using BRMS (as option 31 of the SAVE menu). The only way I found was an *EXIT with the SAVDLO *CHG, do you guys know another one better?. Thank you in advance, have a nice day.
Answer Question
| October 8, 2010 3:56 AM
Backup to Tape, BRMS, BRMS Backup, BRMS Commands, BRMS Control Group, SAVDLO
Hi, I’m looking for a way to save only changed documents/folders using BRMS (as option 31 of the SAVE menu). The only way I found was an *EXIT with the SAVDLO *CHG, do you guys know another one better?. Thank you in advance, have a nice day.
Answer Question
| October 8, 2010 3:56 AM
Backup to Tape, BRMS, BRMS Backup, BRMS Commands, BRMS Control Group, SAVDLO
OKIT400 printing from AS400
I have a direct thermal printer OKIT400 from OKI Printing Solutions on a LAN with an ip address. I also have an AS400 RPGLE to print labels to it. The program works just fine on the AS400 but the spooled files (labels) ARE NOT printing at all. Not even a beep or blinking error light of any [...]
Answer Question
| October 7, 2010 4:40 PM
AS/400 IP address, AS/400 printing, AS/400 Spooled Files, LAN
I have a direct thermal printer OKIT400 from OKI Printing Solutions on a LAN with an ip address. I also have an AS400 RPGLE to print labels to it. The program works just fine on the AS400 but the spooled files (labels) ARE NOT printing at all. Not even a beep or blinking error light of any [...]
Answer Question
| October 7, 2010 4:40 PM
AS/400 IP address, AS/400 printing, AS/400 Spooled Files, LAN
Concatenate many *CHAR variables.
Is it possible to Concatenate many *CHAR variable in one same type variable. I’ve created a CL who will read records from one file and concatenate them in one varaible which i will use after in my CL. But after exiting the loop i got a varaible with the last record value so the concatenation [...]
Answer Question
| October 7, 2010 4:30 PM
AS/400, CL variables, Concatenate, Variables
Is it possible to Concatenate many *CHAR variable in one same type variable. I’ve created a CL who will read records from one file and concatenate them in one varaible which i will use after in my CL. But after exiting the loop i got a varaible with the last record value so the concatenation [...]
Answer Question
| October 7, 2010 4:30 PM
AS/400, CL variables, Concatenate, Variables
SYNON built in function *CONCAT
I need to combine several fields into one text field and thinking about using *CONCAT for that. However it seems that *CONCAT can only merge two fields at a time. If so it would mean a lot of code if I have ten fields to merge. Am I understanding this correctly? Thanks for any help! [...]
Answer Question
| August 9, 2011 3:07 PM
AS/400, AS/400 Synon, Concatenate, Synon 2E
I need to combine several fields into one text field and thinking about using *CONCAT for that. However it seems that *CONCAT can only merge two fields at a time. If so it would mean a lot of code if I have ten fields to merge. Am I understanding this correctly? Thanks for any help! [...]
Answer Question
| August 9, 2011 3:07 PM
AS/400, AS/400 Synon, Concatenate, Synon 2E
Sorting thru FMTDTA QFMTSRC
In my application FMTDAT is used for sorting. FMTDTA INFILE((*abcdef) + (*abcdef) + (*avbgrf) + (*abcdef) + (*abcdef) + (*abcdef)) + OUTFILE(abcdef) + SRCFILE(QFMTSRC) [strong]SRCMBR(abcdef[/strong]) + OPTION(*NOPRT) Code in SRCMBR [strong]abcdef1[/strong]: HSORTRE 69A 3X 256 I P 1 2NEC139 IAP 1 2NEC135 IAP 1 2NEC136 FNP 1 2 [...]
Answer Question
| July 5, 2012 6:55 AM
AS/400 command functions, AS/400 commands, AS400 Command, FMTDTA
In my application FMTDAT is used for sorting. FMTDTA INFILE((*abcdef) + (*abcdef) + (*avbgrf) + (*abcdef) + (*abcdef) + (*abcdef)) + OUTFILE(abcdef) + SRCFILE(QFMTSRC) [strong]SRCMBR(abcdef[/strong]) + OPTION(*NOPRT) Code in SRCMBR [strong]abcdef1[/strong]: HSORTRE 69A 3X 256 I P 1 2NEC139 IAP 1 2NEC135 IAP 1 2NEC136 FNP 1 2 [...]
Answer Question
| July 5, 2012 6:55 AM
AS/400 command functions, AS/400 commands, AS400 Command, FMTDTA
How to format a flat file using customised FMTSRC
Hi, I have a falt file.i want to sort it using a customised format source file.Please tell me how to create a source file for formatting the flat-file.I want the sample of a DDS of sort.
Answer Question
| October 6, 2010 6:22 AM
AS/400, AS/400 flat file, DDS, FMTDTA
Hi, I have a falt file.i want to sort it using a customised format source file.Please tell me how to create a source file for formatting the flat-file.I want the sample of a DDS of sort.
Answer Question
| October 6, 2010 6:22 AM
AS/400, AS/400 flat file, DDS, FMTDTA
AS400 to Worldship using alternate Ship From
I need all ship to and ship from mapping for AS400 to Worldship v 12. Has anyone tried and successfully done this with the HDR file? What other subset files do you need to do the alternate ship from?
Answer Question
| October 6, 2010 5:30 AM
AS/400, AS/400 Subfiles, AS400 to Worldship Integration, HDR, Subfiles
I need all ship to and ship from mapping for AS400 to Worldship v 12. Has anyone tried and successfully done this with the HDR file? What other subset files do you need to do the alternate ship from?
Answer Question
| October 6, 2010 5:30 AM
AS/400, AS/400 Subfiles, AS400 to Worldship Integration, HDR, Subfiles
Changes to SAP BPC system
Hello, I am doing an audit of a company that has recently implemented SAP BPC system. I would like to understand what type of changes can be made to this system. Our IT group told us that no code changes or enhancements can be made to SAP BPC system, but I am wondering if there [...]
Answer Question
| October 5, 2010 4:58 PM
BPCS, BPCS training, SAP, SAP administration
Hello, I am doing an audit of a company that has recently implemented SAP BPC system. I would like to understand what type of changes can be made to this system. Our IT group told us that no code changes or enhancements can be made to SAP BPC system, but I am wondering if there [...]
Answer Question
| October 5, 2010 4:58 PM
BPCS, BPCS training, SAP, SAP administration
How to get the “Named-FIRST MBR” in a CL/400 pgm
How to access the “FIRST MBR” of a multi-membered file in a CL/400 program. my scenario ———— I have a multi-membered file called WKSLSP, which has MBRs in the following format either MSPmmddyyn or FDBmmddyyn;(where mmddyy is the JOB-DATE and ‘n’ is the sequence number) like :- FDB100510A FDB100510B FDB1005106 MSP1005103 MSP1005105 The Seq. no.(n) [...]
Answer Question
| October 5, 2010 4:02 PM
AS/400, CL/400, MBR
How to access the “FIRST MBR” of a multi-membered file in a CL/400 program. my scenario ———— I have a multi-membered file called WKSLSP, which has MBRs in the following format either MSPmmddyyn or FDBmmddyyn;(where mmddyy is the JOB-DATE and ‘n’ is the sequence number) like :- FDB100510A FDB100510B FDB1005106 MSP1005103 MSP1005105 The Seq. no.(n) [...]
Answer Question
| October 5, 2010 4:02 PM
AS/400, CL/400, MBR
Problem in tape library device
I have i520 server with V5R3 and ts3100 tape library.I faced this message error when i try to do backup: *Attention* Interface error:TAPMLB01(resource TAPMLB01) or IOP CMB04.
Answer Question
| October 17, 2010 2:58 PM
AS/400, i520, Tape Backups, TS3100, TSM Tape Library, V5R3
I have i520 server with V5R3 and ts3100 tape library.I faced this message error when i try to do backup: *Attention* Interface error:TAPMLB01(resource TAPMLB01) or IOP CMB04.
Answer Question
| October 17, 2010 2:58 PM
AS/400, i520, Tape Backups, TS3100, TSM Tape Library, V5R3
Windows server 2000 with IIS keeps getting hacked
We have a Windows 2000 server with IIS. When we give it a public IP address the system gets hacked almost instantly. Secure passwords full on firewall. How can we prevent this? Is this an exploit I can patch?
Answer Question
| October 7, 2010 2:27 PM
Exploits, Firewalls, IIS, Public IP, Security in 2010, Windows Server 2000, Windows Server Security
We have a Windows 2000 server with IIS. When we give it a public IP address the system gets hacked almost instantly. Secure passwords full on firewall. How can we prevent this? Is this an exploit I can patch?
Answer Question
| October 7, 2010 2:27 PM
Exploits, Firewalls, IIS, Public IP, Security in 2010, Windows Server 2000, Windows Server Security
Is there a way to tell who held a job queue on the AS/400?
Our night shift discovered a job queue on hold with a number of jobs that should have run earlier in the evening. Is there any way to determine when the queue was held and by whom?
Answer Question
| October 5, 2010 2:26 PM
AS/400 Job Queue, AS/400 jobs, JOBQ, JOBQ held, V5R4
Our night shift discovered a job queue on hold with a number of jobs that should have run earlier in the evening. Is there any way to determine when the queue was held and by whom?
Answer Question
| October 5, 2010 2:26 PM
AS/400 Job Queue, AS/400 jobs, JOBQ, JOBQ held, V5R4
Help needed for connect statement using sqlrpg
Hi All, I need to do some checking in 2 different AS400 servers. I will read the data from one server(say local) then using connect type 2, connect to the other server(say remote), check the data and then returns back to my local server. I’m using sqlrpg for this and created 2 pgms for this. One will [...]
Answer Question
| October 21, 2010 9:39 AM
AS/400, AS/400 Server, RPG, SQL, SQLRPG
Hi All, I need to do some checking in 2 different AS400 servers. I will read the data from one server(say local) then using connect type 2, connect to the other server(say remote), check the data and then returns back to my local server. I’m using sqlrpg for this and created 2 pgms for this. One will [...]
Answer Question
| October 21, 2010 9:39 AM
AS/400, AS/400 Server, RPG, SQL, SQLRPG
iSeries (AS400) – can batch program send event-driven interrupt to interactive screen (not SNDBRKMSG)
I am looking for a way for an active batch program (waits on a data queue) to send an interrupt display to one or more users, based on specific data the program receives from the data queue. The interrupt would be a 1-way advice – no need for a reply, only ENTER – overlaying the application currently active [...]
Answer Question
| October 6, 2010 6:21 AM
AS/400, AS/400 Display File, CL batch program, iSeries
I am looking for a way for an active batch program (waits on a data queue) to send an interrupt display to one or more users, based on specific data the program receives from the data queue. The interrupt would be a 1-way advice – no need for a reply, only ENTER – overlaying the application currently active [...]
Answer Question
| October 6, 2010 6:21 AM
AS/400, AS/400 Display File, CL batch program, iSeries
How can I allow a user to sign off from an AS/400 web application from the browser?
I have built a simple web application that uses a web front end to an RPG program. Upon entering the URL the user is forced to enter a valid AS/400 user ID and password – in a similar manner to a password protected directory on a Linux server using Apache - utilizing a pop up window [...]
Answer Question
| October 5, 2010 10:49 PM
Apache, AS/400, AS/400 login, RPG, RPG Program, Web application
I have built a simple web application that uses a web front end to an RPG program. Upon entering the URL the user is forced to enter a valid AS/400 user ID and password – in a similar manner to a password protected directory on a Linux server using Apache - utilizing a pop up window [...]
Answer Question
| October 5, 2010 10:49 PM
Apache, AS/400, AS/400 login, RPG, RPG Program, Web application
Calling C ILE Procedure from COBOL 400 Program
I cannot get the parameters correct on this. I created a module for both the C and the COBOL, then used CRTPGM. My COBOL has WS-FIRST-COBOL-NUM PIC S9(2), WS-SECOND-COBOL-NUM PIC S9(2), WS-NUM-TOTAL-COBOL PIC S9(3) defined in WORKING-STORAGE. Then I use those for my call to the C procedure as: CALL PROCEDURE “TESTC” USING WS-FIRST-COBOL-NUM WS-SECOND-COBOL-NUM [...]
Answer Question
| October 20, 2010 8:49 PM
AS/400 Parameters, COBOL, COBOL/400, ILE Program
I cannot get the parameters correct on this. I created a module for both the C and the COBOL, then used CRTPGM. My COBOL has WS-FIRST-COBOL-NUM PIC S9(2), WS-SECOND-COBOL-NUM PIC S9(2), WS-NUM-TOTAL-COBOL PIC S9(3) defined in WORKING-STORAGE. Then I use those for my call to the C procedure as: CALL PROCEDURE “TESTC” USING WS-FIRST-COBOL-NUM WS-SECOND-COBOL-NUM [...]
Answer Question
| October 20, 2010 8:49 PM
AS/400 Parameters, COBOL, COBOL/400, ILE Program
