| module IsobusVT_Templates { |
| |
| import from IsobusMessageTypes all |
| import from IsobusVTMessageTypes all |
| import from IsobusCMMessageTypes all |
| import from IsobusNMMessageTypes all |
| import from Isobus all |
| import from General_Types all |
| import from J1939 all |
| |
| template J1939PDU_with_NAME t_J1939PDU_with_NAME(template J1939_ADDR p_addr, template J1939_NAME p_name, template J1939_messageWithPGN p_pdu) |
| := { |
| addr := p_addr, |
| name := p_name, |
| pdu := p_pdu |
| } |
| |
| template Isobus.J1939_messageWithPGN t_ButtonActivationReq( |
| template e_ButtonActivationReq_KeyAactivationCode p_keyAactivationCode, |
| template ValidObjectID p_objectID, |
| template ValidObjectID p_parentObjectID, |
| template KeyNumberType p_buttonKeyCode) |
| := {pgn := '00E600'O, pdu := {vt2ecu := {buttonActivationReq := { |
| vtfunction := 1, |
| keyAactivationCode := p_keyAactivationCode, |
| objectID := p_objectID, |
| parentObjectID := p_parentObjectID, |
| buttonKeyCode := p_buttonKeyCode |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_ButtonActivationRes ( |
| template e_ButtonActivationRes_KeyAactivationCode p_keyAactivationCode, |
| template ValidObjectID p_objectID, |
| template ValidObjectID p_parentObjectID, |
| template KeyNumberType p_buttonKeyCode |
| ) |
| := {pgn := '00E700'O, pdu := {ecu2vt := {buttonActivationRes := { |
| vtfunction := 1, |
| keyAactivationCode := p_keyAactivationCode, |
| objectID := p_objectID, |
| parentObjectID := p_parentObjectID, |
| buttonKeyCode := p_buttonKeyCode |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_PointingEventReq ( |
| template PositionType p_x_position, |
| template PositionType p_y_position, |
| template e_PointingEvent_touchState p_touchState) |
| := {pgn := '00E600'O, pdu := {vt2ecu := {pointingEventReq := { |
| vtfunction := 2, |
| x_position := p_x_position, |
| y_position := p_y_position, |
| touchState := p_touchState |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_PointingEventRes ( |
| template PositionType p_x_position, |
| template PositionType p_y_position, |
| template e_PointingEvent_touchState p_touchState) |
| := {pgn := '00E700'O, pdu := {ecu2vt := {pointingEventRes := { |
| vtfunction := 2, |
| x_position := p_x_position, |
| y_position := p_y_position, |
| touchState := p_touchState |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_VTSelectInputObjectReq ( |
| template ValidObjectID p_objectID, |
| template e_VTSelectInputObject_selection p_selection, |
| template boolean p_objectIsOpenForDataInput, |
| template boolean p_reserved |
| // p_reserved for v3 or earlier: true , for v4 and later: false |
| ) := {pgn := '00E600'O, pdu := {vt2ecu := {vtSelectInputObjectReq := { |
| vtfunction := 3, |
| objectID := p_objectID, |
| selection := p_selection, |
| bitmask := { |
| objectIsOpenForDataInput := p_objectIsOpenForDataInput, |
| reserved1 := p_reserved, |
| reserved2 := p_reserved, |
| reserved3 := p_reserved, |
| reserved4 := p_reserved, |
| reserved5 := p_reserved, |
| reserved6 := p_reserved, |
| reserved7 := p_reserved} |
| }}}} |
| |
| //template VTSelectInputObjectReq_v3AndPrior t_VTSelectInputObjectReq_v3AndPrior ( |
| // template ValidObjectID p_objectID, |
| // template e_VTSelectInputObject_selection p_selection) := { |
| // vtfunction := 3, |
| // objectID := p_objectID, |
| // selection := p_selection, |
| // reserved5 := 'FF'O, |
| // reserved6 := 'FF'O, |
| // reserved7 := 'FF'O, |
| // reserved8 := 'FF'O |
| //} |
| |
| //template VTSelectInputObjectReq_v4AndLater t_VTSelectInputObjectReq_v4AndLater ( |
| // template ValidObjectID p_objectID, |
| // template e_VTSelectInputObject_selection p_selection, |
| // template VTSelectInputObject_v4AndLater_Bitmask p_bitmask) := { |
| // vtfunction := 3, |
| // objectID := p_objectID, |
| // selection := p_selection, |
| // bitmask := p_bitmask, |
| // reserved6 := 'FF'O, |
| // reserved7 := 'FF'O, |
| // reserved8 := 'FF'O |
| //} |
| |
| template Isobus.J1939_messageWithPGN t_VTSelectInputObjectRes( |
| template ValidObjectID p_objectID, |
| template e_VTSelectInputObject_selection p_selection, |
| template boolean p_objectIsOpenForDataInput, |
| template boolean p_reserved |
| // p_reserved for v3 or earlier: true , for v4 and later: false |
| ) := {pgn := '00E700'O, pdu := {ecu2vt := {vtSelectInputObjectRes := { |
| vtfunction := 3, |
| objectID := p_objectID, |
| selection := p_selection, |
| bitmask := { |
| objectIsOpenForDataInput := p_objectIsOpenForDataInput, |
| reserved1 := p_reserved, |
| reserved2 := p_reserved, |
| reserved3 := p_reserved, |
| reserved4 := p_reserved, |
| reserved5 := p_reserved, |
| reserved6 := p_reserved, |
| reserved7 := p_reserved} |
| }}}} |
| |
| //template VTSelectInputObjectRes_v4AndPrior t_VTSelectInputObjectRes_v4AndPrior( |
| // template ValidObjectID p_objectID, |
| // template e_VTSelectInputObject_selection p_selection) := { |
| // vtfunction := 3, |
| // objectID := p_objectID, |
| // selection := p_selection |
| //} |
| |
| //template VTSelectInputObjectRes_v5AndLater t_VTSelectInputObjectRes_v5AndLater( |
| // template ValidObjectID p_objectID, |
| // template e_VTSelectInputObject_selection p_selection, |
| // template VTSelectInputObject_v4AndLater_Bitmask p_bitmask) := { |
| // vtfunction := 3, |
| // objectID := p_objectID, |
| // selection := p_selection, |
| // bitmask := p_bitmask |
| //} |
| |
| template Isobus.J1939_messageWithPGN t_VTESCReq ( |
| template AnyObjectID p_objectID, |
| template VTESC_ErrorCodes p_errorCodes) |
| := {pgn := '00E600'O, pdu := {vt2ecu := {vtESCReq := { |
| vtfunction := 4, |
| objectID := p_objectID, |
| errorCodes := p_errorCodes |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_VTESCRes ( |
| template AnyObjectID p_objectID) |
| := {pgn := '00E700'O, pdu := {ecu2vt := {vtESCRes := { |
| vtfunction := 4, |
| objectID := p_objectID |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_VTChangeNumericValueReq ( |
| template ValidObjectID p_objectID, |
| template OCT4 p_value) |
| := {pgn := '00E600'O, pdu := {vt2ecu := {vtChangeNumericValueReq := { |
| vtfunction := 5, |
| objectID := p_objectID, |
| reserved4 := 'FF'O, |
| value_ := p_value |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_VTChangeNumericValueRes ( |
| template ValidObjectID p_objectID, |
| template OCT4 p_value) |
| := {pgn := '00E700'O, pdu := {ecu2vt := {vtChangeNumericValueRes := { |
| vtfunction := 5, |
| objectID := p_objectID, |
| reserved4 := 'FF'O, |
| value_ := p_value |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_VTChangeActiveMaskReq ( |
| template ValidObjectID p_activeMaskOrWindowMaskOrKeyGroupObjectID, |
| template VTChangeActiveMasErrorcodes p_errorCodes, |
| template ValidObjectID p_objectIDcontainingError, |
| template ValidObjectID p_parentObjectIDofErrorObjectID) |
| := {pgn := '00E600'O, pdu := {vt2ecu := {vtChangeActiveMaskReq := { |
| vtfunction := 6, |
| activeMaskOrWindowMaskOrKeyGroupObjectID := p_activeMaskOrWindowMaskOrKeyGroupObjectID, |
| errorCodes := p_errorCodes, |
| objectIDcontainingError := p_objectIDcontainingError, |
| parentObjectIDofErrorObjectID := p_parentObjectIDofErrorObjectID |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_VTChangeActiveMaskRes ( |
| template ValidObjectID p_activeMaskObjectID) |
| := {pgn := '00E700'O, pdu := {ecu2vt := {vtChangeActiveMaskRes := { |
| vtfunction := 6, |
| activeMaskObjectID := p_activeMaskObjectID |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_VTChangeSoftKeyMaskReq( |
| template ValidObjectID p_dataOrAlarmMaskObjectID, |
| template ValidObjectID p_softKeyMaskObjectID, |
| template VTChangeSoftKeyMaskErrorCodes p_errorCodes) |
| := {pgn := '00E600'O, pdu := {vt2ecu := {vtChangeSoftKeyMaskReq := { |
| vtfunction := 7, |
| dataOrAlarmMaskObjectID := p_dataOrAlarmMaskObjectID, |
| softKeyMaskObjectID := p_softKeyMaskObjectID, |
| errorCodes := p_errorCodes |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_VTChangeSoftKeyMaskRes( |
| template ValidObjectID p_dataOrAlarmMaskObjectID, |
| template ValidObjectID p_softKeyMaskObjectID) |
| := {pgn := '00E700'O, pdu := {ecu2vt := {vtChangeSoftKeyMaskRes := { |
| vtfunction := 7, |
| dataOrAlarmMaskObjectID := p_dataOrAlarmMaskObjectID, |
| softKeyMaskObjectID := p_softKeyMaskObjectID |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_VTChangeStringValueReq ( |
| template ValidObjectID p_inputStringOrStringVariableObjectID, |
| template INT1 p_numberOfBytes, |
| template octetstring p_enteredStringValue) |
| := {pgn := '00E600'O, pdu := {vt2ecu := {vtChangeStringValueReq := { |
| vtfunction := 8, |
| inputStringOrStringVariableObjectID := p_inputStringOrStringVariableObjectID, |
| numberOfBytes := lengthof(p_enteredStringValue), |
| enteredStringValue := p_enteredStringValue |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_VTChangeStringValueRes ( |
| template ValidObjectID p_inputStringOrStringVariableObjectID) |
| := {pgn := '00E700'O, pdu := {ecu2vt := {vtChangeStringValueRes := { |
| vtfunction := 8, |
| reserved2 := 'FF'O, |
| reserved3 := 'FF'O, |
| inputStringOrStringVariableObjectID := p_inputStringOrStringVariableObjectID |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_ObjectPoolTransferInd( |
| template ObjectPoolRecords p_objectPoolRecords) |
| := {pgn := '00E700'O, |
| pdu := {ecu2vt := {objectPoolTransferInd := { |
| vtfunction := 17, |
| objectPoolRecords := p_objectPoolRecords |
| }}} |
| } |
| |
| template Isobus.J1939_messageWithPGN t_EndOfObjectPoolReq |
| := {pgn := '00E700'O, |
| pdu := {ecu2vt := {endOfObjectPoolReq := { |
| vtfunction := 18 |
| }}} |
| } |
| |
| |
| template Isobus.J1939_messageWithPGN t_EndOfObjectPoolRes ( |
| template EndOfObjectPoolResErrorCodes p_errorCodes, |
| template AnyObjectID p_parentObjectIDoFaultyObject, |
| template AnyObjectID p_objectIDofFaultyObject, |
| template EndOfObjectPoolResObjectPoolErrorCodes p_objectPoolErrorCodes |
| ):= {pgn := '00E600'O, |
| pdu := {vt2ecu := {endOfObjectPoolRes := { |
| vtfunction := 18, |
| errorCodes := p_errorCodes, |
| parentObjectIDoFaultyObject := p_parentObjectIDoFaultyObject, // set to NULL Object ID if there are no |
| objectIDofFaultyObject := p_objectIDofFaultyObject, // set to NULL Object ID if there are no |
| objectPoolErrorCodes := p_objectPoolErrorCodes |
| }}} |
| } |
| |
| template Isobus.J1939_messageWithPGN t_GetMemoryReq( |
| template INT3 p_memoryRequired) |
| := { |
| pgn := '00E700'O, |
| pdu := {ecu2vt := {getMemoryReq := { |
| vtfunction := 192, |
| reserved2 := 'FF'O, |
| memoryRequired := p_memoryRequired |
| } |
| } |
| } |
| } |
| |
| template Isobus.J1939_messageWithPGN t_GetMemoryRes( |
| template e_GetMemoryResVersionNumber p_versionNumber, |
| template e_GetMemoryResStatus p_status) |
| := { |
| pgn := '00E600'O, |
| pdu := {vt2ecu := {getMemoryRes := { |
| vtfunction := 192, |
| versionNumber := p_versionNumber, |
| status := p_status |
| }}}} |
| |
| |
| template Isobus.J1939_messageWithPGN t_GetSupportedWidecharsReq( |
| template e_Codeplane p_codeplane, |
| template OCT2 p_firstWideCharInInquiryRange, |
| template OCT2 p_lastWideCharInInquiryRange) |
| := { |
| pgn := '00E700'O, |
| pdu := {ecu2vt := { getSupportedWidecharsReq := { |
| vtfunction := 193, |
| codeplane := p_codeplane, |
| firstWideCharInInquiryRange := p_firstWideCharInInquiryRange, |
| lastWideCharInInquiryRange := p_lastWideCharInInquiryRange |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_GetSupportedWidecharsRes( |
| template e_Codeplane p_codeplane, |
| template OCT2 p_firstWideCharInInquiryRange, |
| template OCT2 p_lastWideCharInInquiryRange, |
| template INT1 p_numberOfRanges, |
| WideCharRangeArray p_wideCharRangeArray) |
| := { |
| pgn := '00E600'O, |
| pdu := {vt2ecu := {getSupportedWidecharsRes := { |
| vtfunction := 193, |
| codeplane := p_codeplane, |
| firstWideCharInInquiryRange := p_firstWideCharInInquiryRange, |
| lastWideCharInInquiryRange := p_lastWideCharInInquiryRange, |
| numberOfRanges := p_numberOfRanges, |
| wideCharRangeArray := p_wideCharRangeArray |
| }}}} |
| |
| |
| template Isobus.J1939_messageWithPGN t_GetNumberOfSoftKeysReq |
| := { |
| pgn := '00E700'O, |
| pdu := {ecu2vt := {getNumberOfSoftKeysReq := { |
| vtfunction := 194 |
| } |
| } |
| } |
| } |
| |
| template Isobus.J1939_messageWithPGN t_GetNumberOfSoftKeysRes( |
| template OCT1 p_navigationSoftKeys, |
| template OCT1 p_x_dots, |
| template OCT1 p_y_dots, |
| template OCT1 p_numberOfVirtualSoftKeys, |
| template OCT1 p_numberOfPhysicalSoftKeys |
| ) |
| := { |
| pgn := '00E600'O, |
| pdu := {vt2ecu := {getNumberOfSoftKeysRes := { |
| vtfunction := 194, |
| navigationSoftKeys := p_navigationSoftKeys, |
| reserved3 := 'FF'O, |
| reserved4 := 'FF'O, |
| x_dots := p_x_dots, |
| y_dots := p_y_dots, |
| numberOfVirtualSoftKeys := p_numberOfVirtualSoftKeys, |
| numberOfPhysicalSoftKeys := p_numberOfPhysicalSoftKeys |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_GetTextFontDataReq |
| := { |
| pgn := '00E700'O, |
| pdu := {ecu2vt := {getTextFontDataReq := { |
| vtfunction := 195 |
| } |
| } |
| } |
| } |
| |
| template Isobus.J1939_messageWithPGN t_GetTextFontDataRes( |
| template TextFontDataRes_small_font_sizes p_small_font_sizes, |
| template TextFontDataRes_large_font_sizes p_large_font_sizes, |
| template TextFontDataRes_type_attribute p_type_attribute |
| ) |
| := { |
| pgn := '00E600'O, |
| pdu := {vt2ecu := {getTextFontDataRes := { |
| vtfunction := 195, |
| reserved2 := 'FF'O, |
| reserved3 := 'FF'O, |
| reserved4 := 'FF'O, |
| reserved5 := 'FF'O, |
| small_font_sizes := p_small_font_sizes, |
| large_font_sizes := p_large_font_sizes, |
| type_attribute := p_type_attribute |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_GetHardwareReq |
| := { |
| pgn := '00E700'O, |
| pdu := {ecu2vt := {getHardwareReq := { |
| vtfunction := 199 |
| } |
| } |
| } |
| } |
| |
| template Isobus.J1939_messageWithPGN t_GetHardwareRes( |
| template BootTimeType p_bootTimeInSeconds, |
| template e_GetHardwareResGraphicType p_graphicType, |
| template GetHardwareResHardwareType p_hardware, |
| template INT2 p_xPixels, |
| template INT2 p_yPixels |
| ) |
| := { |
| pgn := '00E600'O, |
| pdu := {vt2ecu := {getHardwareRes := { |
| vtfunction := 199, |
| bootTimeInSeconds := p_bootTimeInSeconds, // 255 for information not available |
| graphicType := p_graphicType, |
| hardware := p_hardware, |
| xPixels := p_xPixels, |
| yPixels := p_yPixels |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_StoreVersionReq(VersionLabel7Char p_versionLabel) |
| := { |
| pgn := '00E700'O, |
| pdu := {ecu2vt := {storeVersionReq := { |
| vtfunction := 208, |
| versionLabel := p_versionLabel |
| } |
| } |
| } |
| } |
| |
| template Isobus.J1939_messageWithPGN t_StoreVersionRes( |
| StoreVersionRes_errorCodesType p_errorCodes |
| ) |
| := { |
| pgn := '00E600'O, |
| pdu := {vt2ecu := {storeVersionRes := { |
| vtfunction := 208, |
| reserved2 := 'FF'O, |
| reserved3 := 'FF'O, |
| reserved4 := 'FF'O, |
| reserved5 := 'FF'O, |
| errorCodes := p_errorCodes |
| }}}} |
| |
| |
| template Isobus.J1939_messageWithPGN t_LoadVersionReq(VersionLabel7Char p_versionLabel) |
| := { |
| pgn := '00E700'O, |
| pdu := {ecu2vt := {loadVersionReq := { |
| vtfunction := 209, |
| versionLabel := p_versionLabel |
| } |
| } |
| } |
| } |
| |
| template Isobus.J1939_messageWithPGN t_LoadVersionRes( |
| template LoadVersionRes_errorCodesType p_errorCodes |
| ) |
| := { |
| pgn := '00E600'O, |
| pdu := {vt2ecu := {loadVersionRes := { |
| vtfunction := 209, |
| reserved2 := 'FF'O, |
| reserved3 := 'FF'O, |
| reserved4 := 'FF'O, |
| reserved5 := 'FF'O, |
| errorCodes := p_errorCodes |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_GetVersionsReq |
| := { |
| pgn := '00E700'O, |
| pdu := {ecu2vt := {getVersionsReq := { |
| vtfunction := 223 |
| } |
| } |
| } |
| } |
| |
| template Isobus.J1939_messageWithPGN t_GetVersionsRes( |
| template INT1 p_numberOfVersionStrings, |
| template VersionLabel7Chars p_versionStrings |
| ) |
| := { |
| pgn := '00E600'O, |
| pdu := {vt2ecu := {getVersionsRes := { |
| vtfunction := 224, |
| numberOfVersionStrings := p_numberOfVersionStrings, |
| versionStrings := p_versionStrings |
| }}}} |
| |
| template Isobus.J1939_messageWithPGN t_VTStatusInd( |
| template OCT1 p_sourceAddressOfActiveWorkingSetMaster, |
| template OCT2 p_objectIDOfTheVisibleDataAlarmMaskOfTheActiveWorkingSet, |
| template OCT2 p_objectIDOfTheVisibleSoftKeyMaskOfTheActiveWorkingSet, |
| template e_BusyCodes p_vtBusyCodes, |
| template OCT1 p_vtFunctionCode) := {pgn := '00E600'O, |
| pdu := {vt2ecu := {vtStatusInd := { |
| vtfunction := 254, |
| sourceAddressOfActiveWorkingSetMaster := p_sourceAddressOfActiveWorkingSetMaster, |
| objectIDOfTheVisibleDataAlarmMaskOfTheActiveWorkingSet := p_objectIDOfTheVisibleDataAlarmMaskOfTheActiveWorkingSet, |
| objectIDOfTheVisibleSoftKeyMaskOfTheActiveWorkingSet := p_objectIDOfTheVisibleSoftKeyMaskOfTheActiveWorkingSet, |
| vtBusyCodes := p_vtBusyCodes, |
| vtFunctionCode := p_vtFunctionCode |
| }}} |
| } |
| |
| template Isobus.J1939_messageWithPGN t_WorkingSetMaintenanceInd( |
| template boolean p_initiatingWorkingSetMaintenance, |
| template e_WorkingSetMaintenanceVersionNumber p_versionNumber) := { |
| pgn := '00E700'O, |
| pdu := { |
| ecu2vt := {workingSetMaintenanceInd := { |
| vtfunction := 255, |
| bitMask := { initiatingWorkingSetMaintenance := p_initiatingWorkingSetMaintenance, reserved1 := false, reserved2 := false, reserved3 := false, reserved4 := false, reserved5 := false, reserved6 := false, reserved7 := false }, |
| versionNumber := p_versionNumber |
| }}} |
| } |
| |
| } |
| |