| 1234567891011121314151617 |
- fData = TRUE.
- RUN dataAvailable ( INPUT 'SAME' ).
- FIND FIRST tRowObject NO-LOCK.
- FIND {&Tabelle}
- &IF '{&TabWhere}' NE ''
- &THEN {&TabWhere}
- &ELSE OF tRowObject
- &ENDIF
- NO-LOCK NO-ERROR.
- IF AVAILABLE {&Tabelle} THEN cRowid = STRING(ROWID({&Tabelle})).
- ELSE cRowid = ?.
- IF cRowid <> ?
- THEN DYNAMIC-FUNCTION('fetchRowIdent':U, INPUT cRowid, INPUT ? ).
|