` Printed Icetips Article

Icetips Article



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()).



Printed April 28, 2024, 2:38 pm
This article has been viewed/printed 35112 times.