How can we find out whether the job is interactive or Batch
through RPG program?
2) How can we find out through CL program?

Answer Posted / sreedhar reddy

in RPG, Use PSDS data structure to find Job name.

position 244 to 253 is Job name.

D JOB_NAME 244 253 Job name

Is This Answer Correct ?    1 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

When it is desirable to describe files Internally?

1186


what is *place and *auto keyword in prtf ?plz explain

2724


what is the use of sflnxtchg?

801


what is file information data structure?

1372


Assume 2 users are using the same file and first user updates some record in the file. Will the 2nd user will be able to see the updated record or not?

515






How can we know running job is batch or interactive?

654


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

2013


what is program status data structure?

1387


how does the rpg element work?

716


can any one help in hawkeye and turnover or any change management system plzzzzz or send the documents to my mail id :gvsp.as4@gmail.com

1967


how do I preserve and clean the array?

674


if there is a module object , how to find the program object for this module object.Assume the module object name and program object name is not same.

2195


What is file identifier where we can use?

650


how do I declare a table or array in rpg iv?

737


what is data area and how it is used in rpg program ?

756