Login
Templates, Tools and Utilities
for Clarion Developers
Templates, Tools and Utilities
|
||
|
|
|
Icetips Article
Back to article list
Search Articles
Add Comment
Printer friendly
Direct link
Par2: Full Build templates 1999-08-17 -- Krsitian Hyllestad If you're interested, here are two "rough" code templates doing
fullbuilds.
#CODE (FullBuild, 'Fullbuild
(Close/Build/checkopen)'),DESCRIPTION('FULLBUILD: ' & %Target)
#PROMPT ('File:',FILE),%Target
Status# = STATUS(%target)
IF Status# > 0
CLOSE(%target)
END
SEND(%Target,'FULLBUILD=on')
SETCURSOR(CURSOR:WAIT)
OPEN(%target,ReadWrite+DenyAll)
BUILD(%target)
SETCURSOR
IF ErrorCode() THEN Message('Fullbuild error: '&ERROR()).
IF Status# > 0
Open(%Target,Status#)
END
#CODE (FullBuildOnly, 'Fullbuild, no opening'),DESCRIPTION('FULLBUILD
only: ' & %Target)
#PROMPT ('File:',FILE),%Target
SEND(%target,'FULLBUILD=on')
SETCURSOR(CURSOR:WAIT)
BUILD(%target)
SETCURSOR
IF ErrorCode() THEN Message('FULLBUILD %target ERROR: '&ERROR()).
Today is November 21, 2024, 8:16 am This article has been viewed 35317 times.
|
|