decimal data error
I declare time field in RPG as D btime 4 0 eval btime = 2400 this one i pass to a CL program with var type var(&tim) type(*dec) len(4,0) and this in turn passed to another RPG program D stime 4 0 when it comes to third program it has some hex char shown in debug as belo stime = 2_4_...
I declare time field in RPG as D btime 4 0 eval btime = 2400 this one i pass to a CL program with var type var(&tim) type(*dec) len(4,0) and this in turn passed to another RPG program D stime 4 0 when it comes to third program it has some hex char shown in debug as belo stime = 2_4_...
750 pts.
SQLRPGLE
I've Report to print using SQLRPGLE The Report criteria screen has around 15-20 select conditions...based on the conditions entered by the user, I build a query of type Select * from emp1 where val1 = ? and val2 =? and val3 = ? and........... This is the first time I'm dealing with so many select...
I've Report to print using SQLRPGLE The Report criteria screen has around 15-20 select conditions...based on the conditions entered by the user, I build a query of type Select * from emp1 where val1 = ? and val2 =? and val3 = ? and........... This is the first time I'm dealing with so many select...
Can one use strdbg to trace code through a interactive program that allows update to display screens
Can one use strdbg to trace code through a interactive program that allows update to display screens. I can get the add item and delete item part to work but not the update/change function which craps out with a error message. There seems no reason for this message, but there has to be a reason...
Can one use strdbg to trace code through a interactive program that allows update to display screens. I can get the add item and delete item part to work but not the update/change function which craps out with a error message. There seems no reason for this message, but there has to be a reason...
RPGLE
I've display file in RPGLE program... I want to display function key F19=View History based on certain condition. I planned to use indicator to swith on if the condion meets and the option will be displayed ... the problem here is all 01 to 99 indicators, KC,KE,KG,KJ,KQ,U2 are already used by the...
I've display file in RPGLE program... I want to display function key F19=View History based on certain condition. I planned to use indicator to swith on if the condion meets and the option will be displayed ... the problem here is all 01 to 99 indicators, KC,KE,KG,KJ,KQ,U2 are already used by the...
Retrieve error message in RPG
I have an interactive RPGLE program ,PGMA, that calls another RPG program, RPG3P, based on a parameter and that job is not interactive. If RPG3P aborts how can I find out what the error mesage was? The job log does not give enough information to help find the problem. Software/Hardware used: V5R4
I have an interactive RPGLE program ,PGMA, that calls another RPG program, RPG3P, based on a parameter and that job is not interactive. If RPG3P aborts how can I find out what the error mesage was? The job log does not give enough information to help find the problem. Software/Hardware used: V5R4
How do I process Horizontal Subfiles in a particular order?
I have a data entry screen for serial numbers. Each serial number is 10 characters in length. Therefore I created a horizontal subfile using SFLLIN. This puts spaces between the records equally. The result is that I have X number of columns. When I enter the data, the entry is from left to right....
I have a data entry screen for serial numbers. Each serial number is 10 characters in length. Therefore I created a horizontal subfile using SFLLIN. This puts spaces between the records equally. The result is that I have X number of columns. When I enter the data, the entry is from left to right....
Why do I have such a problem with passing to a program a 8 byte field using a parm.
Why do I have such a problem with passing to a program a 8 byte field using a parm. Parm field is define as packed(8,0) but as soon as the program tries to acquired the parm I get a Decimal data error. *ENTRY ...
Why do I have such a problem with passing to a program a 8 byte field using a parm. Parm field is define as packed(8,0) but as soon as the program tries to acquired the parm I get a Decimal data error. *ENTRY ...
Cal I load a record SET into a work file using SQL within RPGLE?
ALL - I have to process a set of Inventory Transactions based on W/H, Product, From Date, and To Date. Normally, I would jump into a Do Loop; read the SQL cursor; write the record to a work file; process until EOF. Can an SQL statement do all of that for me in one statement? I have not been able to...
ALL - I have to process a set of Inventory Transactions based on W/H, Product, From Date, and To Date. Normally, I would jump into a Do Loop; read the SQL cursor; write the record to a work file; process until EOF. Can an SQL statement do all of that for me in one statement? I have not been able to...
Error Reset Key
I have a request that I have not done before. In my display file I use the IBM messages when there is an error. When the screen is displayed again it displays the field in question highlighted and then the user has to press the error reset key. Is there away so the user does not have to press the...
I have a request that I have not done before. In my display file I use the IBM messages when there is an error. When the screen is displayed again it displays the field in question highlighted and then the user has to press the error reset key. Is there away so the user does not have to press the...
Move file on windows folder through FTP script in RPGLE
I am trying to move a file from one folder to another on windows by writing a FTP script in RPGLE. But my file path is too long to come in one line in rpg source. Please can you let me know, how to continue the command in second line. Software/Hardware used: AS400 - RPGLE
I am trying to move a file from one folder to another on windows by writing a FTP script in RPGLE. But my file path is too long to come in one line in rpg source. Please can you let me know, how to continue the command in second line. Software/Hardware used: AS400 - RPGLE
Menua Option change
Opt Object Type Library Attribute Text OBRPT *MSGF LIb1 Report Trackin OBRPT *FILE ...
Opt Object Type Library Attribute Text OBRPT *MSGF LIb1 Report Trackin OBRPT *FILE ...
INFDS in RPGLE
I declare INFDS in my program for a display file and use it to detect what key is pressed DChkfil DS D key_pres 369 369 This was working earlier and suddenly now I see in debug that the...
I declare INFDS in my program for a display file and use it to detect what key is pressed DChkfil DS D key_pres 369 369 This was working earlier and suddenly now I see in debug that the...
iSeries Content Manager API Error
I am trying to archive PDF document in iseries Content Manager V5.1 using the APIs provided by IMB in the RPGLE program. The SimLibStoreNewObject is giving error when the ObjectSize parameter is passed with a value 490KB or above. If the ObjectSize parmater is passed as any value below 490KB ,...
I am trying to archive PDF document in iseries Content Manager V5.1 using the APIs provided by IMB in the RPGLE program. The SimLibStoreNewObject is giving error when the ObjectSize parameter is passed with a value 490KB or above. If the ObjectSize parmater is passed as any value below 490KB ,...
Page at a time subfile
I want to code loading a single page subfile in SQLRPGLE. How do I handle the page up and page down key, posotion to in that program? thanks, NG Software/Hardware used: SQLRPGLE
I want to code loading a single page subfile in SQLRPGLE. How do I handle the page up and page down key, posotion to in that program? thanks, NG Software/Hardware used: SQLRPGLE
display file - window RPGLE
I have a window for a display file whenevr i display field level err message the message appears outside the window.... how will i get it inside the window at the bottom? @depnum 11Y 4B 11 18 A 41 ...
I have a window for a display file whenevr i display field level err message the message appears outside the window.... how will i get it inside the window at the bottom? @depnum 11Y 4B 11 18 A 41 ...
subfile in RPGLE
i have indicator to show fields in a row red in subfile... when i select some option say 5 - view against this row, it displays necessary details. now affter dispalying this when i return back to existing screen, i update SFL to make the selected option 5 blank, and redisplay the file.....however...
i have indicator to show fields in a row red in subfile... when i select some option say 5 - view against this row, it displays necessary details. now affter dispalying this when i return back to existing screen, i update SFL to make the selected option 5 blank, and redisplay the file.....however...
5250 job initiation
Can anyone remember how to start a job (e.g. and enquiry) on a 5250 workstation either from another session, releasing that session, or from a submitted job. I have used ACQ and REL in the dim distant past but cannot member if this is possible. Software/Hardware used: i5 OS400 V5R4
Can anyone remember how to start a job (e.g. and enquiry) on a 5250 workstation either from another session, releasing that session, or from a submitted job. I have used ACQ and REL in the dim distant past but cannot member if this is possible. Software/Hardware used: i5 OS400 V5R4
How do I call an API which is in a service program
I hope somebody can shed some light on the following. I need to call an API "QjoRtvJrnReceiverInformation" which is in service program QJOURNAL. I am not new to ILE but experience of using service programs and using API's within service programs is limited Do I need to code all the 'D' specs...
I hope somebody can shed some light on the following. I need to call an API "QjoRtvJrnReceiverInformation" which is in service program QJOURNAL. I am not new to ILE but experience of using service programs and using API's within service programs is limited Do I need to code all the 'D' specs...
secure socket written in RPGLE
I am having a sporadic issues with a secure socket program written in RPGLE. The program is ending before a response is recieved from the reqeusted server. Software/Hardware used: as/400, rpgle
I am having a sporadic issues with a secure socket program written in RPGLE. The program is ending before a response is recieved from the reqeusted server. Software/Hardware used: as/400, rpgle
