I couldnt solve problem.. Why It's giving error message... Thank You...

[Mert EŞSİZ]

I'm a very newbie.. I try solve this problem since 8 hour, but i couldnt
solve.. 
When i press button on form, following code is running.
Following code running but when it's return previous form, my app crashing.
I want only my previous form with FrmGotoForm(1000);
It's giving error message "Bus Error" ??
I done eeverything, but i couldnt succeed.

If you can help me, i'll very glad.

Thanks. 

Code ...................................:

static void WriteRecordData()
{
CharPtr adPtr, soyadPtr;
Boolean         DoSave = true;
Boolean         isPrivate;
static Word RecAttr;
VoidHand        newRecordHandle;
VoidPtr newRecordPtr;

adPtr = FldGetTextPtr((FieldPtr)GetObjectPtr(YeniAdField));
soyadPtr  = FldGetTextPtr((FieldPtr)GetObjectPtr(YeniSoyadField));
if ((!adPtr || adPtr[0] == '\0') && 
   (!soyadPtr || soyadPtr[0] == '\0')) 
            { DoSave = false; }

        if (DoSave) 
        {
        UInt adLen;
        UInt soyadLen;
        
        UInt    WhereRec;
        UInt    newRecSize;
        
        adLen = StrLen(adPtr) + 1;
        soyadLen = StrLen(soyadPtr) + 1;
        newRecSize=adLen+soyadLen;
        
        newRecordHandle = DmNewHandle(RehberDB,newRecSize);
        newRecordPtr = MemHandleLock(newRecordHandle);
        
        DmWrite(RehberDB,0,adPtr,adLen);
        DmWrite(RehberDB,adLen,soyadPtr,soyadLen);
        
        WhereRec = DmFindSortPosition(RehberDB, newRecordPtr, 0,
                                  (DmComparF *) ComparePackedPinFunc, 0);
        
        DmAttachRecord(RehberDB,&WhereRec,(Handle)newRecordHandle,NULL);

        MemHandleUnlock(newRecordHandle);
        isPrivate =
CtlGetValue((ControlPtr)GetObjectPtr(YeniGizliCheckbox));
                        if (isPrivate)
                                RecAttr |= dmRecAttrSecret;
                        else
                                RecAttr &= ~dmRecAttrSecret;
        DmSetRecordInfo (RehberDB, WhereRec, &RecAttr, NULL);

        DmReleaseRecord(RehberDB, WhereRec, true);
        }
}

-- 
For information on using the Palm Developer Forums, or to unsubscribe, please see 
http://www.palmos.com/dev/tech/support/forums/