Bonjour,
je suis en train d'étudier une modélisation que je dois améliorer et perfectionner.
or celle-ci est codée dans un langage que je ne connais pas et que je n'arrive pas à identifier.
je vous copie un extrait ci-dessous, pourriez-vous me dire de quel langage il s'agit ?
mille mercis
%<title_RA_Tools type="title" label="Reserve RA Tools Module" backcolor1="Transparent" backcolor2="Control" textcolor="Black" alignment="Center" textsize="20">%
%<descriptivetext_row type="descriptivetext" label="" nblines="1">%
%<title_study_general type="title" label="Study General Information" backcolor1="InactiveCaptionText" backcolor2="CornflowerBlue" textcolor="Black" textsize="12" alignment="Near">%
User.name = %<textbox type="textbox" label="User Name" returnasstring="True" allowempty="False" defaultvalue="%LoginName%">%
entity_name = %<textbox type="textbox" label="Entity Name" returnasstring="True" allowempty="False" defaultvalue="GRM">%
param.date.StudyDate = %<datepicker type="datepicker" label="Study Date" MinimumDate="01/01/2007" DefaultValue="DateTime.Now" ReturnAsString="True" HasVisibilityCondition="False">%
line_of_buisness = %<combobox_DR_init type="combobox" label="LOB" source="None;Motor Dammage;Event;Personal accident (PA);Risk;Motor Third Party Liability (MTPL);General Third Party Liability (GTPL);Marine" returnasstring="True" defaultvalue="None">%
SubLOB = %<textbox_DR_init_2 type="textbox" label="sub-LOB" returnasstring="True" defaultvalue="None">%
Currency.name = %<textbox type="textbox" label="Currency" returnasstring="True" allowempty="False" defaultvalue="EUR">%
%<descriptivetext type="descriptivetext" label="" nblines="1">%
%<title_RA_Tools_Input type="title" label="Input data " backcolor1="InactiveCaptionText" backcolor2="CornflowerBlue" textcolor="Black" textsize="12">%
ImportDataCSV_folderpath=%<getfolder_InputCSV_folderpath type="getfolder" label="Select the folder containing input data" returnasstring="True" defaultvalue="C:\Documents and Settings\j-papadaccistephanop\My Documents\Harp\Projects\Reserve_RA_Tool\input_file_standard">%
##Copy input folder to the Output folder in order to ensure auditability
SavedImportedData_folderpath=paste("%OutputFolder%","USERDATA",sep="/")
dir.create(SavedImportedData_folderpath)
file.copy(paste(ImportDataCSV_folderpath,dir(ImportDataCSV_folderpath,pattern = ".csv"),sep="/"),SavedImportedData_folderpath, overwrite = TRUE)
#recupere First_year
first_year<- %<numericbox_first_year type="numericbox" label="First Year of your study" defaultvalue="1988" max="2050" min="1900">%
#recupere Last_year
last_year<- %<numericbox_last_year type="numericbox" label="Last Year of your study" defaultvalue="2007" min="1900" max="2050">%
#calcul number of years
nb_of_years=last_year-first_year+1
#List all csv file
vect.AvailableFiles=dir(path = SavedImportedData_folderpath,recursive = FALSE, ignore.case = FALSE)
#List of the required Data ##### We could propose a hand mapping if the user want to use different name (d'ailleurs remetrica le fait..)
vect.RequiredFiles=c("cumulative_loss_payment.csv","e_axa_loss_reserves.csv","e_axa_ultimate_loss_amount.csv","triangle_cumulative_incurred.csv","triangle_cumulative_paid.csv","boni_malis.csv")
vect.RequiredFiles.paid=c("cumulative_loss_payment.csv","e_axa_loss_reserves.csv","e_axa_ultimate_loss_amount.csv","triangle_cumulative_paid.csv")
vect.RequiredFiles.incurred=c("cumulative_loss_payment.csv","e_axa_loss_reserves.csv","e_axa_ultimate_loss_amount.csv","triangle_cumulative_incurred.csv")
vect.RequiredFiles.paid.incurred=c("cumulative_loss_payment.csv","e_axa_loss_reserves.csv","e_axa_ultimate_loss_amount.csv","triangle_cumulative_incurred.csv","triangle_cumulative_paid.csv")
vect.RequiredFiles.back.testing="boni_malis.csv"
Partager