Here is an example of how I do it
STRING: #MODEL
STRING: #FILE11
STRING: #FILE20
STRING: #FILE30
STRING: #FL40
//
#MODEL=SHPFILE()
//
#STRLENGTH=STRLEN(#MODEL)
#FILE20=STRSUB(#MODEL,1,#STRLENGTH-4)
#STRLNGTH=STRLEN(#FILE20)
#FL40=STRSUB(#FILE20,#STRLNGTH-6,#STRLNGTH)
//
F_OPEN[FN=\\\\PMANGE\\AEC\\SKID\\INCLUDE.FIL,TY="W"]
F_WRITE[FN=\\\\PMANGE\\AEC\\SKID\\INCLUDE.FIL,FMT="%S~N~N",VR=FL40]
F_CLOSE[FN=\\\\PMANGE\\AEC\\SKID\\INCLUDE.FIL]
//
#FILE11=".NP"
#FILE30=STRTMP(%#FILE20%#FILE11)
//
CODE[FN=#FILE30,MF="\\\\pmange\\AEC\\SMF\\BOSCH.SMF",
TF="\\\\pmange\\AEC\\SMF\\Bosch_P.TMP",SH=0, DC=0, ST=0, DT=0, SP=9]
JOBSAVE[FN=#FILE20]
SAVE[FN=#FILE20, FT=3, GS=0, WP="XY_PLANE"]
hope this helps.
Mike DeBerry
----- Original Message -----
From: Michael Senack <[EMAIL PROTECTED]>
To: '[EMAIL PROTECTED]' <[EMAIL PROTECTED]>
Sent: Tuesday, February 20, 2001 1:58 PM
Subject: [mfg-smartcam] I'm going stringy!!
> // Advanced_Wedm 11.5 Windows 10/16/98 16:48:10 Macro File
> // w:\MCL\CUT2.mcl
> // CREATED: 02/13/01
> //
> //
>
> VAR_REMOVE_ALL[]
>
> STRING: #S1
> #S1=HS9999A REV.AA TEST
>
> // save A file and code it
> AUTO_ANSWER[AA="OK"]
> STRING: #PROGA
> #PROGA = STRSUB(#S1, 1, 7)
> SAVE[FN=STRTMP("W:\\JOB\\%PROGA"), FT=3, GS=0, WP="XY_PLANE"]
> CODE[FN=STRTMP("W:\\JOB\\%PROGA.GEO"), MS1="W:\\SM4\\SMF\\HS.SMF",
> MT1="W:\\SM4\\SMF\\HS.TMP",SH=1, DC=1, ST=1, DT=1, SP=9]
> AUTO_ANSWER[AA="OFF"]
>
> STRING: #PROGB
> #PROGB = STRSUB(#S1, 1, 6)
> MOD_UEVENT[EL=1, XS2=0, YS2=0, TX="#S1=%PROGB%B CUTS OFF TW0 PUNCHES",
LV=0]
>
> // save and code B file
> AUTO_ANSWER[AA="OK"]
> SAVE[FN=STRTMP("W:\\JOB\\%PROGBB"), FT=3, GS=0, WP="XY_PLANE"]
> CODE[FN=STRTMP("W:\\JOB\\%PROGBB.GEO"), MS1="W:\\SM4\\SMF\\HS.SMF",
> MT1="W:\\SM4\\SMF\\HS.TMP",SH=1, DC=1, ST=1, DT=1, SP=9]
> AUTO_ANSWER[AA="OFF"]
>
> I'm trying to some string concatenation.
> How do to cocatenate the following...
>
> W:\\JOB\\ + #PROGA + .GEO to get W:\JOB\HS9999.GEO
>
> W:\\JOB\\ + #PROG + B to get W:\JOB\HS9999B
>
>
>
> Regards,
>
> Michael Senack, X354
> Your local friendly neighborhood CNC Programmer
>
>
> ======================================================================
> To find out more about this mailing list including how to unsubscribe,
> send the message "info mfg-smartcam" to [EMAIL PROTECTED]
> ======================================================================
>
======================================================================
To find out more about this mailing list including how to unsubscribe,
send the message "info mfg-smartcam" to [EMAIL PROTECTED]
======================================================================
