|
Par ce dispositif a également d'autres instructions :
Facilité d'utilisation
$CONTROL
VPLUSCOM
When
the
RPG/iX
compiler
detects
the
statement
$CONTR
OL
VPLUSCOM
it
sets
a
ag
used
to
con
trol
certain
items,
b oth
at
compile
time
and
at
run
time.
It
rst
creates
t
w
o
new
reserv
ed-w
ord
v
ariables,
*V
C
and
*VST
A
T.
*V
C
is
declared
to
b e
a
200
c
haracter
alpha-n
umeric
array
of
1
c
haracter
p er
elemen
t.
Do
NOT
en
ter
a
File
Extension
Sp ecication
for
this
v
ariable.
*VST
A
T
is
declared
to
b e
a
6
digit
n
umeric
v
ariable
with
0
decimal
places.
If
y
ou
try
using
these
items
without
the
$CONTR
OL
statement,
y
ou
will
get
a
Note
compile-time
error.
Since
these
are
declared
for
y
ou,
all
y
ou
need
to
do
is
use
them.
No
other
declarations
are
necessary
.
Reserv
ed
w
ord
*V
C
The
new
reserv
ed
w
ord
*V
C
is
initialized
b
y
the
compiler
to
p oint
to
the
start
of
the
COMAREA.
Th
us,
*V
C,1
and
*V
C,2
p oint
to
the
left
and
right
b
ytes
of
the
status
w
ord,
for
example.
Since
RPG
do es
not
ha
v
e
an
in
ternal
binary
data
t
yp e,
managemen
t
of
the
COMAREA
b
y
the
user
can
b e
somewhat
tricky
.
This
will
b e
discussed
later.
Reserv
ed
w
ord
*VST
A
T
The
reserv
ed
w
ord
*VST
A
T
may
b e
used
as
an
ordinary
6-digit
n
umeric
v
ariable,
but
has
sp ecial
prop erties.
F
or
certain
actions
(SHO
WMSG,
SHO
W,
RDTERM,
SHOD
A
T
A,
PRINTX,
CLRMSG)
the
COMAREA
status
w
ord
is
copied
to
this
item
on
return
from
its
VPLUS
in
trinsic
call.
The
COMAREA
status
w
ord
(the
rst
16-bit
w
ord
of
the
COMAREA)
con
tains
the
result
of
a
VPLUS
in
trinsic
call.
If
the
in
trinsic
executes
correctly
,
this
v
alue
will
b e
0.
If
it
fails,
the
v
alue
returned
will
b e
a
binary
in
teger
equal
to
an
error
n
um
b er
indicating
the
reason
for
the
failure.
It
is
the
user's
resp onsibility
to
test
*VST
A
T
immediately
after
the
EX
CPT
statement
that
initiates
the
action.
An
example
will
b e
sho
wn
later.
If
*VST
A
T
is
non-zero,
y
ou
m
ust
set
it
to
zero
b efore
taking
an
y
other
action
(except
p ossibly
calling
VERRMSG
using
INTR/IP
ARM
op erators
-
an
example
of
this
will
also
b e
given
later).
T
o
reset
the
status
w
ord
to
0
do
\Z-ADD0
*VST
A
T
".
This
will
set
b oth
*VST
A
T
and
the
COMAREA
status
w
ord
to
0.
ONL
Y
the
Z-ADD
op erator
will
do
this.
If
y
ou
Z-ADD
a
non-zero
v
alue
to
*VST
A
T,
*VST
A
T
will
b e
set
to
this
v
alue
but
the
COMAREA
status
w
ord
will
still
b e
set
to
zero.
VPLUS
Intrinsics
Y
ou
may
no
w
call
VPLUS
in
trinsics
directly
from
y
our
RPG
program
using
the
INTR/IP
ARM
op erators.
On
return
from
the
in
trinsic
call,
*VST
A
T
is
up dated
with
the
COMAREA
status
w
ord.
Y
ou
m
ust
test
this
y
ourself
to
v
erify
correct
op eration.
This
may
only
b e
done
if
y
ou
ha
v
e
sp ecied
$CONTR
OL
VPLUSCOM
in
y
our
program,
it
is
a
w
orkstation
application,
and
the
in
trinsic
b egins
with
the
letter
'V'
(a
p oten
tial
limitation,
but
OK
for
no
w).
10a-2
The
RPG
Interface
to
VPLUS
Update
1,
3/95
... Ce manuel est également adapté pour les modèles :
Logiciel - MPE/iX 6.5 Operating System (81.48 kb)
Logiciel - MPE/iX 7.0 Operating System (81.48 kb)
Logiciel - MPE/iX 7.5 Operating System (81.48 kb)