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 6975How 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 8347How 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 9107
What is output procedure?
why icetool be used in programmer view?
seqence numbers in cobol
How to detect record is locked in cobol/400? What is the solution for that?
How to update data area in cobol 400 program?
What are fillers?
Define redefine?
I like to know if possible to use %TRIM or any statement with prefiv "%" like RPG ile programs. thanks
Explain the syntax of sort?
Define perform? And its types?
What is redefine?
What are the types of perform?
Explain the input procedure and output procedure?
Explain the difference between comp & comp-3?
What is sort?