SAP-ABAP-實例第4章-面向對象程序設計

SAP-ABAP-實例第4章-面向對象程序設計打 *CLASScallobjDEFINITION **類的申明：* *CLASScallobjDEFINITION.PUBLICSECTION.CLASS-DATA:para(30)typeCVALUE'thestaticclassparameter!'.DATAcountTYPEI.METHODS:showdata1,showdata2.PROTECTEDSECTION.PRIVATESECTION.METHODS:showdata3.ENDCLASS."callobjDEFINITIONENDCLASS.* *CLASScallobjIMPLEMENTATION **類的實現(xiàn)：* *CLASScallobjIMPLEMENTATION.METHODshowdata1.WRITE:/,'showdata1:Hellosap'.ENDMETHOD. "showdata1METHODshowdata2.count=1.WRITE:/,'showdata2:',count.CALLMETHODshowdata3.ENDMETHOD. "showdata1METHODshowdata3.Write:/,'showdata3:theprivatemethod!'.ENDMETHOD. "showdata3ENDCLASS. "callobjIMPLEMENTATION* *CLASScallobj2DEFINITION **類2的聲明：* *CLASScallobj2DEFINITION.PUBLICSECTION.CLASS-METHODS:call_static_class.ENDCLASS. "callobj2DEFINITION *CLASScallobj2IMPLEMENTATION **類2的實現(xiàn)：* *CLASScallobj2implementation.METHODcall_static_class.WRITE:/,callobj=>para.ENDMETHOD. "call_static_classENDCLASS. "callobj2IMPLEMENTATIONdataobjtypereftocallobj.data:methnametypestring.CREATEOBJECTobj.methname='showdata2'.CALLMETH0D:obj->showdata1."obj—〉（methname）.CALLMETHOD:obj->showdata2.CALLMETHOD:callobj2=>call_static_class.* *CLASSDemoDEFINITION **步驟一：聲明變量：* *CLASSDemoDEFINITION.PUBLICSECTION.Class-METHODs:Display.PROTECTEDSECTION.PRIVATESECTION.ENDCLASS."DemoDEFINITIONENDCLASS. * *CLASSDemoIMPLEMENTATION **步驟二：實現(xiàn)變量：* *CLASSDemoIMPLEMENTATION.METHODDisplay.WRITE:'asdfasdf'.ENDMETHOD."DemoENDCLASS."DemoIMPLEMENTATION"步驟三：開始START-OF-SELECTION."步驟四：聲明對象：Data/