Monday, March 30, 2015

Dexterity template for record Get

<RecordForm>.Get procedure

in 'Record ID' 'Record ID';
inout table RecordTable;
optional in integer Op = GET;

release table RecordTable;
clear table RecordTable;
'Record ID'of table RecordTable= 'Record ID';

case Op
in [GET]
get table RecordTableby number 1;
in [CHG]
change table RecordTable by number 1;
end case;

No comments:

Post a Comment

There was an error in this gadget