|
|
发表于 2018-5-28 22:27:17
|
显示全部楼层
来自: 中国江苏无锡
以下红色字体的信息是你要的吗?+ S& f6 x# Q+ q! j% d# u
pheader$ #Call before start of file
4 l$ W% F% p; X6 z "%", e$
! `: z8 H) r6 F! N) J+ L0 R- X4 d
, }5 @ y! {& K5 \$ @3 g) T( b sav_spc = spaces$ K" f/ C4 G N6 H' p: q% E# q
spaces$ = 07 _& g; a" X; g% c5 x/ b
*progno$, sopen_prn, sprogname$, sclose_prn, e$; N0 x: p% K4 W
#sopen_prn, "PROGRAM NAME - ", sprogname$, sclose_prn, e$0 O) c8 s* y/ ^% |
sopen_prn, "DATE=DD-MM-YY - ", date$, " TIME=HH:MM - ", time$, sclose_prn, e$ #Date and time output Ex. 12-02-05 15:52
% O, q0 b& H, M$ Q4 s9 D #sopen_prn, "DATE - ", month$, "-", day$, "-", year$, sclose_prn, e$ #Date output as month,day,year - Ex. 02-12-05
& C% @/ C2 \$ M- N' P% x- d3 q #sopen_prn, "DATE - ", *smonth, " ", day$, " ", *year2, sclose_prn, e$ #Date output as month,day,year - Ex. Feb. 12 20052 s0 O. k1 d. [' n$ v
#sopen_prn, "TIME - ", time$, sclose_prn, e$ #24 hour time output - Ex. 15:52) H4 W& ^7 D& j7 Z: `' Q0 c
#sopen_prn, "TIME - ", ptime sclose_prn, e$ #12 hour time output 3:52 PM
$ K! p) u$ I6 ]7 }4 \" q8 I spathnc$ = ucase(spathnc$)
. z% a) P$ x" n2 Y3 h* u U# ~ smcname$ = ucase(smcname$)
& c& Y0 f) ]1 { `# a& c4 x ~ stck_matl$ = ucase(stck_matl$)
! a+ V3 Z( b& Y$ ]/ [, U8 A8 C& e snamenc$ = ucase(snamenc$)/ m' s$ H1 L7 h) c7 R$ Z
sopen_prn, "MCX FILE - ", *smcpath$, *smcname$, *smcext$, sclose_prn, e$ |
|