I_InsurClmFNOLFactsOriginTP

@AccessControl.authorizationCheck: #CHECK
@VDM.viewType: #COMPOSITE
@ObjectModel.usageType: {
    dataClass: #TRANSACTIONAL,
    sizeCategory: #L,
    serviceQuality: #X
}
@EndUserText.label: 'Origin of Loss Facts Captured'
define view entity I_InsurClmFNOLFactsOriginTP
  as select from I_InsurClmFactCapture
  association to parent I_InsurClmFNOLTP as _Claim on  $projection.InsuranceClaim = _Claim.InsuranceClaim
                                                   and $projection.InsurClaimUUID = _Claim.InsurClaimUUID
{
  key InsuranceClaim,
  key InsuranceContract,
  key InsurClmFactCaptureCategory,
  key InsurFactsSubobject,

  key InsurClmFactCaptureQstn,

  key InsurClmFactCaptureAnswer,
  key cast ( hextobin('00000000000000000000000000000000') as sysuuid_x16 preserving type ) as InsurClaimUUID,
  key cast ( hextobin('00000000000000000000000000000000') as sysuuid_x16 preserving type ) as InsurClmFactsDraftUUID,
      //      InsurClmSubobject,

      _FactCaptureAnswer.InsurClmFactFreeTextAnswerCat                                     as InsurClmFactFreeTextAnswerCat,

      // Introducing ForEdit fields as Key fields cannot be edited.

      @ObjectModel.editableFieldFor: 'InsurClmFactCaptureQstn'
      InsurClmFactCaptureQstn                                                              as InsurClmFactCaptureQstnForEdit,
      @ObjectModel.editableFieldFor: 'InsurClmFactCaptureAnswer'
      InsurClmFactCaptureAnswer                                                            as InsurClmFactCaptureAnswForEdit,
      //      concat(InsurClmFactCaptureQstn, InsurClmFactCaptureAnswer) as InsurClmFactCaptureAnswForEdit,


      InsurClmFactCaptureQstnPos,
      InsurClmFactCaptureQstnSqnc,
      InsurClmFactCaptureSqncVersion,
      InsurClmFactCaptureSqncVariant,

      _FactCaptureQstn.InsurClmFactCaptureQstnCat                                          as InsurClmFactCaptureQstnCat,
      _FactCaptureQstn._FactCaptureQstnText[ Language = $session.system_language ].InsurClmFactCaptureQstnShrtTxt,
      _FactCaptureQstn._FactCaptureQstnText[ Language = $session.system_language ].InsurClmFactCaptureQstnLongTxt,
      _FactCaptureAnswer._FactCaptureAnswerT[ Language = $session.system_language ].InsurClmFactAnswerShortText,
      _FactCaptureAnswer._FactCaptureAnswerT[ Language = $session.system_language ].InsurClmFactAnswerLongText,
      _FactCaptureTxtAnswer. InsurClmFactCaptureTextAnswer,

      // Transient field to hold answer keys for user selected answers for a multiple choice question

      //     InsurClmFactCaptureTextAnswer as InsurClmFactUsrSeldAnswerKeys,

      _FactCaptureTxtAnswer.InsurClmFactCaptureTextAnswer                                  as InsurClmFactUsrSeldAnswerKeys,
      _FactCaptureQstn. InsurClmFactQstnIsMltplChoice,
      _FactCaptureAnswer. InsurClmFactCaptureNextQstn,
      cast('' as xfeld preserving type )                                                   as InsurClmIsHiddenFlag,
      /* Associations */
      //I_InsurClm1stNotifFactCapture

      _FactCaptureAnswer,
      _FactCaptureQstn,


      _Claim
      //  _Claim // Make association public

}

where
      InsurClmFactCaptureCategory = 'KF'
  and InsurFactsSubobject         = 'X'