Class: csyserrdialog in ..\lib\vfxform.vcx
Baseclass: form

Properties Methods Dataenvironment Objects

Properties

Name	Initial value
DoCreate	.T.

Dataenvironment

Class: dataenvironment
Baseclass: dataenvironment

Properties Methods Objects

Properties

Name	Initial value
InitialSelectedAlias	"vfxlog"

Objects

Baseclass	Class	Object name
cursor	cursor	Dataenvironment.Cursor1

Dataenvironment.Cursor1

Class: cursor
Baseclass: cursor
Properties Methods Objects

Properties

Name	Initial value
Alias	"vfxlog"
CursorSource	..\data\vfxlog.dbf
Order	"object"

Objects

Baseclass	Class	Object name
zzz	zzz	frmVFXErr.CNTSPEEDBAR
		frmVFXErr.lblMsgEmpty
		frmVFXErr.pgfPageFrame

frmVFXErr.CNTSPEEDBAR

Class: zzz
Baseclass: zzz
Properties Methods Objects

Objects

Baseclass	Class	Object name
zzz	zzz	frmVFXErr.CNTSPEEDBAR.cmdBottom
		frmVFXErr.CNTSPEEDBAR.cmdEdit
		frmVFXErr.CNTSPEEDBAR.cmdExit
		frmVFXErr.CNTSPEEDBAR.cmdNew
		frmVFXErr.CNTSPEEDBAR.cmdNext
		frmVFXErr.CNTSPEEDBAR.cmdPrev
		frmVFXErr.CNTSPEEDBAR.cmdSave
		frmVFXErr.CNTSPEEDBAR.cmdSearch
		frmVFXErr.CNTSPEEDBAR.cmdTop
		frmVFXErr.CNTSPEEDBAR.cmdUndo
		frmVFXErr.CNTSPEEDBAR.cmddelete
		frmVFXErr.CNTSPEEDBAR.cmdpreview
		frmVFXErr.CNTSPEEDBAR.cmdprint
		frmVFXErr.CNTSPEEDBAR.cmdrecordcopy
		frmVFXErr.CNTSPEEDBAR.oBorder

frmVFXErr.CNTSPEEDBAR.cmdBottom

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdEdit

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdExit

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdNew

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdNext

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdPrev

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdSave

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdSearch

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdTop

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdUndo

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmddelete

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdpreview

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdprint

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.cmdrecordcopy

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.CNTSPEEDBAR.oBorder

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.lblMsgEmpty

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.pgfPageFrame

Class: zzz
Baseclass: zzz
Properties Methods Objects

Properties

Name	Initial value
ErasePage	.T.

Objects

Baseclass	Class	Object name
zzz	zzz	frmVFXErr.pgfPageFrame.Page1
		frmVFXErr.pgfPageFrame.Page2

frmVFXErr.pgfPageFrame.Page1

Class: zzz
Baseclass: zzz
Properties Methods Objects

Objects

Baseclass	Class	Object name
zzz	zzz	frmVFXErr.pgfPageFrame.Page1.cmdDelAll
		frmVFXErr.pgfPageFrame.Page1.edtMessage
		frmVFXErr.pgfPageFrame.Page1.lblDate
		frmVFXErr.pgfPageFrame.Page1.lblError
		frmVFXErr.pgfPageFrame.Page1.lblTime
		frmVFXErr.pgfPageFrame.Page1.lblType
		frmVFXErr.pgfPageFrame.Page1.lblUser
		frmVFXErr.pgfPageFrame.Page1.txtdate
		frmVFXErr.pgfPageFrame.Page1.txterror
		frmVFXErr.pgfPageFrame.Page1.txttime
		frmVFXErr.pgfPageFrame.Page1.txttype
		frmVFXErr.pgfPageFrame.Page1.txtuser

frmVFXErr.pgfPageFrame.Page1.cmdDelAll

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.pgfPageFrame.Page1.edtMessage

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.pgfPageFrame.Page1.lblDate

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.pgfPageFrame.Page1.lblError

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.pgfPageFrame.Page1.lblTime

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.pgfPageFrame.Page1.lblType

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.pgfPageFrame.Page1.lblUser

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.pgfPageFrame.Page1.txtdate

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.pgfPageFrame.Page1.txterror

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.pgfPageFrame.Page1.txttime

Class: zzz
Baseclass: zzz
Properties Methods Objects

frmVFXErr.pgfPageFrame.Page1.txttype

Class: zzz
Baseclass: zzz
Properties Methods Objects

Properties

Name	Initial value
InputMask	""

frmVFXErr.pgfPageFrame.Page1.txtuser

Class: zzz
Baseclass: zzz
Properties Methods Objects

Properties

Name	Initial value
InputMask	""

frmVFXErr.pgfPageFrame.Page2

Class: zzz
Baseclass: zzz
Properties Methods Objects

Objects

Baseclass	Class	Object name
zzz	zzz	frmVFXErr.pgfPageFrame.Page2.grdGrid

frmVFXErr.pgfPageFrame.Page2.grdGrid

Class: zzz
Baseclass: zzz
Properties Methods Objects

Properties

Name	Initial value
ColumnCount	5
Panel	1
ReadOnly	.T.
RecordSource	"VFXLOG"

Objects

Baseclass	Class	Object name
zzz	zzz	frmVFXErr.pgfPageFrame.Page2.grdGrid.Column1
		frmVFXErr.pgfPageFrame.Page2.grdGrid.Column2
		frmVFXErr.pgfPageFrame.Page2.grdGrid.Column3
		frmVFXErr.pgfPageFrame.Page2.grdGrid.Column4
		frmVFXErr.pgfPageFrame.Page2.grdGrid.Column5

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column1

Class: zzz
Baseclass: zzz
Properties Methods Objects

Properties

Name	Initial value
ControlSource	"vfxlog.error"
FontBold	.F.
FontName	"Arial"
FontSize	8
ReadOnly	.T.
Sparse	.F.

Objects

Baseclass	Class	Object name
header	header	frmVFXErr.pgfPageFrame.Page2.grdGrid.Column1.Header1
textbox	textbox	frmVFXErr.pgfPageFrame.Page2.grdGrid.Column1.Text1

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column1.Header1

Class: header
Baseclass: header
Properties Methods Objects

Properties

Name	Initial value
Caption	"Error"
FontBold	.F.
FontName	"Arial"
FontSize	8

Methods

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column1.Header1.DblClick
this.Parent.Parent.OnSetOrder(this.Parent)

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column1.Text1

Class: textbox
Baseclass: textbox
Properties Methods Objects

Properties

Name	Initial value
BorderStyle	0
ColorSource	3
Comment	"vfxlog.error"
FontBold	.F.
FontName	"Arial"
FontSize	8
ForeColor	0,0,0
InputMask	"9999"
Margin	0

Methods

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column1.Text1.DblClick
IF !thisForm.lEmpty
      IF !(TYPE("this.ControlSource") $ "MG")
        this.Parent.Parent.OnKeyEnter()
          NODEFAULT
      ENDIF
ENDIF
frmVFXErr.pgfPageFrame.Page2.grdGrid.Column1.Text1.KeyPress
LPARAMETERS nKeyCode, nShiftAltCtrl

this.Parent.Parent.oControl = this

IF this.Parent.Parent.OnKeyPress( nKeyCode, nShiftAltCtrl)
NODEFAULT
ENDIF

this.Parent.Parent.oControl = .NULL.

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column2

Class: zzz
Baseclass: zzz
Properties Methods Objects

Properties

Name	Initial value
ControlSource	"vfxlog.user"
FontBold	.F.
FontName	"Arial"
FontSize	8
ReadOnly	.T.

Objects

Baseclass	Class	Object name
header	header	frmVFXErr.pgfPageFrame.Page2.grdGrid.Column2.Header1
textbox	textbox	frmVFXErr.pgfPageFrame.Page2.grdGrid.Column2.Text1

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column2.Header1

Class: header
Baseclass: header
Properties Methods Objects

Properties

Name	Initial value
Caption	"User"
FontBold	.F.
FontName	"Arial"
FontSize	8

Methods

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column2.Header1.DblClick
this.Parent.Parent.OnSetOrder(this.Parent)

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column2.Text1

Class: textbox
Baseclass: textbox
Properties Methods Objects

Properties

Name	Initial value
BorderStyle	0
ColorSource	3
Comment	"vfxlog.user"
FontBold	.F.
FontName	"Arial"
FontSize	8
ForeColor	0,0,0
Margin	0

Methods

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column2.Text1.DblClick
IF !thisForm.lEmpty
      IF !(TYPE("this.ControlSource") $ "MG")
        this.Parent.Parent.OnKeyEnter()
          NODEFAULT
      ENDIF
ENDIF
frmVFXErr.pgfPageFrame.Page2.grdGrid.Column2.Text1.KeyPress
LPARAMETERS nKeyCode, nShiftAltCtrl

this.Parent.Parent.oControl = this

IF this.Parent.Parent.OnKeyPress( nKeyCode, nShiftAltCtrl)
NODEFAULT
ENDIF

this.Parent.Parent.oControl = .NULL.

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column3

Class: zzz
Baseclass: zzz
Properties Methods Objects

Properties

Name	Initial value
ControlSource	"vfxlog.date"
FontBold	.F.
FontName	"Arial"
FontSize	8
ReadOnly	.T.

Objects

Baseclass	Class	Object name
header	header	frmVFXErr.pgfPageFrame.Page2.grdGrid.Column3.Header1
textbox	textbox	frmVFXErr.pgfPageFrame.Page2.grdGrid.Column3.Text1

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column3.Header1

Class: header
Baseclass: header
Properties Methods Objects

Properties

Name	Initial value
Caption	"Date"
FontBold	.F.
FontName	"Arial"
FontSize	8

Methods

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column3.Header1.DblClick
this.Parent.Parent.OnSetOrder(this.Parent)

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column3.Text1

Class: textbox
Baseclass: textbox
Properties Methods Objects

Properties

Name	Initial value
BorderStyle	0
ColorSource	3
Comment	"vfxlog.date"
FontBold	.F.
FontName	"Arial"
FontSize	8
ForeColor	0,0,0
Margin	0

Methods

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column3.Text1.DblClick
IF !thisForm.lEmpty
      IF !(TYPE("this.ControlSource") $ "MG")
        this.Parent.Parent.OnKeyEnter()
          NODEFAULT
      ENDIF
ENDIF
frmVFXErr.pgfPageFrame.Page2.grdGrid.Column3.Text1.KeyPress
LPARAMETERS nKeyCode, nShiftAltCtrl

this.Parent.Parent.oControl = this

IF this.Parent.Parent.OnKeyPress( nKeyCode, nShiftAltCtrl)
NODEFAULT
ENDIF

this.Parent.Parent.oControl = .NULL.

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column4

Class: zzz
Baseclass: zzz
Properties Methods Objects

Properties

Name	Initial value
ControlSource	"vfxlog.time"
FontBold	.F.
FontName	"Arial"
FontSize	8
ReadOnly	.T.

Objects

Baseclass	Class	Object name
header	header	frmVFXErr.pgfPageFrame.Page2.grdGrid.Column4.Header1
textbox	textbox	frmVFXErr.pgfPageFrame.Page2.grdGrid.Column4.Text1

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column4.Header1

Class: header
Baseclass: header
Properties Methods Objects

Properties

Name	Initial value
Caption	"Time"
FontBold	.F.
FontName	"Arial"
FontSize	8

Methods

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column4.Header1.DblClick
this.Parent.Parent.OnSetOrder(this.Parent)

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column4.Text1

Class: textbox
Baseclass: textbox
Properties Methods Objects

Properties

Name	Initial value
BorderStyle	0
ColorSource	3
Comment	"vfxlog.time"
FontBold	.F.
FontName	"Arial"
FontSize	8
ForeColor	0,0,0
Margin	0

Methods

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column4.Text1.DblClick
IF !thisForm.lEmpty
      IF !(TYPE("this.ControlSource") $ "MG")
        this.Parent.Parent.OnKeyEnter()
          NODEFAULT
      ENDIF
ENDIF
frmVFXErr.pgfPageFrame.Page2.grdGrid.Column4.Text1.KeyPress
LPARAMETERS nKeyCode, nShiftAltCtrl

this.Parent.Parent.oControl = this

IF this.Parent.Parent.OnKeyPress( nKeyCode, nShiftAltCtrl)
NODEFAULT
ENDIF

this.Parent.Parent.oControl = .NULL.

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column5

Class: zzz
Baseclass: zzz
Properties Methods Objects

Properties

Name	Initial value
ControlSource	"vfxlog.message"
FontBold	.F.
FontName	"Arial"
FontSize	8
ReadOnly	.T.

Objects

Baseclass	Class	Object name
header	header	frmVFXErr.pgfPageFrame.Page2.grdGrid.Column5.Header1
textbox	textbox	frmVFXErr.pgfPageFrame.Page2.grdGrid.Column5.Text1

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column5.Header1

Class: header
Baseclass: header
Properties Methods Objects

Properties

Name	Initial value
Caption	"Message"
FontBold	.F.
FontName	"Arial"
FontSize	8

frmVFXErr.pgfPageFrame.Page2.grdGrid.Column5.Text1

Class: textbox
Baseclass: textbox
Properties Methods Objects

Properties

Name	Initial value
BorderStyle	0
ColorSource	3
Comment	"vfxlog.message"
FontBold	.F.
FontName	"Arial"
FontSize	8
ForeColor	0,0,0
Margin	0