在表中添加记录(write语句)(LIYA提供)
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><FONT size=3><SPAN lang=EN-US>1 </SPAN><SPAN style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">创建表</SPAN><SPAN lang=EN-US> ZPHIS<SPAN style="mso-spacerun: yes"> </SPAN>price history</SPAN></FONT></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><FONT size=3><SPAN lang=EN-US></SPAN></FONT> </P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><FONT size=3><SPAN lang=EN-US><IMG src="http://p14.freep.cn/p.aspx?u=v20_p14_p_0801151719457536_0.jpg"></SPAN></FONT></P><p>[此帖子已被 nana 在 2008-1-15 17:36:38 编辑过]Re:在表中添加记录(write语句)
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><FONT size=3><SPAN lang=EN-US>2 </SPAN><SPAN style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">在屏幕</SPAN><SPAN lang=EN-US> ITM3</SPAN><SPAN style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">的字段上添加</SPAN><SPAN lang=EN-US>SPE</SPAN><SPAN style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">。<IMG src="http://p14.freep.cn/p.aspx?u=v20_p14_p_0801151729442677_0.jpg"></SPAN></FONT></P>Re:在表中添加记录(write语句)
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><FONT size=3><SPAN lang=EN-US>3 </SPAN><SPAN style="FONT-FAMILY: 宋体; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'">添加代码。(LIYA提供)</SPAN></FONT></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier">Subprog AM_ZPREGPJ(VALEUR)<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p></o:p></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier">Variable Decimal VALEUR<o:p></o:p></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><o:p> </o:p></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><A name=OLE_LINK1><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier">Local Char ZSTR(50)<o:p></o:p></SPAN></A></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier">Local Date ZDTA<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"># Insert the update value into table ZPHIS<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier">#Dbgaff<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier">Local File ZPHIS [ZPH1] Where ITMREF=[M]ITMREF<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><o:p> </o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier">ZSTR=evalue("date$")+"-"+evalue("time$")<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier; mso-ansi-language: ZH-CN">[F:ZPH1]RSQ=ZSTR<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier; mso-ansi-language: ZH-CN"><o:p> </o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier; mso-ansi-language: ZH-CN">[F:ZPH1]ITMREF=[M]ITMREF<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier; mso-ansi-language: ZH-CN">[F:ZPH1]ZGP=VALEUR<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier">[F:ZPH1]CREUSR= GUSER<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier">[F:ZPH1]CREDAT=evalue("date$") <o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><o:p> </o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><SPAN style="mso-spacerun: yes"> </SPAN>Trbegin [ZPH1]<SPAN style="mso-spacerun: yes"> </SPAN>:<SPAN style="mso-spacerun: yes"> </SPAN># Transaction start<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><SPAN style="mso-spacerun: yes"> </SPAN><o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><SPAN style="mso-spacerun: yes"> </SPAN><o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><SPAN style="mso-spacerun: yes"> </SPAN>Write [ZPH1]<SPAN style="mso-spacerun: yes"> </SPAN># Write table<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><SPAN style="mso-spacerun: yes"> </SPAN>If fstat<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><SPAN style="mso-spacerun: yes"> </SPAN><o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><SPAN style="mso-spacerun: yes"> </SPAN>Rollback<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><SPAN style="mso-spacerun: yes"> </SPAN>Else<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><SPAN style="mso-spacerun: yes"> </SPAN>Commit<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; COLOR: blue; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><SPAN style="mso-spacerun: yes"> </SPAN>Endif<o:p></o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt 10pt; TEXT-INDENT: -5pt; TEXT-ALIGN: left; mso-layout-grid-align: none" align=left><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier"><o:p> </o:p></SPAN></SPAN></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><SPAN style="mso-bookmark: OLE_LINK1"><SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: Courier; mso-font-kerning: 0pt; mso-bidi-font-family: Courier">End</SPAN></SPAN></P>Re:在表中添加记录(write语句)(LIYA提供)
nana,你这个图是怎么贴的。Re:在表中添加记录(write语句)(LIYA提供)
<P>论坛暂时不能上传附件和图片等,找个免费上传图片的网站获得图片的地址</P><P>我用的是这个<A target=_blank href="http://www.freep.cn/">http://www.freep.cn/</A> ,也比较方便</P>Re:在表中添加记录(write语句)(LIYA提供)
这个东东不能很明白,可否讲清楚一点Re:在表中添加记录(write语句)(LIYA提供)
<P>哪里不明白呢.</P><P>这只是个简单的例子,对产品ITM3屏幕的字段ZPREGPJ添加SPE,利用WRITE语句将记录添加到表ZPHIS中,可以在表维护中进行验证.</P>Re:在表中添加记录(write语句)(LIYA提供)
有没有这方面的详资料,我不是很理解它的作用,谢谢Re:在表中添加记录(write语句)(LIYA提供)
呵呵,不错,Liya还是把历史价格记录给研究出来了,好好学习一下。收藏Re:在表中添加记录(write语句)(LIYA提供)
good, i cant view picture页:
[1]