Bilancio commessa CA
#SYSTEM.RAGSOC
#SYSTEM.DATE
#REPORT.PAGE
TIPOSTIMA
MESSAGE RESET,F1.101
MESSAGE RESET,F1.102
MESSAGE RESET,F1.103
MESSAGE RESET,F1.104
MESSAGE RESET,F1.105
MESSAGE RESET,F1.106
MESSAGE RESET,F1.107
MESSAGE RESET,F1.108
LEVEL C; 2
MESSAGE RESET,F2.101
MESSAGE RESET,F2.102
MESSAGE RESET,F2.103
MESSAGE RESET,F2.104
MESSAGE RESET,F2.105
MESSAGE RESET,F2.106
MESSAGE RESET,F2.107
MESSAGE RESET,F2.108
LEVEL
ANNO
LEVEL
MESSAGE COPY,F2.101
ANNO
MESSAGE COPY,F2.102
LEVEL
MESSAGE RESET,F3.101
MESSAGE RESET,F3.102
MESSAGE RESET,F3.103
MESSAGE RESET,F3.104
MESSAGE RESET,F3.105
MESSAGE RESET,F3.106
MESSAGE RESET,F3.107
MESSAGE RESET,F3.108
LEVEL
LEVEL
MESSAGE COPY,F3.101
CODCMS
DESCRIZ
FASE
ROUND(AVANZAMENTO;0)
#RIC
MESSAGE ADD,F3.101
#COSC01
MESSAGE ADD,F3.102
#COSC02
MESSAGE ADD,F3.103
#COSC03
MESSAGE ADD,F3.104
#COSC04
MESSAGE ADD,F3.105
#COSC05
MESSAGE ADD,F3.106
#COS
MESSAGE ADD,F3.107
#RIC-#COS
MESSAGE ADD,F3.108
#RIC @
0
=
IF
0
ELSE
1
#COS @
#RIC @
F;
-
100
*
0
ROUND
THEN
#THIS !
H2.101
H2.102
MESSAGE ADD,F1.101
MESSAGE COPY,F2.101
MESSAGE ADD,F1.102
MESSAGE ADD,F1.103
MESSAGE ADD,F1.104
MESSAGE ADD,F1.105
MESSAGE ADD,F1.106
MESSAGE ADD,F1.107
MESSAGE ADD,F1.108
H3.101
MESSAGE ADD,F2.101
MESSAGE ADD,F2.102
MESSAGE ADD,F2.103
MESSAGE ADD,F2.104
MESSAGE ADD,F2.105
MESSAGE ADD,F2.106
MESSAGE ADD,F2.107
MESSAGE ADD,F2.108
USE SALDANA