01 A PIC 9. 01 B PIC 99V1. 01 C PIC 99. MOVE 1 TO A. MOVE 0.2 TO B. COMPUTE C ROUNDED TO 3/3 + A.
2 5860How can i change the below code in SQL to cobol/400? EXEC SQL SELECT COUNT(*) INTO : WS-COUNT FROM Db file WHERE Field 1 = : WS-VAR AND Field 2 = : WS-USERID END-EXEC * EVALUATE TRUE WHEN SQLCODE = +000 MOVE WS-COUNT TO Copybook field WHEN SQLCODE = +100 MOVE ZEROES TO Copybook field
2 7158How can i change the below code in SQL to cobol/400? EXEC SQL SELECT COUNT(*) INTO : WS-COUNT FROM Db file WHERE Field 1 = : WS-VAR AND Field 2 = : WS-USERID END-EXEC
HP,
2 7795
What is output procedure?
What is the syntax of redefine?
Explain what all the conditiones required for using open opcode on a file?
How to detect record is locked in cobol/400? What is the solution for that?
Explain the output procedure?
What is input procedure?
How to update data area in cobol 400 program?
Define perform? And its types?
Explain the syntax of sort?
seqence numbers in cobol
What is sort?
What is redefine?
Explain how to detect record is locked in cobol/400? What is the solution for that?
What is perform?
What is comp?