Hello all. I've been trying to find a way to remotely check for an object lock. I've looked through the APIs but haven't come across anything yet that can do this. The reason for needing to do this is that I'm planning to install a lot of indicies to many production files that are locked at...
I can't seem to figure out how to change a job so that it will keep the job log after the job completes. I'm hoping that I can just put the job queue on hold, submit the job, change it, then release the queue. I can't seem to tweak any of the parm in the CHGJOB command to get it to keep the...
I've been trying to create an SQL package on a remote system. However, the command is trying to put the SQL package in strange libraries on the remote system. How does this command determine which library the remote SQL package will be made in? I've tried several different methods but I can't...
I want to make some procedures that can accept parms and will do simple embedded sql functions such as open and close a cursor, and fetch. I want to do this so I can clean up the way my code looks. Because SQL errors don't always cause a program to end when it should, I had to incorporate some...
Hello all. I'm trying to run a query that pulls data from two files. One of the files is going to be on the local system in which the program is running, and the second file will be on a remote system. The query looks like this:
SELECT A.CUSTNUM
FROM LocalFile A...
I have a transmissions job that I'm testing on the target system (this is using the old style ICFF files and separate transmission jobs on the sending and target systems). I need to debug the target program which is being submitting into batch by the job running on the sending system. While...
Hey everyone. I'm trying to think of ways to simulate a workfile without actually creating a physical file on the system. I've used arrays and data structures in the past, but that was for small amounts of data; the file I am processing now will most likely have 10s of thousands of records, if...
Hello all. I'm having a problem using a data structure; when trying to sum a certain subfield of the data structure, I receive a data decimal error that I cannot resolve. Here is the code:
D ReportTable DS DIM(10000) QUALIFIED
D VendorNum 7P...
I am processing a flat file that has several decimal fields. I used a data structure to break each field down based on its location. One particular field has values that look like this:
000000001764.0000
000000001404.0000
000000001068.0000
000000000828.0000
000000013320.0000
000000007488.0000...
Hello everyone. I have a display file and in the header I need to have 2 fields border each other. The first field which is in the top left corner of the screen holds the program name, and the field following that one for the remained of the first line is the program title, user name, etc...
Hello everyone. I'm trying to do something farily simple. I have a line of code:
FullPeriod = %char(FromYear2) + PeriodToChar(i);
FullPeriod is 3A and PeriodToChar returns a 1 digit period number. When FromYear2 is '06' (representing the year 2006), FullPeriod is concatenated as '61 '...
Hello all. I have a menu screen I am developing as sort of a "test menu". It will run different parts of an entire process we have, but will run it in pieces for testing purposes. I'd like to create a "final report" that will run at the end of the job that is executed to provide record counts...
Hello. I understand that CMPPFM is used mostly to compare source members, but I saw an article on the net that says you can use it to compare data in physical files. The article never stated how to do this however. I'd like to use it to compare data output from a specific program so that when...
Hello all. I'm working on a program where they want specific records in the subfile to blink. However, even when I turn the indicator on for the blink display attribute, write to the subfile, and turn if off, it still activates the blink for every record in the subfile. Is there a way to get...
Hello all. I've run into a problem while trying to create a multi-dimensional array to hold records. I have to use an array because I want to use the SortA opcode to sort the results. From what I understand, RPG does not support actual multi-dimensional arrays. Here is the data structure I...
Hello all. I seem to be having a problem with handing error messages that are to be written to the subfile error message record. A small CL program is being called by the RPG to send a specified error message to the screen (using a string, not a message file). Here is the CL:
PGM...
While debugging several programs, I noticed that the values in all variables are not being reset after the program ends. For example, I run the program once, then enddbg; I strdbg and run the program again, and all variables contain the values they had at the time the last program call ended...
I've been having a problem when passing a data structure by reference to a procedure that is part of a service program. When debugging the program, I try to see what value is contained in the data structure that was passed in, but when I do it says "Pointer not set for location referenced." If...
I found a thread dealing with date validation, but it is "in the archives," therefore I cannot post a reply to it. Anyhow, the thread I saw dealt with validating Dates entered on the display side. However, I need to validate a date on the RPG IV side. If I have an 8 digit date field that is...
Is it possible to dynamically retrieve the buffer positions and length of all fields in a file? I posted a thread before about this, but had not mentioned this approach. If I could somehow dynamically populate a multi-dimensional array (or data structure) with field name, buffer position, and...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.