* Method RequeryMultiViews
LOCAL lnRetVal
LOCAL ARRAY laParms[1,2]
lnRetVal=0
*----------------------------------------------
*--- Get all parameters for the specified alias
*----------------------------------------------
THIS.GetViewParameters(@laParms, 'lv_Budget_Exception1')
*--- Create view parameters if any are specified ---*
IF NOT EMPTY(laParms)
FOR lnRow = 1 TO ALEN(laParms,1)
STORE laParms[lnRow,2] TO (laParms[lnRow,1])
ENDFOR
ENDIF
lnRetVal=REQUERY('lv_Budget_Exception1')
IF lnRetVal=REQUERY_SUCCESS
lnRetVal=THISFORM.obizobj.REQUERY()
ENDIF
RETURN lnRetVal