project QadFinancials > class BFcTranslation > method ProcessTranslation


Parameters


icComponentinputcharacter


Internal usage


BLF
method BFcTranslation.EndElementInternal


program code (program1/bfctranslation.p)

if not can-find (first tResourceFile where
                       tResourceFile.tiTranslationStringNumber  = viTransNr and
                       tResourceFile.tcTranslationProjShortCode = vcProjectCode and
                       tResourceFile.tcTranslationLanguageCode  = vcLanguageToLoad)
then do:                       
    /* Create the copy-table */               
    create tResourceFile.
    assign tResourceFile.tcTranslationLanguageCode  = vcLanguageToLoad
           tResourceFile.tcTranslationProjShortCode = vcProjectCode
           tResourceFile.tiTranslationStringNumber  = viTransNr
           tResourceFile.tcBusinessClass            = icComponent
           tResourceFile.tcTranslationStringText    = vcTrans.        
end.

viTransNr = 0.