|
|
发表于 2018-5-28 22:27:17
|
显示全部楼层
来自： 中国江苏无锡
以下红色字体的信息是你要的吗？
4 Z: L% \* n3 k8 k) { `( w/ opheader$ #Call before start of file ; J1 G) h% G5 S
"%", e$
+ g, {0 S/ d4 f# y! D ; a0 w- g" N/ y9 m4 y1 @
sav_spc = spaces$& T: d* E9 z# Q. y5 {8 s7 ^
spaces$ = 0: p% u0 C9 l# |+ }
*progno$, sopen_prn, sprogname$, sclose_prn, e$: t+ a9 n& v- r5 s) U# N
#sopen_prn, "PROGRAM NAME - ", sprogname$, sclose_prn, e$
" I- J* c: l& t sopen_prn, "DATE=DD-MM-YY - ", date$, " TIME=HH:MM - ", time$, sclose_prn, e$ #Date and time output Ex. 12-02-05 15:527 Z4 R0 K, m3 b% L
#sopen_prn, "DATE - ", month$, "-", day$, "-", year$, sclose_prn, e$ #Date output as month,day,year - Ex. 02-12-05
9 F. n' p5 A" I" ^) K #sopen_prn, "DATE - ", *smonth, " ", day$, " ", *year2, sclose_prn, e$ #Date output as month,day,year - Ex. Feb. 12 2005 d) h) \9 {% o$ N N( J3 n7 q
#sopen_prn, "TIME - ", time$, sclose_prn, e$ #24 hour time output - Ex. 15:52: m3 G }/ j0 c, z2 e
#sopen_prn, "TIME - ", ptime sclose_prn, e$ #12 hour time output 3:52 PM( n& S( W0 W6 m: |
spathnc$ = ucase(spathnc$)
7 e2 @- H+ q j% @ smcname$ = ucase(smcname$)
+ J$ g9 N) c$ V/ {9 H$ T stck_matl$ = ucase(stck_matl$)
$ M, _% v# l) g" `7 E snamenc$ = ucase(snamenc$)
( R! @: r# O8 z: ^8 d0 v+ J$ z sopen_prn, "MCX FILE - ", *smcpath$, *smcname$, *smcext$, sclose_prn, e$ |
|
楼主