* details.
*
* You should have received a copy of the GNU Lesser General Public
- * License along with these librararies and programs; if not, write
+ * License along with these libraries and programs; if not, write
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
* Floor, Boston, MA 02110-1301 USA
*/
/* Write data to a field in the current set member
*/
-d_csmwrite(set, field, data TASK_PARM DBN_PARM)
-int set; /* Set constant */
-long field; /* Field constant */
-CONST char FAR *data; /* Data area to contain field contents */
-TASK_DECL
-DBN_DECL /* database number */
+int
+d_csmwrite(
+int set, /* Set constant */
+long field, /* Field constant */
+const char *data, /* Data area to contain field contents */
+int dbn /* database number */
+)
{
-#ifndef NO_TIMESTAMP
- ULONG timestamp;
-#endif
int stat, fld, rec;
- char FAR *recp;
- SET_ENTRY FAR *set_ptr;
- RECORD_ENTRY FAR *rec_ptr;
- FIELD_ENTRY FAR *fld_ptr;
- DB_ADDR FAR *cm_ptr;
+ char *recp;
+ SET_ENTRY *set_ptr;
+ RECORD_ENTRY *rec_ptr;
+ FIELD_ENTRY *fld_ptr;
+ DB_ADDR *cm_ptr;
DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
- if ((nset_check(set, &set, (SET_ENTRY FAR * FAR *)&set_ptr) != S_OKAY) ||
- (nfld_check(field, &rec, &fld, (RECORD_ENTRY FAR * FAR *)&rec_ptr, (FIELD_ENTRY FAR * FAR *)&fld_ptr) != S_OKAY))
+ if ((nset_check(set, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY) ||
+ (nfld_check(field, &rec, &fld, (RECORD_ENTRY * *)&rec_ptr, (FIELD_ENTRY * *)&fld_ptr) != S_OKAY))
RETURN( db_status );
/* compound keys cannot be updated directly */
RETURN( dberr(S_NOCM) );
/* Read current member */
- if ( dio_read( *cm_ptr, (char FAR * FAR *)&recp , PGHOLD) != S_OKAY )
+ if ( dio_read( *cm_ptr, (char * *)&recp , PGHOLD) != S_OKAY )
RETURN( db_status );
/* check out the field */
/* Put data into record */
if ( r_pfld(fld, fld_ptr, recp, data, cm_ptr) != S_OKAY )
RETURN( db_status );
-#ifndef NO_TIMESTAMP
- /* check for timestamp */
- if ( rec_ptr->rt_flags & TIMESTAMPED ) {
- timestamp = dio_pzgetts(rec_ptr->rt_file);
- bytecpy( recp + RECUPTIME, ×tamp, sizeof(LONG));
- }
-#endif
dio_write(*cm_ptr, NULL, PGFREE);
-#ifndef NO_TIMESTAMP
- if (( db_status == S_OKAY ) && ( rec_ptr->rt_flags & TIMESTAMPED ))
- cm_time[set] = timestamp;
-#endif
RETURN( db_status );
}
/* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin csmwrite.c */