Demonstrates the use of the Verify Drawing statement DRAWV to return the parameters of a drawing.
$$
$$ Declarations
$$
NUMBER/REF(10,2),SIZE(2)
STRING/VW(10,30)
DRAWC/'DRAW1',4,WORK,IFERR,L10:
DRAWE/ADD,'FRONT',2,3
DRAWE/ADD,'TOP',2,8
DRAWE/ADD,'TFR-ISO',8,6
DRAWV/VW,REF,,NUM1,SIZE,IFERR,L20:
L10:MESSG/'CANNOT CREATE DRAWING'
L20:MESSG/'CANNOT VERIFY DRAWING'
The number variables do not need to be declared; however, the string array which holds the view names and the numerical array which holds the reference point locations must be declared. The variables are assigned values as follows:
Variable |
Value Assigned |
VW(1) |
FRONT |
VW(2) |
TOP |
VW(3) |
TFR-ISO |
REF(1,1) |
2 |
REF(1,2) |
3 |
REF(2,1) |
2 |
REF(2,2) |
8 |
REF(3,1) |
8 |
REF(3,2) |
6 |
NUM1 |
1 |
SIZE(1) |
22 |
SIZE(2) |
34 |
The number of member views was not required; therefore, the field (third field) was left blank by using back to back commas (,,).
The
DRAWE and DRAWV statements do not use the drawing name
because the drawing is active in the current work view.