When I Flip the Sign using script, additional data appears

Question

I flipped the sign and it became a negative and that is correct. But it is adding some additional data to the flipped member. Both members are expenses. I am putting it in one bucket as a debit and another bucket as a credit, so that they will eliminate each other. Example below:
/*** Clear any data in accounts 79400 and 79415 ***/
FIX("Jan":"Dec",&BudYr,"System","Dollars","Budget","Input","7100")
          CLEARDATA "79400";
          CLEARDATA "79415";
ENDFIX
/*** This will debit by month 7100 to account "Interco. Alloc. In (79400)" ***/
FIX("Jan",&BudYr,"System","Dollars","Budget","Input","7100","79400")                                   
AMC = "000"->"TOT_SGA_EXP" * "ALLOCATION_PCT" ->"AMC"->"BegBalance";     
ENDFIX
/***This will credit by month 7100 to account "Intra. G/A Admin Alloc. Out (79415)" ***/      
FIX("Jan",&BudYr,"System","Dollars","Budget","Input","7100","79415")                                   
AMC = ("000"->"TOT_SGA_EXP" * "ALLOCATION_PCT" ->"AMC"->"BegBalance") * -1;     
ENDFIX
RESULTS:
Interco. Alloc. In (79400)     Admin (000)     Compliance (7100)     American Managed Care     January     97,578
Intra. G/A Admin Alloc. Out (79415)     Admin (000)     Compliance (7100)     American Managed Care     January     (146,367)
DIFFERENCE (48,789)
Any help would be appreciated.

Answer 1

Of course there is. This is the kind of calc script that only gets run once, so make usre you test it well before doing it on production and make a backup of production before doing it.
It would be something like
Fix(time frame, accounts to be flipped, level zero other dimensions)
actual = actual * -1;
EndFix
Cal dim dimensions
Note, I chose actual, but you could do it for any dimension that has a single or only a couple of members. What ever dimension you choose to do the calculation on, it can't be included in the fix statement