How to create Variables from Several If Statements in Crystal 2008

Here is the formula I'm working with that I would like to convert to several variables. I am using this formula in several different other formulas and everytime I need to tweak it I have to remember to tweak it in every other formula.. I assume there is a way to declare a variable for each if statement so that I can use the variable name in my other formulas and only have to come back to the declaration formula to make changes to all my if statements?

//1
if             {BAQReportResult.SE-CalcIssQty} + 1 >= {BAQReportResult.JobMtl.RequiredQty}
        and {BAQReportResult.SE-CalcIssQty} - 1 <= {BAQReportResult.JobMtl.RequiredQty}
        and {BAQReportResult.SE-CalcIssQty} <> 0
        then "1"
//1a
else if     {BAQReportResult.JobMtl.RequiredQty} = 0
        and {BAQReportResult.SE-CalcIssQty} > 0
        then "1a"
//2
else if     {BAQReportResult.SE-CalcIssQty} = 0
        and {BAQReportResult.PORel.XRelQty} >= {BAQReportResult.JobMtl.RequiredQty}
        and {BAQReportResult.PORel.XRelQty} <> 0
        //and {BAQReportResult.PORel1.XRelQty} = 0
        then "2"
//2a
else if     {BAQReportResult.SE-CalcIssQty} = 0
        and {BAQReportResult.PORel.XRelQty} < {BAQReportResult.JobMtl.RequiredQty}
        and {BAQReportResult.PORel.XRelQty} <> 0
        and {BAQReportResult.PORel1.XRelQty} = 0
        then "2a"
//3
else if     {BAQReportResult.SE-CalcIssQty} = 0
        and {BAQReportResult.PORel.XRelQty} = 0
        and {BAQReportResult.PORel1.XRelQty} >= {BAQReportResult.JobMtl.RequiredQty}
        and {BAQReportResult.PORel1.XRelQty} <> 0
        then "3"
//3a
else if     {BAQReportResult.SE-CalcIssQty} = 0
        and {BAQReportResult.PORel.XRelQty} = 0
        and {BAQReportResult.PORel1.XRelQty} < {BAQReportResult.JobMtl.RequiredQty}
        and {BAQReportResult.PORel1.XRelQty} <> 0
        then "3a"
//4
//else if     {BAQReportResult.SE-CalcIssQty} = 0
//        and {BAQReportResult.PORel.XRelQty} > 0
//        and {BAQReportResult.PORel1.XRelQty} > 0
//        then "4"
//5
else if     {BAQReportResult.SE-CalcIssQty} > 0
        and {BAQReportResult.SE-CalcIssQty} <> {BAQReportResult.JobMtl.RequiredQty}
        and {BAQReportResult.PORel.XRelQty} = 0
        and {BAQReportResult.PORel1.XRelQty} > 0
        then "5"
//6
else if     {BAQReportResult.SE-CalcIssQty} > 0
        and {BAQReportResult.SE-CalcIssQty} <> {BAQReportResult.JobMtl.RequiredQty}
        and {BAQReportResult.PORel.XRelQty} > 0
        and {BAQReportResult.PORel1.XRelQty} = 0
        then "6"
//6a
else if     {BAQReportResult.SE-CalcIssQty} > 0
        and {BAQReportResult.SE-CalcIssQty} <> {BAQReportResult.JobMtl.RequiredQty}
        and {BAQReportResult.PORel.XRelQty} > {BAQReportResult.SE-RemainingQty}
        then "6a"
//7
else if     {BAQReportResult.SE-CalcIssQty} > 0
        and {BAQReportResult.PORel.XRelQty} > 0
        and {BAQReportResult.PORel1.XRelQty} > 0
        then "7"
//8
else if     {BAQReportResult.SE-CalcIssQty} > 0
        and {BAQReportResult.SE-CalcIssQty} <> 0
        and {BAQReportResult.PORel.XRelQty} = 0
        and {BAQReportResult.PORel1.XRelQty} = 0
        then "8"
//9
else if     {BAQReportResult.SE-CalcIssQty} = 0
        and {BAQReportResult.PORel.XRelQty} = 0
        and {BAQReportResult.PORel1.XRelQty} = 0
        then "9"
else "0"

Here is what I tried as a declaration statement and tested, which did not work..

Global BooleanVar one;
one := not({BAQReportResult.SE-CalcIssQty} + 1 >= {BAQReportResult.JobMtl.RequiredQty}
        and {BAQReportResult.SE-CalcIssQty} - 1 <= {BAQReportResult.JobMtl.RequiredQty}
        and {BAQReportResult.SE-CalcIssQty} <> 0)

I then changed the first "if" in the above formula to read:

Global Booleanvar one;
//1
if         one
        then "1"

It was not working though like this..

Any Ideas.. Hopefully my formulas make some since... :(

Thanks for the help!