1:當(dāng)我們想在程序頭輸出后處理時(shí)的時(shí)間,可以這樣做,新建宏程序TIME,內(nèi)部寫到
srs sr1,"("
adds sr3,sr1
lvs sr1, 1004
adds sr3, sr1
lvi ir3,date_year ; 引入整型數(shù)內(nèi)部變量:"date_year"<“年份”的變量>
srs sr1,"%ld" ; 定義輸出格式類型
call ltos ; 格式轉(zhuǎn)換
adds sr3,sr2
srs sr1,"/"
adds sr3,sr1
lvi ir3,date_month ; 引入整型數(shù)內(nèi)部變量:"date_month"<“月份”的變量>
srs sr1,"%02ld"
call ltos
adds sr3,sr2
srs sr1,"/"
adds sr3,sr1
lvi ir3,date_day ; 引入整型數(shù)內(nèi)部變量:"date_day "<“日”的變量>
srs sr1,"%02ld"
call ltos
adds sr3,sr2
srs sr1," < "
adds sr3,sr1
lvi ir3,time_hour ; 引入整型數(shù)內(nèi)部變量:"time_hour"<“小時(shí)”的變量>
srs sr1,"%02ld"
call ltos
adds sr3,sr2
srs sr1,":"
adds sr3,sr1
lvi ir3,time_minute ; 引入整型數(shù)內(nèi)部變量:"time_minute"<“分鐘”的變量>
srs sr1,"%02ld"
call ltos
adds sr3,sr2
lvs sr2, b_eol
adds sr3, sr2
sri ir3, 1
svi f_block_content, ir3
2,將本程序在想要輸出的地方調(diào)用即可
承擔(dān)因您的行為而導(dǎo)致的法律責(zé)任,
本站有權(quán)保留或刪除有爭(zhēng)議評(píng)論。
參與本評(píng)論即表明您已經(jīng)閱讀并接受
上述條款。