;  AUTHOR:- STEPHEN MENDES                                 FILE "STATUPD.ASM"
;
;   void statupdt (char *,char *, char *)
;
;   PARAMETERS:- FILE BUFFER, DATE, TIME.
;
;  MOVES THE CURRRENT DATE AND TIME TO THE FILE BUFFER AT THE LOCATION
;  ASSIGNED TO THE "LAST OPEN DATE AND TIME" ALSO RESETS THE BINARY WORD
;  AT THE LOCATION ASSIGNED TO "NUMBER OF FAILS SINCE LAST OPEN" TO ZERO
;
		.MODEL SMALL
		.CODE
		PUBLIC	_statupdt
_statupdt	PROC	NEAR
		PUSH	BP
		MOV	BP,SP
		PUSH	ES
		MOV	AX,DS
		MOV	ES,AX
		PUSH	DI
		PUSH	SI
		CLD			;CLEAR DIRECTION FLAG
		MOV	CX,8		;LENGTH OF DATE
		MOV	DI,[BP+4]	;ADDR OF START OF FIL_BUF
		ADD	DI,33		;OFFSET OF LAST OPEN DATE IN FIL_BUF
		MOV	SI,[BP+6]	;CURRENT DATE
		REP MOVSB
		MOV	CX,8		;LENGTH OF TIME
		MOV	DI,[BP+4]	;ADDR OF START OF FIL_BUF
		ADD	DI,41		;OFFSET OF LAST OPEN TIME IN FIL_BUF
		MOV	SI,[BP+8]	;CURRENT TIME
		REP MOVSB
		MOV	BX,[BP+4]	;ADDR OF START OF FIL_BUF
		ADD	BX,51		;OFFSET OF NUMBER OF FAILS COUNT
		MOV	WORD PTR [BX],0		;RESET NUMBER OF FAILS
		POP	SI
		POP	DI
		POP	ES
		POP	BP
		RET
_statupdt	ENDP
		END