Somthing like this maybe

It just needs to make the folder and subfolders in the specifik folder I am in when running the script. This script asks where to put the folder, I don't won't it to do that. I would just like the script to put the new folder (with custom name) and the subfolders (always same names) it in the current folder, and open new folder with the name I've given it, in the samme window, so I can see the subfolders when the script is done.

tell application "Finder"
    set JobName to text returned of (display dialog "Please enter Job Name:" default answer "Job_Name")
    set loc to choose folder "Choose Parent Folder Location"
    set newfoldername to JobName
    set newfo to make new folder at loc with properties {name:newfoldername}
    make new folder at newfo with properties {name:"Job Materials"}
    make new folder at newfo with properties {name:"Previews"}
    make new folder at newfo with properties {name:"PSDs"}
    make new folder at newfo with properties {name:"VX"}
end tell

Great!

I would like a script, pretty simlular to the one above.

But when I run the script, I would like the possibility to enter what the name of the folder shold be (specific job name), before it creates it and the four subfolders which always has the same names.

Is that possible?