IBM MainFrame (5234)
IBM AS400 (1355)
IBM PL/1 (31)
what are necessary keywords to code message subfile?
What are Naming Conventions in QMF?
Mention some fields that are a part of sqlca.
DB2 can implement a join in three ways using a merge join, a nested join or a hybrid join. Explain the differences?
Explain identify whether a call statement is a static or dynamic call?
what is swap-in and swap-out?
Explain what all the conditiones required for using open opcode on a file?
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
How you can characterize tables in cobol?
which indicator is used for read?
what are the different opcodes available in rpg for database access ?
How to remove the spaces at the end of each record in the output file of variable length, via cobol program?
What kind of error is trapped by on size error option?
what do you mean by the cobol record key clause in vsam?
Distinguish among erase, erase permanent, erase selective and erase all?