Application Development Blog Posts
Learn and share on deeper, cross technology development topics such as integration and connectivity, automation, cloud extensibility, developing at scale, and security.
cancel
Showing results for 
Search instead for 
Did you mean: 
Former Member

hi friends,

In SAP , we are not having the text for currency decimal denomination text(Words).

Step1: Go to Se11 T-code

Step2: Copy the table TCURT into ZTCURT.

Step3: just one field DTEXT , data type Char length 15 in predefined type , Short description Decimal denomination Text.

MANDTMANDTCLNT30Client
SPRASSPRASLANG10Language Key
WAERSWAERS_CURCCUKY50Currency Key
LTEXTLTEXTCHAR400Long Text
KTEXTKTEXT_CURTCHAR150Short text
DTEXTCHAR150Decimal Short Text

Step4: Activate the table create , the table maintenance generator.

Step5: create one Zprogram, in Se38.

Step6: copy these these details in excel file.

Rupee
SPRASWAERSLTEXTKTEXT DTEXT
ENADPAndoran pesetaPesetaCentimo
ENAEDUnited Arab Emirates DirhamDirhamFils
ENAFAAfghani (Old)AfghaniPul
ENAFNAfghaniAfghaniPul
ENALLAlbanian LekLekQindarka
ENAMDArmenian DramDramLuma
ENANGWest Indian GuilderW.Ind.GuilderCent
ENAOAAngolanische KwanzaKwansaCent
ENAONAngolan New Kwanza (Old)New KwanzaCent
ENAORAngolan Kwanza Reajustado (Old)Kwanza Reajust.Cent
ENARSArgentine PesoArg. PesoCentavo
ENATSAustrian SchillingShillingCent
ENAUDAustralian DollarAustr. DollarCent
ENAWGAruban GuilderAruban GuilderCent
ENAZMAzerbaijan ManatManatGopiks
ENBAMBosnia and Herzegovina Convertible MarkConvert. MarkFening
ENBBDBarbados DollarDollarCent
ENBDTBangladesh TakaTakaPaisa
ENBEFBelgian FrancBelgian FrancCentime
ENBGNBulgarian LevLevStotinka
ENBHDBahrain DinarDinarFils
ENBIFBurundi FrancBurundi FrancCentime
ENBMDBermudan DollarBermudan DollarCent
ENBNDBrunei DollarDollarCent
ENBOBBolivianoBolivianoCentavo
ENBRLBrazilian RealRealCentavo
ENBSDBahaman DollarDollarCent
ENBTNBhutan NgultrumNgultrumChetrum
ENBWPBotswana PulaPulaChetrum
ENBYBBelorussian Ruble (Old)Beloruss.RubleKapyeyka
ENBYRBelorussian RubleRubleKapyeyka
ENBZDBelize DollarDollarCent
ENCADCanadian DollarCanadian DollarCent
ENCDFCongolese Franctest dataCentime
ENCFPFrench Franc (Pacific Islands)Fr. Frank (Pac)Rappen
ENCHFSwiss FrancSwiss FrancRappen
ENCLPChilean PesoPesoCentavo
ENCNYChinesische Yuan (international)YuanFen
ENCOPColombian PesoPesoCentavo
ENCRCCosta Rica ColonCost.Rica ColonCentimo
ENCSDSerbian DinarSerbian DinarPara
ENCUPCuban PesoCuban PesoCentavo
ENCVECape Verde EscudoEscudoCentavo
ENCYPCyprus PoundCyprus PoundPenny
ENCZKCzech KronaKronaHaler
ENDEMGerman MarkGerman Markpfennigs
ENDEM3(Internal) German Mark (3 dec.places)(Int.) DEM 3 DPpfennigs
ENDJFDjibouti FrancDjibouti FrancCentime
ENDKKDanish KroneDanish KroneOre
ENDOPDominican PesoDominican PesoCentavo
ENDZDAlgerian DinarDinarSanteem
ENECSEcuadorian Sucre (  > USD)SucreCentavo
ENEEKEstonian KroneKronaSent
ENEGPEgyptian PoundPoundPiastre
ENERNEritrean NafkaNakfaCent
ENESPSpanish PesetaPesetaCentimo
ENETBEthiopian BirrBirrSantim
ENEUREuropean EuroEuroCent
ENFIMFinnish markkaFinnish markkaPenni
ENFJDFiji DollarDollarCent
ENFKPFalkland PoundFalkland PoundPenny
ENFRFFrench FrancFrench FrancCentime
ENGBPBritish PoundPound sterlingPenny
ENGELGeorgian LariLariTetri
ENGHCGhanian CediCediPesewa
ENGIPGibraltar PoundGibraltar PoundPenny
ENGMDGambian DalasiDalasiButut
ENGNFGuinean FrancFrancCentime
ENGRDGreek DrachmaDrachmaLepton
ENGTQGuatemalan QuetzalQuetzalCentavo
ENGWPGuinea PesoGuinea PesoCentavo
ENGYDGuyana DollarGuyana DollarCent
ENHKDHong Kong DollarH.K.DollarCent
ENHNLHonduran LempiraLempiraCentavo
ENHRKCroatian KunaKunaLipa
ENHTGHaitian GourdeGourdeCentime
ENHUFHungarian ForintForintFiller
ENIDRIndonesian RupiahRupiahSen
ENIEPIrish PuntIrish PuntPenny
ENILSIsraeli ScheckelScheckelAgora
ENINRIndian RupeePaise
ENIQDIraqui DinarDinarFils
ENIRRIranian RialRialDinar
ENISKIceland KronaKronaEyrir
ENITLItalian LiraLireCentesimo
ENJMDJamaican DollarJamaican DollarCent
ENJODJordanian DinarJordanian DinarPiastre
ENJPYJapanese YenYenSen
ENKESKenyan ShillingShillingCent
ENKGSKyrgyzstan SomSomTyiyn
ENKHRCambodian RielRielSen
ENKMFComoros FrancComoros FrancCentime
ENKPWNorth Korean WonN. Korean WonChon
ENKRWSouth Korean WonS.Korean WonJeon
ENKWDKuwaiti DinarDinarFils
ENKYDCayman DollarCayman DollarCent
ENKZTKazakstanian TengeTengeTiin
ENLAKLaotian KipKipAtt
ENLBPLebanese PoundLebanese PoundPiastre
ENLKRSri Lankan RupeeSri Lanka RupeeCent
ENLRDLiberian DollarLiberian DollarCent
ENLSLLesotho LotiLotiSente
ENLTLLithuanian LitaLitaCentas
ENLUFLuxembourg FrancLux. FrancCentime
ENLVLLatvian LatLatSantims
ENLYDLibyan DinarLibyan DinarDirham
ENMADMoroccan DirhamDirhamCentime
ENMDLMoldavian LeuLeuBan
ENMGAMadagascan Ariary (New)Madagasc.AriaryCentimes
ENMGFMadagascan Franc (OldMadagascan Fr.Centimes
ENMKDMacedonian DenarMaced. DenarDeni
ENMMKMyanmar KyatKyatPya
ENMNTMongolian TugrikTugrikMongo
ENMOPMacao PatacaPatacaAvo
ENMROMauritanian OuguiyaOuguiyaKhoums
ENMTLMaltese LiraLiraCent
ENMURMauritian RupeeRupeeCent
ENMVRMaldive RufiyaaRufiyaaLaari
ENMWKMalawi KwachaMalawi KwachaTambala
ENMXNMexican PesosPesoCentavo
ENMYRMalaysian RinggitRinggitSen
ENMZMMozambique MeticalMeticalCentavo
ENNADNamibian DollarNamibian DollarCent
ENNGNNigerian NairaNairaKobo
ENNIONicaraguan Cordoba OroCordoba OroCentavo
ENNLGDutch GuilderGuilderCent
ENNOKNorwegian KroneNorwegian KroneOre
ENNPRNepalese RupeeRupeePaise
ENNZDNew Zealand DollarsN.Zeal.DollarsCent
ENNZD5New Zealand DollarsN.Zeal.DollarsCent
ENOMROmani RialOmani RialBaisa
ENPABPanamanian BalboaBalboaCentesimo
ENPENPeruvian New SolNew SolCentimo
ENPGKPapua New Guinea KinaKinaToea
ENPHPPhilippine PesoPesoCentavo
ENPKRPakistani RupeeRupeePaise
ENPLNPolish Zloty (new)ZlotyGrosz
ENPTEPortuguese EscudoEscudoCentavo
ENPYGParaguayan GuaraniGuaraniCentimo
ENQARQatar RialRialDirham
ENRMBChinesische Renminbi (national)Renminbifen
ENROLRomanian LeuLeuBan
ENRUBRussian RubleRubleKopek
ENRWFRwandan FrancFrancCentime
ENSARSaudi RiyalRialHalala
ENSBDSolomon Islands DollarSol.Isl.DollarCent
ENSCRSeychelles RupeeRupeeCent
ENSDDSudanese DinarDinarDirham
ENSDPSudanese PoundPoundPenny
ENSEKSwedish KronaSwedish KronaOre
ENSGDSingapore DollarSing.DollarCent
ENSHPSt.Helena PoundSt.Helena PoundPenny
ENSITSlovenian TolarTolarStotin
ENSKKSlovakian KronaKronaHalier
ENSLLSierra Leone LeoneLeoneCent
ENSOSSomalian ShillingShillingCent
ENSRDSurinam DollarSurinam DoillarCent
ENSRGSurinam Guilder (Old)Surinam GuilderCentimo
ENSTDSao Tome / Principe DobraDobraCentimo
ENSVCEl Salvador ColonColonCentavo
ENSYPSyrian PoundSyrian PoundPiastre
ENSZLSwaziland LilangeniLilangeniCent
ENTHBThailand BahtBahtSatang
ENTJRTajikistani Ruble (Old)RubleDiram
ENTJSTajikistani SomoniSomoniDiram
ENTMMTurkmenistani ManatManatTennesi
ENTNDTunisian DinarDinarMillime
ENTOPTongan Pa'angaPa'angaSeniti
ENTPETimor EscudoTimor EscudoCentavo
ENTRLTurkish Lira (Old)Lira (Old)Kurus
ENTRYTurkish LiraLiraKurus
ENTTDTrinidad and Tobago DollarT.+ T. DollarCent
ENTWDNew Taiwan DollarDollarCent
ENTZSTanzanian ShillingShillingCent
ENUAHUkraine HryvniaHryvniaKopiyka
ENUGXUgandan ShillingShillingCent
ENUSDUnited States DollarUS DollarCent
ENUSDN(Internal) United States Dollar (5 Dec.)US DollarCent
ENUYUUruguayan Peso (new)PesoCentesimo
ENUZSUzbekistan SomTotalTiyin
ENVEBVenezuelan BolivarBolivarCentimo
ENVEFVenezuelan Bolivar HardBolivar HardCentimo
ENVNDVietnamese DongDongHao
ENVUVVanuatu VatuVatu
ENWSTSamoan TalaTalaSene
ENXAFGabon CFA Franc BEACCFA Franc BEACCentime
ENXCDEast Carribean DollarDollarCent
ENXDSSt. Christopher DollarDollarCent
ENXEUEuropean Currency Unit (E.C.U.)E.C.U.Cent
ENXOFBenin CFA Franc BCEAOCFA Franc BCEAOCentime
ENXPFCFP FrancFrancCentime
ENYERYemeni RyalYemeni RyalFils
ENYUMNew Yugoslavian Dinar (Old)New DinarDirham
ENZARSouth African RandRandCent
ENZMKZambian KwachaKwachaNgwee
ENZRNZaire (Old)Zaire
ENZWDZimbabwean DollarZimbabwe DollarCent

Step 7: Copy this program into Zprogram created.

REPORT  ZUPLOAD_ZTCURT.

*----------------------------------------------------------------------*

*              TYPE-POOLS DECLARATION

*----------------------------------------------------------------------*

TYPE-POOLS: TRUXS.

*----------------------------------------------------------------------*

*              TYPES DECLARATION

*----------------------------------------------------------------------*

TYPES: BEGIN OF X_DATA,

        SPRAS TYPE SPRAS,

        WAERS TYPE WAERS_CURC,

        LTEXT TYPE LTEXT,

        KTEXT TYPE KTEXT_CURT,

        DTEXT TYPE KTEXT_CURT,

        END   OF X_DATA.

DATA: IT_DATA TYPE TABLE OF X_DATA,

       IT_RAW  TYPE TRUXS_T_TEXT_DATA,

       WA_DATA TYPE X_DATA,

       IT_ZTCURT TYPE TABLE OF ZTCURT,

       WA_ZTCURT TYPE ZTCURT.

SELECTION-SCREEN BEGIN OF BLOCK A WITH FRAME TITLE TEXT-001.

PARAMETERS : P_FILE TYPE RLGRAP-FILENAME.

SELECTION-SCREEN END OF BLOCK A.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILE.            " F4 Help

   CALL FUNCTION 'F4_FILENAME'

     EXPORTING

       FIELD_NAME = 'P_FILE'

     IMPORTING

       FILE_NAME  = P_FILE.

   IF P_FILE IS NOT INITIAL.

     DATA: GV_PATH   TYPE STRING,

           GV_EXT(4) TYPE C,

           C_SEP_DOT TYPE C VALUE '.'.

     CLEAR: GV_EXT, GV_PATH.

     SPLIT P_FILE AT C_SEP_DOT INTO GV_PATH GV_EXT.

     IF GV_EXT EQ 'xls' OR GV_EXT EQ 'xlsx'.

       CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'

         EXPORTING

           I_LINE_HEADER        = 'X'

           I_TAB_RAW_DATA       = IT_RAW

           I_FILENAME           = P_FILE

         TABLES

           I_TAB_CONVERTED_DATA = IT_DATA

         EXCEPTIONS

           CONVERSION_FAILED    = 1

           OTHERS               = 2.

       IF SY-SUBRC <> 0.

         MESSAGE TEXT-005 TYPE 'E'.

       ENDIF.

     ENDIF.

   ELSE.

     MESSAGE TEXT-012 TYPE 'S' DISPLAY LIKE 'E'.

   ENDIF.

   IF SY-SUBRC EQ 0.

     LOOP AT IT_DATA INTO WA_DATA.

       WA_ZTCURT-SPRAS = WA_DATA-SPRAS.

       WA_ZTCURT-WAERS = WA_DATA-WAERS.

       WA_ZTCURT-LTEXT = WA_DATA-LTEXT.

       WA_ZTCURT-KTEXT = WA_DATA-KTEXT.

       WA_ZTCURT-DTEXT = WA_DATA-DTEXT.

       APPEND WA_ZTCURT TO IT_ZTCURT.

       CLEAR: WA_ZTCURT.

     ENDLOOP.

     INSERT ZTCURT FROM TABLE IT_ZTCURT.

     IF SY-SUBRC EQ 0.

       COMMIT WORK.

     ENDIF.

   ENDIF.

Step8: execute the program , upload the excel file.

Now you can use the ZTCURT Table for currency decimal denomination text.

3 Comments