help, auto save .prg after run, in a specific location variable.

I have been looking through all the past topics about this. but I am having trouble getting them working. I tried copy and pasting a few of them. and saving them as a .bas file and running the script. but i cant get one to work for me.

i currently already have a script that auto creates a folder from an operator input and saves the cmm report in that folder.

so ideally i want to follow that same train of thought and save a .prg & .cad in that same folder already created.

please advice.

AndersI over 6 years ago

PartNo gets the value of variable V5 - do you have a variable V5 in your part program?
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel

dl.melton over 6 years ago in reply to AndersI

Yessir...

JN         =COMMENT/INPUT,NO,FULL SCREEN=NO,

            ****** INPUT JOB NUMBER ******
SN         =COMMENT/INPUT,NO,FULL SCREEN=NO,

            ****** INPUT SERIAL NUMBER ******
CS1        =SCRIPT/FILENAME= Q:\QUALITY\IN PROCESS INSPECTION PLANS\1-SCRIPTS\LOGINID.BAS
            FUNCTION/Main,SHOW=YES,,
            STARTSCRIPT/
            ENDSCRIPT/
            ASSIGN/V1=JN.INPUT
            ASSIGN/V2=SN.INPUT
            ASSIGN/V3=0
            ASSIGN/V5="11127-MACHINE"

dl.melton over 6 years ago in reply to vpt.se
When I did it like this-

newname = "Q:\Quality\In Process Inspection Plans\11127-MACHINE\CMM REPORTS\" & PCDPartProgram.PartName & " - " & SerialNo & ".PRG"

it worked just fine. I was replacing the "11127-MACHINE" with a variable within the program itself so that I could use the same script for multiple programs. I set up the "PartNo.StringValue" for that purpose. Likewise with the "ObjFolder" because I don't want the program and report stored in the CMM Programs folder- it needs to be stored in a folder named per the Job number assignment and then annotated by the serial number for the specific part in that job, since we usually have at least 5-6 parts to a job. Setting it up with the file path shown above works without a hitch, even down to the serial number annotation at the end of the part number- but it just doesn't go quite as far as I need it to.
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel
vpt.se over 6 years ago

Maybe try without the quotes:

ASSIGN/V5=11127-MACHINE
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel
dl.melton over 6 years ago in reply to vpt.se
Yeah, I tried that initially and it turns red when I remove the quotation marks. Also, with the quotation marks on it, when you hover the cursor over it, what shows up in the box that comes up is

"11127-MACHINE" = 11127-MACHINE
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel
AndersI over 6 years ago

I suggest you split up the long "newname" concatenation in separate parts, to better pinpoint where the problem lies. Maybe some problem with multiple objects in one expression?
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel
vpt.se over 6 years ago in reply to AndersI

I agree, for debugging purposes.
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel
dl.melton over 6 years ago

I know just about enough about Basic Scripting to be dangerous, and I don't really have a clue as to how I would accomplish this. Can you offer some suggestions as to how I could split this up?
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel

AndersI over 6 years ago

Like:

[FONT=arial][SIZE=12px]newname = "Q:\Quality\In Process Inspection Plans\" & PartNo.StringValue
newname = newname & "\CMM REPORTS\ObjFolder\"
newname = newname & PCDPartProgram.PartName
newname = newname & " - "
newname = newname & SerialNo
newname = newname & ".PRG" [/SIZE][/FONT]

dl.melton over 6 years ago in reply to AndersI

I very much appreciate the suggestion- I'll give it a try and see what happens. Thank you very much!
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel