From: Grant on
Thank you for your comments Geoff and Mathias. I am now top posting. I
apologize for not responding sooner but I am doing as you said Geoff
and have created a sample app which is working fine as far as I have
gotten. I will post again if I run into trouble but now I'm learning a
lot and appreciate your help.


On Mar 10, 11:05 am, Grant <gra...(a)dunsmoreinfo.com> wrote:
> Hello all. I am appending a record to a browser and want the first
> field of the new record to be an editable date field. It appends and
> opens in edit mode but I can't save it or any other fields until I
> move the cursor to a differnet record and then back. Does this make
> sense? Once the cursor has moved up and down a record the new record
> can be saved. It looks like I haven't been able to set the edit mode
> after the append properly. The following is some of the code I am
> trying to use.
> The postinit sets the browser to edit mode
> "self:oDCbBrowser1:Editable := true" and the new record is appended as
> follows:
>      METHOD OnInsert() CLASS dtwJOB
>     //append a new record
>     IF self:oDCbBrowser1:Used
>         self:oDCbBrowser1:Append()
>         self:oDCbBrowser1:CurrentColumn:=1
>         self:oDCbBrowser1:Edit()
>         self:oDCbBrowser1:Recalculate()
>         self:oDCbBrowser1:Refresh()
>     ENDIF
>     RETURN nil
> Then the date and cusomer field are entered in the callback method as
> follows:
>     Method RecordAppend(oEvent) class dtwJob
>        Local dDate as date
>        dDate := Today()
>
> oEvent:Server:SuspendNotification()
>         // evaluate append mode
>         if oEvent:Mode=BRA_APPENDED
>                 // cCustomer := cFName
>                 // initialize new record
>                 oEvent:Server:FIELDPUT(#CUSTOMER, cFName)
>                 oEvent:Server:FIELDPUT(#JDATE,dDate)
>                 oEvent:Server:Commit()
>         endif
>         oEvent:Server:ResetNotification()
>         oEvent:Server:Notify( NOTIFYRECORDCHANGE )
>     return .T.
> This al works fine. Now I want the append operation to finish with the
> date field open for editing and be able to enter data into the other
> fields and to save the data. Now I can edit the fields but not save.
> Any advice would be appreciated.
> Thank you

From: Geoff Schaller on
<g>

I have solved many a problem by building the angry sample ready to send
to Robert, only to find the fault in my code because the sample works.
Then if it doesn't, the sample is ready!

Geoff



"Grant" <grantd(a)dunsmoreinfo.com> wrote in message
news:4fc52b2b-7552-4072-ba85-9d45c6dc9517(a)v34g2000prm.googlegroups.com:

> Thank you for your comments Geoff and Mathias. I am now top posting. I
> apologize for not responding sooner but I am doing as you said Geoff
> and have created a sample app which is working fine as far as I have
> gotten. I will post again if I run into trouble but now I'm learning a
> lot and appreciate your help.
>
>
> On Mar 10, 11:05 am, Grant <gra...(a)dunsmoreinfo.com> wrote:
>
> > Hello all. I am appending a record to a browser and want the first
> > field of the new record to be an editable date field. It appends and
> > opens in edit mode but I can't save it or any other fields until I
> > move the cursor to a differnet record and then back. Does this make
> > sense? Once the cursor has moved up and down a record the new record
> > can be saved. It looks like I haven't been able to set the edit mode
> > after the append properly. The following is some of the code I am
> > trying to use.
> > The postinit sets the browser to edit mode
> > "self:oDCbBrowser1:Editable := true" and the new record is appended as
> > follows:
> > METHOD OnInsert() CLASS dtwJOB
> > //append a new record
> > IF self:oDCbBrowser1:Used
> > self:oDCbBrowser1:Append()
> > self:oDCbBrowser1:CurrentColumn:=1
> > self:oDCbBrowser1:Edit()
> > self:oDCbBrowser1:Recalculate()
> > self:oDCbBrowser1:Refresh()
> > ENDIF
> > RETURN nil
> > Then the date and cusomer field are entered in the callback method as
> > follows:
> > Method RecordAppend(oEvent) class dtwJob
> > Local dDate as date
> > dDate := Today()
> >
> > oEvent:Server:SuspendNotification()
> > // evaluate append mode
> > if oEvent:Mode=BRA_APPENDED
> > // cCustomer := cFName
> > // initialize new record
> > oEvent:Server:FIELDPUT(#CUSTOMER, cFName)
> > oEvent:Server:FIELDPUT(#JDATE,dDate)
> > oEvent:Server:Commit()
> > endif
> > oEvent:Server:ResetNotification()
> > oEvent:Server:Notify( NOTIFYRECORDCHANGE )
> > return .T.
> > This al works fine. Now I want the append operation to finish with the
> > date field open for editing and be able to enter data into the other
> > fields and to save the data. Now I can edit the fields but not save.
> > Any advice would be appreciated.
> > Thank you

From: Ginny Caughey on
Hi Geoff,

Me too. ;-)

--

Ginny Caughey
www.wasteworks.com




"Geoff Schaller" <geoffx(a)softxwareobjectives.com.au> wrote in message
news:vRSnn.13386$pv.7239(a)news-server.bigpond.net.au...
> <g>
>
> I have solved many a problem by building the angry sample ready to send to
> Robert, only to find the fault in my code because the sample works. Then
> if it doesn't, the sample is ready!
>
> Geoff
>
>
>
> "Grant" <grantd(a)dunsmoreinfo.com> wrote in message
> news:4fc52b2b-7552-4072-ba85-9d45c6dc9517(a)v34g2000prm.googlegroups.com:
>
>> Thank you for your comments Geoff and Mathias. I am now top posting. I
>> apologize for not responding sooner but I am doing as you said Geoff
>> and have created a sample app which is working fine as far as I have
>> gotten. I will post again if I run into trouble but now I'm learning a
>> lot and appreciate your help.
>>
>>
>> On Mar 10, 11:05 am, Grant <gra...(a)dunsmoreinfo.com> wrote:
>>
>> > Hello all. I am appending a record to a browser and want the first
>> > field of the new record to be an editable date field. It appends and
>> > opens in edit mode but I can't save it or any other fields until I
>> > move the cursor to a differnet record and then back. Does this make
>> > sense? Once the cursor has moved up and down a record the new record
>> > can be saved. It looks like I haven't been able to set the edit mode
>> > after the append properly. The following is some of the code I am
>> > trying to use.
>> > The postinit sets the browser to edit mode
>> > "self:oDCbBrowser1:Editable := true" and the new record is appended as
>> > follows:
>> > METHOD OnInsert() CLASS dtwJOB
>> > //append a new record
>> > IF self:oDCbBrowser1:Used
>> > self:oDCbBrowser1:Append()
>> > self:oDCbBrowser1:CurrentColumn:=1
>> > self:oDCbBrowser1:Edit()
>> > self:oDCbBrowser1:Recalculate()
>> > self:oDCbBrowser1:Refresh()
>> > ENDIF
>> > RETURN nil
>> > Then the date and cusomer field are entered in the callback method as
>> > follows:
>> > Method RecordAppend(oEvent) class dtwJob
>> > Local dDate as date
>> > dDate := Today()
>> >
>> > oEvent:Server:SuspendNotification()
>> > // evaluate append mode
>> > if oEvent:Mode=BRA_APPENDED
>> > // cCustomer := cFName
>> > // initialize new record
>> > oEvent:Server:FIELDPUT(#CUSTOMER, cFName)
>> > oEvent:Server:FIELDPUT(#JDATE,dDate)
>> > oEvent:Server:Commit()
>> > endif
>> > oEvent:Server:ResetNotification()
>> > oEvent:Server:Notify( NOTIFYRECORDCHANGE )
>> > return .T.
>> > This al works fine. Now I want the append operation to finish with the
>> > date field open for editing and be able to enter data into the other
>> > fields and to save the data. Now I can edit the fields but not save.
>> > Any advice would be appreciated.
>> > Thank you
>
From: Willie Moore on
Me three

"Ginny Caughey" <ginny.caughey.online(a)wasteworks.com> wrote in message
news:4b9fffa5$0$19037$c3e8da3(a)news.astraweb.com:

> Hi Geoff,
>
> Me too. ;-)
>
> --
>
> Ginny Caughey
> www.wasteworks.com
>
>
>
>
> "Geoff Schaller" <geoffx(a)softxwareobjectives.com.au> wrote in message
> news:vRSnn.13386$pv.7239(a)news-server.bigpond.net.au...
>
> > <g>
> >
> > I have solved many a problem by building the angry sample ready to send to
> > Robert, only to find the fault in my code because the sample works. Then
> > if it doesn't, the sample is ready!
> >
> > Geoff
> >
> >
> >
> > "Grant" <grantd(a)dunsmoreinfo.com> wrote in message
> > news:4fc52b2b-7552-4072-ba85-9d45c6dc9517(a)v34g2000prm.googlegroups.com:
> >
>
> >> Thank you for your comments Geoff and Mathias. I am now top posting. I
> >> apologize for not responding sooner but I am doing as you said Geoff
> >> and have created a sample app which is working fine as far as I have
> >> gotten. I will post again if I run into trouble but now I'm learning a
> >> lot and appreciate your help.
> >>
> >>
> >> On Mar 10, 11:05 am, Grant <gra...(a)dunsmoreinfo.com> wrote:
> >>
>
> >> > Hello all. I am appending a record to a browser and want the first
> >> > field of the new record to be an editable date field. It appends and
> >> > opens in edit mode but I can't save it or any other fields until I
> >> > move the cursor to a differnet record and then back. Does this make
> >> > sense? Once the cursor has moved up and down a record the new record
> >> > can be saved. It looks like I haven't been able to set the edit mode
> >> > after the append properly. The following is some of the code I am
> >> > trying to use.
> >> > The postinit sets the browser to edit mode
> >> > "self:oDCbBrowser1:Editable := true" and the new record is appended as
> >> > follows:
> >> > METHOD OnInsert() CLASS dtwJOB
> >> > //append a new record
> >> > IF self:oDCbBrowser1:Used
> >> > self:oDCbBrowser1:Append()
> >> > self:oDCbBrowser1:CurrentColumn:=1
> >> > self:oDCbBrowser1:Edit()
> >> > self:oDCbBrowser1:Recalculate()
> >> > self:oDCbBrowser1:Refresh()
> >> > ENDIF
> >> > RETURN nil
> >> > Then the date and cusomer field are entered in the callback method as
> >> > follows:
> >> > Method RecordAppend(oEvent) class dtwJob
> >> > Local dDate as date
> >> > dDate := Today()
> >> >
> >> > oEvent:Server:SuspendNotification()
> >> > // evaluate append mode
> >> > if oEvent:Mode=BRA_APPENDED
> >> > // cCustomer := cFName
> >> > // initialize new record
> >> > oEvent:Server:FIELDPUT(#CUSTOMER, cFName)
> >> > oEvent:Server:FIELDPUT(#JDATE,dDate)
> >> > oEvent:Server:Commit()
> >> > endif
> >> > oEvent:Server:ResetNotification()
> >> > oEvent:Server:Notify( NOTIFYRECORDCHANGE )
> >> > return .T.
> >> > This al works fine. Now I want the append operation to finish with the
> >> > date field open for editing and be able to enter data into the other
> >> > fields and to save the data. Now I can edit the fields but not save.
> >> > Any advice would be appreciated.
> >> > Thank you
>
> >


__________ Information from ESET NOD32 Antivirus, version of virus
signature database 4950 (20100316) __________

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com


From: Geoff Schaller on
Anyone for an awesome foursome ?

<g>



"Willie Moore" <williem(a)wmconsulting.com> wrote in message
news:hnp2pr$e14$1(a)speranza.aioe.org:

> Me three
>
> "Ginny Caughey" <ginny.caughey.online(a)wasteworks.com> wrote in message
> news:4b9fffa5$0$19037$c3e8da3(a)news.astraweb.com:
>
>
> > Hi Geoff,
> >
> > Me too. ;-)
> >
> > --
> >
> > Ginny Caughey
> > www.wasteworks.com
> >
> >
> >
> >
> > "Geoff Schaller" <geoffx(a)softxwareobjectives.com.au> wrote in message
> > news:vRSnn.13386$pv.7239(a)news-server.bigpond.net.au...
> >
>
> > > <g>
> > >
> > > I have solved many a problem by building the angry sample ready to send to
> > > Robert, only to find the fault in my code because the sample works. Then
> > > if it doesn't, the sample is ready!
> > >
> > > Geoff