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 5857How 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 7153How 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 7793
Define redefine and its syntax?
What is the actual use of fillers?
Explain the input procedure?
What is comp?
Explain how to update data area in cobol 400 program?
why icetool be used in programmer view?
What is input procedure?
What is sort?
Explain the syntax of redefine?
What is the syntax of redefine?
What is perform?
Explain the output procedure?
Define sort?
What is the syntax of sort?
Explain the input procedure and output procedure?