Interested to Buy Any Domain ? << Click Here >> for more details...
How can we access Interactive job LDA in Batch Job?.
and How we can access a file in interactive QTEMP lib in
Batch job?.
- 4 Answers
- 23391 Views
- IBM, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / kamal
If we use SBMJOB, the contents of LDA of interactive job to
be copied to the LDA created when submitting a job using
SBMJOB.
| Is This Answer Correct ? | 17 Yes | 2 No |
Answer / george philip
When you Submit a Batch job through an Interacvive job. The
Content of the *LDA (of interavtive job) is copied into the
*LDA (of the Batch Job)
In Other words you can say "The system creates a local data
area, which is initially filled with blanks, with a length
of 1024 and type *CHAR. When you submit a job using the
SBMJOB command, the value of the submitting job's local
data area is copied into the submitted job's local data
area. "
| Is This Answer Correct ? | 9 Yes | 1 No |
QINTER and QBATCH are two different subsystems in iseries
box. interactive job having its own QTEPM and *LDA and batch
having its own.if u signon to QINTER means i.e a job. AS400
creates QTEMP and *LDA for each job. so each SBMJOB having
its own QTEMP and *LDA and your QINTER session having its
own. so you cannot access both at a time.
| Is This Answer Correct ? | 7 Yes | 7 No |
Answer / madhuri
LDA and QTEMP library are specific to the jobs. Hence we
cannot access those two of interactive job in a batch job.
Only possible solution that I cna think of is copying the
data to another data area object or creating a file in
normal library before submitting the job and deleting it
after use.
| Is This Answer Correct ? | 1 Yes | 8 No |
Q:HI friends accually ihave one problem plesase let me know the alternate code of this code. Related field description of code: Add a field, CALvsPRD, "Calendar Day Starts Before/After Production Day" to the parameter set WRKORDER which accepts values 'A' or 'B' o B = Calendar Day Starts Before Production Day o A = Calendar Day Starts After Production Day o Any other value indicates the production and calendar dates are always the same. code: Automatic Execution Of *INZSR Subroutine /Z01 * retrieves WRKORDER field values. /Z01 * Calculate default Production Date and return it to caller. /Z01 * Production date defaults to system date /Z01 C Eval P@Pdate = %DATE() /Z01 * unless Calendar date starts Before PDN(production) date and /Z01 * system time is before PDN Start Time then /Z01 * PDN date is yesterday. /Z01 C If W@CALvsPRD = 'B' and /Z01 C %TIME() < %TIME (W@Strtime) /Z01 C Eval P@Pdate -= %Day(1) /Z01 * unless Calendar date starts After PDN date and /Z01 * system time is *GE PDN(production) Start Time then /Z01 * PDN date is tomorrow. /Z01 C ElseIf W@CALvsPRD = 'A' and W@Strtime > *Zero and /Z01 C %TIME() >= %TIME (W@STrtime) /Z01 C Eval P@Pdate += %Day(1) /Z01 C EndIf /Z01 C Eval *InLr = *On
what built in function can be used with SETLL.If you want to check whether the search argument is successful or not? Please give me answer with example?
How to define data area in RPG program? In which scenario multi occurrence DS is use in AS400?
Need a sql query: retrieve all duplicate records in table?
I have a Physical File name 'File1', which is present in two libraries named 'LIB1' & 'LIB2'. These 2 libraries are listed in the library list. Would like to access data from this file from these two libraries using RPG program. How to do this, any idea?
We have a Physical file, after reading 5 records,it has to read LF of that same Physical file,Will it start reading from Ist record or will start reading from 5th record?
1.Are there any errors in the following statement?If so then list them.DTAARA is a data area having a field EMP # and EMPNO is a field in the file EMPPF.Which has one record. READ EMPPF IF %FOUND(EMPPF) IN DTAARA EVAL EMP#=EMPNO OUT DTAARA ENDIF
1.WHAT IS WRONG WITH THE CODE BELOW? C CUSTNO CHAIN CUSTMAST IF %ERROR can any body find the wrong please? 2.What builtin function will you use to achieve the following functionality? C QTY IFLT *ZERO C QTY MULT-1 QTY ENDIF
Suppose i am having 3 programs PgmA,pgmB,pgmC and using source debugger. At debugging time i found that pgmC having some code error..then in debug mode directly how can i debug pgmC
You have a *USE authority on a Library and *All authority on a file in that Library.Can you change the data in that file?
What is the difference Return and InLr?
Hi all friend, Could Any body send me the code (with coding) of this senario because I have tried but I am stucking somewhere so Please reply ASAp with coding. senario:Q: I have to write the flat file(FLAT1) into the three different PFS (PF1,PF2 and PF3) with the respect of H line data, D line data and Z line data of flat file. where I have different data in flat file(FLAT1) which is mentioned below with data. H0929200909282009092820095529420003000073 D2222220006765555webservi001633.9909222009092820090924200951 8564380134049ROSNER TOYOTA OF FREDE FREDERICKSBURVA 224080000USA840840001633.99001633.99851856492689800208001915 511001633.990408490000000.0000000003446048 1,3 110793145 09070700351 372367 Rosner Motors D3333320006774444webservi000271.2409222009092820090924200951 8564380134049ROSNER TOYOTA OF FREDE FREDERICKSBURVA 224080000USA840840000271.24000271.24851856492689800208001835 511000271.240930680000000.0000000003450293 1 110793254 09072100079 373933 Rosner Motors Z0929200900000020001905.25 FLAT1 has the three pf data H line-represents the header pf data,D-Represent Details pf data,Z-Represents the trailer pf data Now I have to write H line data of flat file into Header pf (PF1),D line data of flat into datails pf(PF2) and Z line data of flat file into pf(PF3) with the spefic position(H,D and Z data of flat file into PF1, PF2 and PF3) of flat file.
RPG400 
