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.
1 4865How 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 6942How 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 7595
What are the types of perform?
How to update data area in cobol 400 program?
What is redefine?
How to detect record is locked in cobol/400?
Explain the input procedure and output procedure?
Explain the types of perform?
What is sort? And its syntax?
What is comp?
Explain how to update data area in cobol 400 program?
seqence numbers in cobol
Define redefine and its syntax?
What is the syntax of sort?
Explain the syntax of redefine?
What is sort?
why icetool be used in programmer view?