PROC F_FL_D_PATCH9
;Version 0
GOTO BEGIN
;
;#***********************************************************************
;#      ****PROCEDURE HEADER****
;#
;#  1.0     Introduction
;#
;#          1.1 FOT Name:   F_FL_D_PATCH9
;#              MMS-F Name: -/-
;#              SUM Issue:  -/-
;#
;#          1.2 Date Created: 4-24-96   TL	4-16-96	WB
;#              Revision:  
;#
;#          1.3 Change Description:
;# 
;#
;#          1.4 Point of Contact:
;#			 FOT AUTHOR: T. La Fave, 286-4799
;#              Author: W. Bornemann MPE +49-89-3299-3842
;#              Local contact: A.B. Galvin UMD 301-405-6208
;#
;#***********************************************************************
;#  2.0     Description
;#
;#          2.1 Narrative Description: S/W patch 5.6.9
;#    
;#              DPU SOFTWARE PATCH NUMBER 5.6.9
;#              STOF PHA Distribution
;#
;#              Patch has to be reloaded after dpu switch off
;#              ( not permenantly stored in keep alive memory )
;#
;#          2.2 Intended Use:
;#
;#              Correction to DPU flight software (S/W Version 5.6).
;# 
;#          2.3 Duration: < 15 min.
;#
;#          2.4 References:
;#
;#***********************************************************************
;#  3.0     Instructions for Use:
;#
;#          3.1 Parameters Required: None
;#
;#          3.2 Critical Activities: 
;#
;#              FBDMM and FBDFM commands are CRITICAL Commands.
;#              Correct binary translation requires use of
;#              Project Data Base Version > 9.0  (i.e., after Sept 95)
;#			 
;#
;#          3.3 Special Constraints or Activities:
;#
;#
;#
;# *************************************************************************
;#  4.0     STEPS:

BEGIN:

IF (P@CMD_STATE#TELECOMMAND = "AVAILABLE") THEN
ELSE
      /CLEAR  ;Clearing the Command Buffer.
ENDIF

WAIT			; NOTE value of command OK Counter (FSDTCOK)

;#  4.1   Implement s/w patch 9a, 9b, 9c, 9d
; Patch 5,6,9a

; NEXT COMMAND IS CRITICAL

/FBDMM,DE48,3000,0030,0000,0002,0004,0006,0030,0032,0034,0036,;;
0020,0022,0024,0026,0050,0052,0054,0056,0010,0012,0014,0016,;;
0020,0022,0024,0026,0000
WAIT   		;VERIFY BUFFER CONTENTS
/SEND  

WAIT 		;Note value of command OK Counter (FSDTCOK)
WAIT			;Next command is critical

; Patch 5.6.9b

/FBDMM,DE78,3000,0030,0050,0052,0054,0056,0030,0032,0034,0036,;;
0020,0022,0024,0026,0040,0042,0044,0046,0050,0052,0054,0056,;;
0020,0022,0024,0026,0000
WAIT  		;VERIFY BUFFER CONTENTS
/SEND

;Patch 5.6.9c

WAIT ;Note value of command OK Counter (FSDTCOK)
	;Do not proceed until verification of command
	;counter increment
WAIT	;Next command is critical

/FBDFM,E53A,3000,0002,9090
WAIT  		;VERIFY BUFFER CONTENTS
/SEND

; Patch 5.6.9d

WAIT ;Note value of command OK Counter (FSDTCOK)
	;Do not proceed until verificaiton of command
	;counter increment
WAIT	;Next command is critical

/FBDFM,E599,3000,0002,9090
WAIT  		;VERIFY BUFFER CONTENTS
/SEND

WAIT ;Note value of command OK Counter (FSDTCOK)
;#***********************************************************************
;#   5.0   Final Constraints
;#
;#         If Sensors (CTOF,MTOF,STOF) have changed from an ON to a
;#         Power Off mode, then non-ops heater status may require 
;#         a change.
;#
;#***********************************************************************
ENDPROC