文档库 最新最全的文档下载
当前位置:文档库 › SAP ABAP DMS文档管理开发

SAP ABAP DMS文档管理开发

SAP ABAP DMS文档管理开发
SAP ABAP DMS文档管理开发

SAP ABAP DMS文档开发

1.用到的BAPI:BAPI_DOCUMENT_CREATE2,ZBAPI_DOCUMENT_CHECKOUTVIEW2,

BAPI_DOCUMENT_DELETE_DIRECT

2.其中ZBAPI_DOCUMENT_CHECKOUTVIEW2是从标准的

BAPI_DOCUMENT_CHECKOUTVIEW2改写(标准的在导出文档时,会自定义一个文档名称);改动代码如下:

a)新增函数组ZMM_CVBAPI

b)将LCVBAPITOP的定义对象拷贝到LZMM_CVBAPITOP

c)在LZMM_CVBAPITOP最后添加如下:

INCLUDE lcvbapif01.

INCLUDE lcvbapif02.

INCLUDE lcvbapif03.

INCLUDE lcvbapif04.

INCLUDE lcvbapif05.

INCLUDE lcvbapif06.

INCLUDE lcvbapif07.

d)拷贝函数BAPI_DOCUMENT_CHECKOUTVIEW2到新

ZBAPI_DOCUMENT_CHECKOUTVIEW2,添加IMPORT参ORFILENAME,并修改代码。

3.以下为参考代码:

* 文档类型

CONSTANTS: con_dokar(3) VALUE 'ZQX'.

* 存储类别

CONSTANTS: con_storage_cat(10) VALUE 'DMS_C1_ST'.

FORM frm_creat_file.

DATA: lv_rc TYPE i,

lt_filetable TYPE filetable WITH HEADER LINE.

DATA: lv_filename TYPE filep,

lv_path TYPE filep.

DATA: lv_docnumber TYPE bapi_doc_aux-docnumber.

DATA: ls_documentdata TYPE bapi_doc_draw2,

ls_documentdatax TYPE bapi_doc_drawx2, "bapi_doc_draw 2x,

lt_objectlinks TYPE TABLE OF bapi_doc_drad WITH HEADER LINE,

lt_documentfiles TYPE TABLE OF bapi_doc_files2 WITH HEADER LINE,

ls_return TYPE bapiret2.

DATA: t_tdwp TYPE TABLE OF tdwp WITH HEADER LINE.

DATA: name TYPE draw-filep,

ext(64) TYPE c.

CALL METHOD cl_gui_frontend_services=>file_open_dialog

EXPORTING

window_title = '选择文件'

default_extension = '*'

CHANGING

file_table = lt_filetable[]

rc = lv_rc EXCEPTIONS

file_open_dialog_failed = 1

cntl_error = 2

error_no_gui = 3

not_supported_by_gui = 4

OTHERS = 9.

IF lt_filetable[] IS INITIAL.

EXIT.

ENDIF.

READ TABLE lt_filetable INDEX 1.

*解析路径文件

PERFORM frm_split_path_file USING lt_filetable-filename

CHANGING lv_filename lv_path.

name = lv_filename.

WHILE name CA '.'.

SPLIT name AT '.' INTO ext name.

ENDWHILE.

CONCATENATE '.' name INTO name.

TRANSLATE name TO LOWER CASE.

CALL FUNCTION 'CV120_DOC_GET_APPL'

EXPORTING

pf_file = name

TABLES

ptx_tdwp = t_tdwp.

IF t_tdwp[] IS INITIAL.

MESSAGE s001 WITH '不支持此类型文件'.

ENDIF.

READ TABLE t_tdwp INDEX 1.

ls_documentdata-documenttype = con_dokar.

ls_documentdata-documentversion = '00'.

ls_documentdata-documentpart = '000'.

ls_documentdata-description = '凭证描述'.

ls_documentdata-username = sy-uname.

* ls_documentdata-ecnumber = '123'.

READ TABLE t_tdwp INDEX 1.

lt_documentfiles-documenttype = 'ZQX'.

lt_documentfiles-storagecategory = con_storage_cat.

lt_documentfiles-wsapplication = t_tdwp-dappl.

lt_documentfiles-docpath = lv_path.

lt_documentfiles-docfile = lv_filename.

lt_documentfiles-checkedin = 'X'.

APPEND lt_documentfiles.

CALL FUNCTION 'BAPI_DOCUMENT_CREATE2'

EXPORTING

documentdata = ls_documentdata

IMPORTING

documentnumber = lv_docnumber

return = ls_return

TABLES

objectlinks = lt_objectlinks

documentfiles = lt_documentfiles.

IF ls_return-type = 'E' OR lv_docnumber IS INITIAL.

* MESSAGE e001 WITH '上传文件出错,请联系管理员'.

MESSAGE ID ls_return-id TYPE ls_return-type NUMBER ls_retu rn-number

WITH ls_return-message_v1 ls_return-message_v2 ls_return-message_v3 ls_return-message_v4.

ELSE.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.

MESSAGE s001 WITH '上传成功'.

ENDIF.

wa_file-doc_id = lv_docnumber.

wa_file-dname = lv_filename.

wa_file-yk_planno = wa_xqjh_h-yk_planno.

wa_file-dtype = name.

wa_file-credat = sy-datum.

wa_file-ctime = sy-uzeit.

wa_file-cname = sy-uname.

APPEND wa_file TO it_file.

IF wa_xqjh_h-yk_planno IS NOT INITIAL.

MODIFY ztmm_xqjh_file FROM wa_file.

COMMIT WORK AND WAIT.

ENDIF.

ENDFORM. " FRM_UPLOAD_FILE

*&---------------------------------------------------------------------* *& Form frm_split_path_file

*&---------------------------------------------------------------------* * text拆分路径和文档名

*----------------------------------------------------------------------* * --> p1 text

* <-- p2 text

*----------------------------------------------------------------------* FORM frm_split_path_file USING uv_fullname CHANGING cv_filename cv_pathname.

DATA: lt_match TYPE match_result_tab,

ls_match LIKE LINE OF lt_match.

FIND ALL OCCURRENCES OF '\' IN uv_fullname IN CHARACTER MOD E RESULTS lt_match.

IF NOT lt_match IS INITIAL.

LOOP AT lt_match INTO ls_match.

ENDLOOP.

ADD 1 TO ls_match-offset.

cv_pathname = uv_fullname(ls_match-offset).

cv_filename = uv_fullname+ls_match-offset.

ENDIF.

ENDFORM.

*&---------------------------------------------------------------------* *& Form FRM_READ_FILE

*&---------------------------------------------------------------------* * text

*----------------------------------------------------------------------* * --> p1 text

* <-- p2 text

*----------------------------------------------------------------------* FORM frm_read_file .

DATA: lv_file TYPE string VALUE 'C:\XQJH1'.

DATA: lv_path TYPE string.

DATA: lv_result TYPE abap_bool.

DATA: lv_rc TYPE i.

DATA: lv_line TYPE i.

DATA: lv_originalpath TYPE bapi_doc_aux-filename,

lv_orfilename TYPE bapi_doc_aux-filename.

DATA: ls_documentfile TYPE bapi_doc_files2,

ls_return TYPE bapiret2.

lv_result = cl_gui_frontend_services=>directory_exist( directory = lv_file ).

IF lv_result <> 'X'.

CALL METHOD cl_gui_frontend_services=>directory_create

EXPORTING

directory = lv_file CHANGING

rc = lv_rc EXCEPTIONS

directory_create_failed = 1

cntl_error = 2

error_no_gui = 3

directory_access_denied = 4

directory_already_exists = 5

path_not_found = 6

unknown_error = 7

not_supported_by_gui = 8

wrong_parameter = 9

OTHERS = 10.

IF lv_rc <> 0 OR sy-subrc <> 0.

MESSAGE e001 WITH '文件路径拒绝访问'.

ENDIF.

ENDIF.

GET CURSOR LINE lv_line.

READ TABLE it_file INTO wa_file INDEX lv_line.

CONCATENATE lv_file '\' INTO lv_originalpath.

lv_orfilename = wa_file-dname.

CALL FUNCTION 'ZBAPI_DOCUMENT_CHECKOUTVIEW2'

EXPORTING

documenttype = con_dokar

documentnumber = wa_file-doc_id

documentpart = '000'

documentversion = '00'

documentfile = ls_documentfile

originalpath = lv_originalpath

orfilename = lv_orfilename

IMPORTING

return = ls_return.

IF ls_return IS NOT INITIAL.

MESSAGE ID ls_return-id TYPE ls_return-type NUMBER ls_retu rn-number

WITH ls_return-message_v1 ls_return-message_v2 ls_return-message_v3 ls_return-message_v4.

ENDIF.

CONCATENATE lv_originalpath lv_orfilename INTO lv_path.

CALL METHOD cl_gui_frontend_services=>execute

EXPORTING

document = lv_path

synchronous = 'X'

EXCEPTIONS

cntl_error = 1

error_no_gui = 2

bad_parameter = 3

file_not_found = 4

path_not_found = 5

file_extension_unknown = 6

error_execute_failed = 7

synchronous_failed = 8

not_supported_by_gui = 9

OTHERS = 10.

IF sy-subrc <> 0.

* Implement suitable error handling here

MESSAGE s001 WITH '打开文档失败' DISPLAY LIKE 'E'.

ENDIF.

ENDFORM. " FRM_READ_FILE

*&---------------------------------------------------------------------* *& Form FRM_DOWN_FILE

*&---------------------------------------------------------------------* * text

*----------------------------------------------------------------------* * --> p1 text

* <-- p2 text

*----------------------------------------------------------------------* FORM frm_down_file .

DATA: lv_filename TYPE string.

DATA: lv_path TYPE string.

DATA: lv_path_c(100) TYPE c.

DATA: lv_fullpath TYPE string.

DATA: lv_result TYPE abap_bool.

DATA: lv_rc TYPE i.

DATA: lv_line TYPE i.

DATA: lv_originalpath TYPE bapi_doc_aux-filename,

lv_orfilename TYPE bapi_doc_aux-filename.

DATA: ls_documentfile TYPE bapi_doc_files2,

ls_return TYPE bapiret2.

GET CURSOR LINE lv_line.

READ TABLE it_file INTO wa_file INDEX lv_line.

lv_filename = wa_file-dname.

CALL METHOD cl_gui_frontend_services=>file_save_dialog

EXPORTING

window_title = '选择位置'

* default_extension =

default_file_name = lv_filename

* with_encoding =

* file_filter =

* initial_directory =

* prompt_on_overwrite = 'X'

CHANGING

filename = lv_filename

path = lv_path

fullpath = lv_fullpath EXCEPTIONS

cntl_error = 1

error_no_gui = 2

not_supported_by_gui = 3

invalid_default_file_name = 4

OTHERS = 5.

IF sy-subrc <> 0.

EXIT.

ENDIF.

lv_result = cl_gui_frontend_services=>directory_exist( directory = lv_path ).

IF lv_result <> 'X'.

MESSAGE e001 WITH '文件路径不存在'.

ENDIF.

lv_originalpath = lv_path.

lv_orfilename = lv_filename.

CALL FUNCTION 'ZBAPI_DOCUMENT_CHECKOUTVIEW2'

EXPORTING

documenttype = con_dokar

documentnumber = wa_file-doc_id

documentpart = '000'

documentversion = '00'

documentfile = ls_documentfile

originalpath = lv_originalpath

orfilename = lv_orfilename

IMPORTING

return = ls_return.

IF ls_return IS NOT INITIAL.

MESSAGE ID ls_return-id TYPE ls_return-type NUMBER ls_retu rn-number

WITH ls_return-message_v1 ls_return-message_v2 ls_return-message_v3 ls_return-message_v4.

ELSE.

MESSAGE s001 WITH '下载成功'.

ENDIF.

ENDFORM. " FRM_DOWN_FILE

*&---------------------------------------------------------------------* *& Form FRM_DELETE_FILE

*&---------------------------------------------------------------------* * text

*----------------------------------------------------------------------* * --> p1 text

* <-- p2 text

*----------------------------------------------------------------------* FORM frm_delete_file .

DATA: lv_line TYPE i,

ls_return TYPE bapiret2.

CALL FUNCTION 'POPUP_TO_CONFIRM'

EXPORTING

titlebar = '消息提示'

text_question = '是否删除文档'

text_button_1 = '是'

text_button_2 = '否'

default_button = '1'

display_cancel_button = ''

start_column = 25

start_row = 6

* popup_type = 'ICON_MESSAGE_ERROR' IMPORTING

answer = lv_answer EXCEPTIONS

text_not_found = 1

OTHERS = 2.

IF lv_answer <> '1'.

MESSAGE s001 WITH '用户取消操作' DISPLAY LIKE 'E'.

EXIT.

ENDIF.

GET CURSOR LINE lv_line.

READ TABLE it_file INTO wa_file INDEX lv_line.

CALL FUNCTION 'BAPI_DOCUMENT_ENQUEUE'

EXPORTING

documenttype = con_dokar

documentnumber = wa_file-doc_id

documentpart = '000'

documentversion = '00'

IMPORTING

return = ls_return.

IF ls_return IS NOT INITIAL.

MESSAGE ID ls_return-id TYPE ls_return-type NUMBER ls_retu rn-number

WITH ls_return-message_v1 ls_return-message_v2 ls_return-message_v3 ls_return-message_v4.

ENDIF.

CALL FUNCTION 'BAPI_DOCUMENT_DELETE_DIRECT'

EXPORTING

documenttype = con_dokar

documentnumber = wa_file-doc_id

documentpart = '000'

documentversion = '00'

IMPORTING

return = ls_return.

CALL FUNCTION 'BAPI_DOCUMENT_DEQUEUE'

EXPORTING

documenttype = con_dokar

documentnumber = wa_file-doc_id

documentpart = '000'

documentversion = '00'.

IF ls_return-type <> 'E'.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.

DELETE it_file INDEX lv_line.

DELETE FROM ztmm_xqjh_file WHERE doc_id = wa_file-doc_id.

MESSAGE s001 WITH '删除成功'.

ELSE.

MESSAGE ID ls_return-id TYPE ls_return-type NUMBER ls_retu rn-number

WITH ls_return-message_v1 ls_return-message_v2 ls_return-message_v3 ls_return-message_v4.

ENDIF.

ENDFORM. " FRM_DELETE_FILE

*&---------------------------------------------------------------------* *& Form FRM_DOUBLE_CLICK

*&---------------------------------------------------------------------* * text

*----------------------------------------------------------------------* * --> p1 text

* <-- p2 text

*----------------------------------------------------------------------* FORM frm_double_click .

DATA: filed TYPE char20.

GET CURSOR FIELD filed.

IF filed = 'IT_FILE-DOC_ID'.

GET CURSOR LINE line.

READ TABLE it_file INDEX line.

SET PARAMETER ID 'CV1' FIELD it_file-doc_id.

SET PARAMETER ID 'CV2' FIELD con_dokar.

SET PARAMETER ID 'CV3' FIELD '00'.

SET PARAMETER ID 'CV4' FIELD '000'.

CALL TRANSACTION 'CV03N' AND SKIP FIRST SCREEN.

ENDIF.

ENDFORM. " FRM_DOUBLE_CLICK

字符串处理

实验1 字符串处理 1.1 实验内容 1. 下面程序输出有无问题,问题在什么地方 #include void main(){ char a[]=“\0”; 空字符串 puts(a); } 问题:____空____________________ 2. 写出程序运行结果,并运行证实 #include void main(){ char a[20]="abcdefgh"; 出现了两个结束标志 a[4]=’\0’; 默认第一个 puts(a); } 结果:_____abcd______________ 3. 指出下面程序中的错误 #include void main(){ char q[8]; strcpy(q, "love all "); printf("%s\n",q); } 4. 写出下面程序的功能,并运行验证。 #include #include void main(){ char str[100],t; int i,len; char t, *p1, *p2; scanf("%s",str); len=strlen(str); for(i=0;i

程序。 #include "stdio.h" void main(){ char a[100]; int i; gets(a); for(i=0;__a[I]!=0 ____;++i); 没有循环体,循环体为空printf("%d\n",i); }

Mathematica函数及使用方法

Mathematica函数及使用方法 (来源:北峰数模) --------------------------------------------------------------------- 注:为了对Mathematica有一定了解的同学系统掌握Mathematica的强大功能,我们把它的一些资料性的东西整理了一下,希望能对大家有所帮助。 --------------------------------------------------------------------- 一、运算符及特殊符号 Line1; 执行Line,不显示结果 Line1,line2 顺次执行Line1,2,并显示结果 ?name 关于系统变量name的信息 ??name 关于系统变量name的全部信息 !command 执行Dos命令 n! N的阶乘 !!filename 显示文件内容 < Expr>> filename 打开文件写 Expr>>>filename 打开文件从文件末写 () 结合率 [] 函数 {} 一个表 <*Math Fun*> 在c语言中使用math的函数

(*Note*) 程序的注释 #n 第n个参数 ## 所有参数 rule& 把rule作用于后面的式子 % 前一次的输出 %% 倒数第二次的输出 %n 第n个输出 var::note 变量var的注释"Astring " 字符串 Context ` 上下文 a+b 加 a-b 减 a*b或a b 乘 a/b 除 a^b 乘方 base^^num 以base为进位的数 lhs&&rhs 且 lhs||rhs 或 !lha 非 ++,-- 自加1,自减1 +=,-=,*=,/= 同C语言 >,<,>=,<=,==,!= 逻辑判断(同c)

C字符串处理函数全

strcpy(char destination[], const char source[]); strcpy:将字符串source拷贝到字符串destination中。 strcpy函数应用举例 原型:strcpy(char destination[], const char source[]); 功能:将字符串source拷贝到字符串destination中 例程: #include #include void main(void) { char str1[10] = { "TsinghuaOK"}; char str2[10] = { "Computer"}; cout < #include void main(void) { char str1[10] = { "Tsinghua "}; char str2[10] = { "Computer"}; cout <

字符串处理

字符串处理 B.基本题(SC6_5B.cpp) 【题目描述】 在主字符串中删除所有子字符串。打开SC6_5B.cpp文件,完成程序的编写。 【输入】 输入文件SC6_5B.in有2行,第1行是主字符串,第2行是子字符串。 【输出】 输出文件SC6_5B.out有1行,即删除所有子字符串后的主字符串。 【输入输出样例1】 2】 【输入输出样例 0≤字符串长度≤1000。 Code: #include "stdio.h" #include "string.h" const int N0=1000; char *index( char *s, char *sub )//在s中查找sub,找到返回首字符地址,找不到返回空{ int i=0, j=0; char *p=sub; if( *sub=='\0' )return NULL; //****************************************** for(i=0; i+strlen(sub)-1

} return NULL; //========================================== } int main() { char s[N0+1],sub[N0+1], *p, *q; int sublen; //freopen( "sc6_5b.in", "r", stdin); //freopen( "sc6_5b.out", "w", stdout); gets(s); gets(sub); sublen=strlen( sub ); while( p=index( s, sub ) ) { q=p+sublen; while( *p++=*q++ ); //在s中p的位置删除sub } puts(s); return 0; } C.拓展题(SC6_5C.cpp) 【题目描述】 输入3行字符串,分别是s字符串, t字符串和r字符串。如果s字符串中有包含t字符串,则用r字符串替换之。例如:s=“12aaabc3aaaaaabc#$%aaabc”,t=“aaabc”,r=“abc”,将s中的“aaabc”替换成“abc”之后,s=“12abc3aabc#$%abc”。输出替换之后的s字符串。打开SC6_5C.cpp文件,完成程序的编写。 【输入】 输入文件SC6_5C.in包含有3行字符串,分别是s字符串, t字符串和r字符串。 【输出】 输出文件SC6_5C.out将s字符串中包含的t字符串,用r字符串替换之,输出替换之后的s字符串。 0≤字符串长度≤1000。 Code:

Mathematica函数大全(内置)

Mathematica函数大全--运算符及特殊符号一、运算符及特殊符号 Line1;执行Line,不显示结果 Line1,line2顺次执行Line1,2,并显示结果 ?name关于系统变量name的信息 ??name关于系统变量name的全部信息 !command执行Dos命令 n! N的阶乘 !!filename显示文件内容 > filename打开文件写 Expr>>>filename打开文件从文件末写 () 结合率 []函数 {}一个表 <*Math Fun*> 在c语言中使用math的函数 (*Note*)程序的注释 #n第n个参数 ##所有参数 rule& 把rule作用于后面的式子 %前一次的输出 %%倒数第二次的输出 %n第n个输出 var::note变量var的注释 "Astring "字符串 Context ` 上下文 a+b 加

a-b减 a*b或a b 乘 a/b除 a^b 乘方 base^^num以base为进位的数 lhs&&rhs且 lhs||rhs或 !lha非 ++,-- 自加1,自减1 +=,-=,*=,/= 同C语言 >,<,>=,<=,==,!=逻辑判断(同c) lhs=rhs立即赋值 lhs:=rhs建立动态赋值 lhs:>rhs建立替换规则 expr//funname相当于filename[expr] expr/.rule将规则rule应用于expr expr//.rule 将规则rule不断应用于expr知道不变为止param_ 名为param的一个任意表达式(形式变量)param__名为param的任意多个任意表达式(形式变量) 二、系统常数 Pi 3.1415....的无限精度数值 E 2.17828...的无限精度数值 Catalan 0.915966..卡塔兰常数 EulerGamma 0.5772....高斯常数 GoldenRatio 1.61803...黄金分割数 Degree Pi/180角度弧度换算 I复数单位 Infinity无穷大

java 字符串常用函数及其用法

java中的字符串也是一连串的字符。但是与许多其他的计算机语言将字符串作为字符数组处理不同,Java将字符串作为String类型对象来处理。将字符串作为内置的对象处理允许Java提供十分丰富的功能特性以方便处理字符串。下面是一些使用频率比较高的函数及其相关说明。 String相关函数 1)substring() 它有两种形式,第一种是:String substring(int startIndex) 第二种是:String substring(int startIndex,int endIndex) 2)concat() 连接两个字符串 例:String s="Welcome to "; String t=s.concat("AnHui"); 3)replace() 替换 它有两种形式,第一种形式用一个字符在调用字符串中所有出现某个字符的地方进行替换,形式如下: String replace(char original,char replacement) 例如:String s=”Hello”.replace(’l',’w'); 第二种形式是用一个字符序列替换另一个字符序列,形式如下: String replace(CharSequence original,CharSequence replacement) 4)trim() 去掉起始和结尾的空格 5)valueOf() 转换为字符串 6)toLowerCase() 转换为小写 7)toUpperCase() 转换为大写 8)length() 取得字符串的长度 例:char chars[]={’a',’b’.’c'}; String s=new String(chars); int len=s.length(); 9)charAt() 截取一个字符 例:char ch; ch=”abc”.charAt(1); 返回值为’b’ 10)getChars() 截取多个字符 void getChars(int sourceStart,int sourceEnd,char target[],int targetStart) sourceStart 指定了子串开始字符的下标 sourceEnd 指定了子串结束后的下一个字符的下标。因此,子串包含从sourceStart到sourceEnd-1的字符。

各种字符串处理函数示例(基本)

示例 1.字符串输出示例。 程序: #include void main(void) { char str[25]={"Welcome to our city!"}; puts(str); puts("Thank you!"); } 结果: 2.字符串输入实例。(注意比较gets与scanf和puts与printf的区别)程序: #include void main(main) { char str[20]; gets(str); puts(str); printf("*********\n"); scanf("%s",str); puts(str); } 结果: 3.测字符串长度函数strlen()的使用。 程序: #include #include void main(main) { char a[10]="program";

int x,y; x=strlen(a); y=strlen("abc13"); printf("%d\n%d\n\n",x,y); } 结果: 4.字符串连接函数的使用。 程序: #include #include void main(main) { char s1[20]="Hello",s2[6]="Word"; puts(s1); puts(s2); strcat(s1,s2); printf("%s\n",s1); } 结果: 修改后 程序: #include #include void main(main) { char s1[5]="Hello",s2[6]="Word"; puts(s1); puts(s2); strcat(s1,s2); printf("%s\n",s1); } 结果:

字符串处理函数大全

字符串处理函数大全 bcmp(比较内存内容)相关函数 bcmp,strcasecmp,strcmp,strcoll,strncmp,strncasecmp 表头文件;include 定义函数;int bcmp ( const void *s1,const void * s2,int n); 函数说明;bcmp()用来比较s1和s2所指的内存区间前n个字节,若参数n为0,则返回0。返回值;若参数s1 和s2 所指的内存内容都完全相同则返回0 值,否则返回非零值。 附加说明;建议使用memcmp()取代。 范例:参考memcmp()。 //================================================================ bcopy(拷贝内存内容)相关函数 memccpy,memcpy,memmove,strcpy,ctrncpy 表头文件;#include 定义函数;void bcopy ( const void *src,void *dest ,int n); 函数说明;bcopy()与memcpy()一样都是用来拷贝src所指的内存内容前n个字节到dest所指的地址,不过参数src与dest在传给函数时是相反的位置。 返回值 ;附加说明建议使用memcpy()取代 范例 #include main() { char dest[30]=”string(a)”; char src[30]=”string\0string”; int i; bcopy(src,dest,30);/* src指针放在前*/ printf(bcopy(): “) for(i=0;i<30;i++) printf(“%c”,dest[i]); memcpy(dest src,30); /*dest指针放在钱*/ printf(…\nmemcpy() : “); for(i=0;i<30;i++) printf(“%c”,dest[i]); 执行 bcopy() : string string memcpy() :string sring //================================================================ bzero(将一段内存内容全清为零)相关函数 memset,swab 表头文件;#include 定义函数;void bzero(void *s,int n); 函数说明:bzero()会将参数s所指的内存区域前n个字节,全部设为零值。相当于调用memset((void*)s,0,size_tn); 返回值:附加说明建议使用memset取代

VB常用字符串操作函数解读

VB常用字符串操作函数2009/11/25 18:321. ASC(X,Chr(X:转换字符字符码[格式]: P=Asc(X 返回字符串X的第一个字符的字符码 P=Chr(X 返回字符码等于X的字符 [范例]:(1P=Chr(65 ‘ 输出字符A,因为A的ASCII码等于65 (2P=Asc(“A” ‘ 输出65 2. Len(X:计算字符串X的长度 [格式]: P=Len(X [说明]:空字符串长度为0,空格符也算一个字符,一个中文字虽然占用2 Bytes,但也算 一个字符。 [范例]: (1 令X=”” (空字符串 Len(X 输出结果为0 (2 令X=”abcd” Len(X 输出结果为4 (3 令X=”VB教程” Len(X 输出结果为4 3. Mid(X函数:读取字符串X中间的字符 [格式]: P=Mid(X,n 由X的第n个字符读起,读取后面的所有字符。 P=Mid(X,n,m 由X的第n个字符读起,读取后面的m个字符。 [范例]: (1 X=”abcdefg” P=Mid(X,5 结果为:P=”efg” (2 X=”abcdefg” P=Mid(X,2,4 结果为 P=”bcde” 4. R eplace: 将字符串中的某些特定字符串替换为其他字符串 [格式]: P=Replace(X,S,R [说明]:将字符串X中的字符串S替换为字符串R,然后返回。[范例]:X=”VB is very good” P=Replace(X,good,nice 输出结果为:P=”VB is very nice” 5. StrReverse:反转字符串 [格式]: P=StrReverse(X [说明]:返回X参数反转后的字符串 [范例]:(1)X=”abc” P=StrReverse(X 输出结果:P=”cba” 6. Ucase(X,Lcase(X:转换英文字母的大小写 [格式]:P=Lcase(X ‘ 将X字符串中的大写字母转换成小写P=Ucase(X ‘ 将X字符串中的小写字母转换成大写 [说明]:除了英文字母外,其他字符或中文字都不会受到影响。 [范例]:(1)令X=”VB and VC” 则Lcase(X的结果为”vb and vc”,Ucase(X的结果为”VB AND VC” 7. InStr函数:寻找字符串 [格式]: P=InStr(X,Y 从X第一个字符起找出Y出现的位置 P=InStr(n,X,Y 从X第n个字符起找出Y出现的位置 [说明]:(1)若在X中找到Y,则返回值是Y第一个字符出现在X中的位置。(2) InStr(X,Y相当于 InStr(1,X,Y。(3)若字符串长度,或X为空字符串,或在X中找不到Y,则都 返回0。(4)若Y为空字符串,则返回0。 ---------------------------------------------------------------------------------------------- mid(字符串,从第几个开始,长度 ByRef 在[字符串]中[从第几个开始]取出[长度个字符串] 例如 mid("小欣无敌",1,3 则返回 "小欣无" instr(从第几个开始,字符串1,字符串2 ByVal 从规定的位置开始查找,返回字符

字符串处理

字符串处理 1.常见的字符串操作的三种类型 (1)提取和删除字符串 这类处理是取出一个字符串中若干个字符串,基本的方法是:确定需要提取子串的开始位置以及子串的长度。如果题目没有明确给出子串的开始位置及长度的信息,那么可以使用pos函数找出子串前后两个空格的位置,从而确定相关信息。 提取子串:用copy函数将子串提取出来。删除子串:用delete过程直接将子串删除。 (2)字符转换 这类处理是将字符对应的ASCII码按规律进行运算,使该字符转换成另一个字符。我们可以使用ord函数求出某一字符的ASCII码,用chr函数将ASCII码转换成字符。 (3)数值与字符转换 在处理位数很多数值很大的数时,可能超过了整数和实数所能表示的最大范围,在这种情况下,只能采用字符串进行处理。可以使用str过程将数值类型的数据转换成字符串类型,使用val过程可将字符串型数据转换成数值类型。 2.字符串处理的注意事项 (1)读入字串长度如果超过255,则要用字符数组保存字符串。 (2)在分析程序的算法效率时,要注意考虑字符串处理的函数和过程的运行时间。 (3)读数据时,不确定字符行数和每行的字符个数时,可用行结束标记eoln和文件结束 标记eof来读数据。 3.常见的字符串过程和函数 (1)length(s)函数,求字符串s的长度。 (2)copy(s,w,k)函数,在字符串s中从w开始截取长度为k的子串。 (3)val(s,k,code)过程,将字符串s转为数值,存在k中,code返回出错的首位置。 (4)str(i,s)过程,将数值i转为字符串s。 (5)delete(s,w,k)过程,在s中删除从第w位开始的k个字符。 (6)insert(s1, s, w)过程,将s1插到s中第w位。 (7)pos(c, s)函数,求字符c在s中的起始位置。 (8)连接号“+”,将两个字符串连接起来。 (9)upcase(ch)过程,将字母ch转换成大写字母。

Mathematica的常用函数

Mathematica的内部常数 Pi , 或π(从基本输入工具栏输入, 或“Esc”+“p”+“Esc”)圆周率π E (从基本输入工具栏输入, 或“Esc”+“ee”+“Esc”)自然对数的底数e I (从基本输入工具栏输入, 或“Esc”+“ii”+“Esc”)虚数单位i Infinity, 或∞(从基本输入工具栏输入, 或“Esc”+“inf”+“Esc”)无穷大∞ Degree 或°(从基本输入工具栏输入,或“Esc”+“deg”+“Esc”)度 Mathematica的常用内部数学函数 指数函数Exp[x]以e为底数 对数函数Log[x]自然对数,即以e为底数的对数 Log[a,x]以a为底数的x的对数 开方函数Sqrt[x]表示x的算术平方根 绝对值函数Abs[x]表示x的绝对值 三角函数 (自变量的单位为弧度)Sin[x]正弦函数 Cos[x]余弦函数 Tan[x]正切函数 Cot[x]余切函数 Sec[x]正割函数 Csc[x]余割函数 反三角函数ArcSin[x]反正弦函数 ArcCos[x]反余弦函数 ArcTan[x]反正切函数 ArcCot[x]反余切函数 ArcSec[x]反正割函数 ArcCsc[x]反余割函数 双曲函数Sinh[x]双曲正弦函数 Cosh[x]双曲余弦函数 Tanh[x]双曲正切函数 Coth[x]双曲余切函数 Sech[x]双曲正割函数 Csch[x]双曲余割函数 反双曲函数ArcSinh[x]反双曲正弦函数 ArcCosh[x]反双曲余弦函数 ArcTanh[x]反双曲正切函数 ArcCoth[x]反双曲余切函数 ArcSech[x]反双曲正割函数 ArcCsch[x]反双曲余割函数 求角度函数ArcTan[x,y]以坐标原点为顶点,x轴正半轴为始边,从原点到点(x,y)的射线为终边的角,其单位为弧度 数论函数GCD[a,b,c,...]最大公约数函数 LCM[a,b,c,...]最小公倍数函数

字符串处理常用方法

C# string类应用 判断是否包含子串 想要判断一个字符串中是否包含某个子串,可以用Contains方法来实现: public bool Contains (string value) 参数value为待判定的子串。如果包含,返回true;否则返回false。下面的代码判断“Hello”中是否包含两个子串。 1.bool b1 = strA.Contains("ll"); //true 2.Bool b1=strA.Contains("MM"); //false 4.1.4 定位字符和子串 定位子串是指在一个字符串中寻找其中包含的子串或者某个字符。在String类中,常用的定位子串和字符的方法包括IndexOf/LastIndexOf及IndexOfAny/LastIndexOfAny,下面进行详细介绍。 1.IndexOf/LastIndexOf IndexOf方法用于搜索在一个字符串中,某个特定的字符或者子串第一次出现的位置,该方法区分大小写,并从字符串的首字符开始以0计数。如果字符串中不包含这个字符或子串,则返回-1。常用的重载形式如下所示。 (1)定位字符 int IndexOf(char value) int IndexOf(char value, int startIndex)

int IndexOf(char value, int startIndex, int count) (2)定位子串: int IndexOf(string value) int IndexOf(string value, int startIndex) int IndexOf(string value, int startIndex, int count) 在上述重载形式中,其参数含义如下: value:待定位的字符或者子串。 startIndex:在总串中开始搜索的其实位置。 count:在总串中从起始位置开始搜索的字符数。 下面的代码在“Hello”中寻找字符…l?第一次出现的位置。 代码4-7 使用IndexOf寻找字符第一次出现位置:Default.aspx.cs 1. String s=”Hello”; 2. int I = s.IndexOf(…l?)); //2 同IndexOf类似,LastIndexOf用于搜索在一个字符串中,某个特定的字符或者子串最后一次出现的位置,其方法定义和返回值都与IndexOf相同,不再赘述。 2.IndexOfAny/LastIndexOfAny IndexOfAny方法功能同IndexOf类似,区别在于,它可以搜索在一个字符串中,出现在一个字符数组中的任意字符第一次出现的位置。同样,该方法区分大小写,并从字符串的首字符开始以0计数。如果字符串中不包含这个字符或子串,则返回-1。常用的IndexOfAny 重载形式有3种:

Mathematica函数大全

Mathematica函数大全一、运算符及特殊符号 Line1; 执行Line,不显示结果 Line1,line2 顺次执行Line1,2,并显示结果 ?name 关于系统变量name的信息 ??name 关于系统变量name的全部信息 !command 执行Dos命令 n! N的阶乘 !!filename 显示文件内容 <> filename 打开文件写 Expr>>>filename 打开文件从文件末写 () 结合率 [] 函数 {} 一个表 <*Math Fun*> 在c语言中使用math的函数 (*Note*) 程序的注释 #n 第n个参数 ## 所有参数 rule& 把rule作用于后面的式子 % 前一次的输出 %% 倒数第二次的输出 %n 第n个输出 var::note 变量var的注释 "Astring " 字符串 Context ` 上下文 a+b 加 a-b 减 a*b或a b 乘 a/b 除 a^b 乘方 base^^num 以base为进位的数 lhs&&rhs 且 lhs||rhs 或 !lha 非 ++,-- 自加1,自减1 +=,-=,*=,/= 同C语言

>,<,>=,<=,==,!= 逻辑判断(同c) lhs=rhs 立即赋值 lhs:=rhs 建立动态赋值 lhs:>rhs 建立替换规则 lhs->rhs 建立替换规则 expr//funname 相当于filename[expr] expr/.rule 将规则rule应用于expr expr//.rule 将规则rule不断应用于expr知道不变为止 param_ 名为param的一个任意表达式(形式变量) param__ 名为param的任意多个任意表达式(形式变量) 二、系统常数 Pi 3.1415....的无限精度数值 E 2.17828...的无限精度数值 Catalan 0.915966..卡塔兰常数 EulerGamma 0.5772....高斯常数 GoldenRatio 1.61803...黄金分割数 Degree Pi/180角度弧度换算 I 复数单位 Infinity 无穷大 -Infinity 负无穷大 ComplexInfinity 复无穷大 Indeterminate 不定式 三、代数计算 Expand[expr] 展开表达式 Factor[expr] 展开表达式 Simplify[expr] 化简表达式 FullSimplify[expr] 将特殊函数等也进行化简 PowerExpand[expr] 展开所有的幂次形式 ComplexExpand[expr,{x1,x2...}] 按复数实部虚部展开 FunctionExpand[expr] 化简expr中的特殊函数 Collect[expr, x] 合并同次项 Collect[expr, {x1,x2,...}] 合并x1,x2,...的同次项 Together[expr] 通分 Apart[expr] 部分分式展开 Apart[expr, var] 对var的部分分式展开 Cancel[expr] 约分 ExpandAll[expr] 展开表达式 ExpandAll[expr, patt] 展开表达式 FactorTerms[poly] 提出共有的数字因子 FactorTerms[poly, x] 提出与x无关的数字因子 FactorTerms[poly, {x1,x2...}] 提出与xi无关的数字因子 Coefficient[expr, form] 多项式expr中form的系数

acm常用字符串处理函数

sstrstr与strchar用法 原型:extern char *strstr(char *haystack, char *needle); 用法:#include 功能:从字符串haystack中寻找needle第一次出现的位置(不比较结束符NULL)。 说明:返回指向第一次出现needle位置的指针,如果没找到则返回NULL。 举例: #include #include main() { char *s="Golden Global View"; char *l="lob"; char *p; clrscr(); p=strstr(s,l); if(p) printf("%s",p); else printf("Not Found!"); getchar(); return 0; } 语法:int strstr(str1,str2) str1: 被查找目标string expression to search. str2:要查找对象The string expression to find. 该函数返回str2第一次在str1中的位置,如果没有找到,返回NULL The strstr() function returns the ordinal position within str1 of the first occurrence of str2. If str2 is not found in str1, strstr() returns 0. 例子: 功能:从字串” string1 onexxx string2 oneyyy”中寻找”yyy” (假设xxx和yyy都是一个未知的字串) char *s=” string1 onexxx string2 oneyyy”; char *p; p=strstr(s,”string2”); if(!p) printf(“Not Found!”); p=strstr(p,”one”); if(!p) printf(“Not Found!”); p+=strlen(“one”) printf(“%s”,p); 说明:如果直接写语句p=strstr(p,”one”),则找到的是xxx,不符合要求 所以需采用二次查找法找到目标

javascript字符串处理函数汇总

javascript字符串处理函数汇总 虽然JavaScript 有很多用处,但是处理字符串是其中最流行的一个。下面让我们深入地分析一下使用JavaScript 操作字符串。 在JavaScript 中,String 是对象。String 对象并不是以字符数组的方式存储的,所以我们必须使用内建函数来操纵它们的值。这些内建函数提供了不同的方法来访问字符串变量的内容。下面我们详细看一下这些函数。 操作字符串的值是一般的开发人员必须面临的家常便饭。操作字符串的具体方式有很多,比如说从一个字符串是提取出一部分内容来,或者确定一个字符串是否包含一个特定的字符。下面的JavaScript 函数为开发人员提供了他们所需要的所有功能: ? concat() –将两个或多个字符的文本组合起来,返回一个新的字符串。 ? indexOf() –返回字符串中一个子串第一处出现的索引。如果没有匹配项,返回-1 。 ? charA T() –返回指定位置的字符。 ? lastIndexOf() –返回字符串中一个子串最后一处出现的索引,如果没有匹配项,返回 -1 。 ? match() –检查一个字符串是否匹配一个正则表达式。 ? substring() –返回字符串的一个子串。传入参数是起始位置和结束位置。 ? replace() –用来查找匹配一个正则表达式的字符串,然后使用新字符串代替匹配的字符串。 ? search() –执行一个正则表达式匹配查找。如果查找成功,返回字符串中匹配的索引值。否则返回-1 。 ? slice() –提取字符串的一部分,并返回一个新字符串。 ? split() –通过将字符串划分成子串,将一个字符串做成一个字符串数组。

附录B:Mathematica的基本应用b

附录B :Mathematica 的基本应用 1. 什么是Mathematica Mathematica 是美国Wolfram Research 公司开发的通用科学计算软件,主要用途是科学研究与工程技术中的计算,这里介绍的是第6版(2008年更新为第7版)。由于它的功能十分强大,使用非常简便,现在已成为大学师生进行教学和科研的有力工具。它的主要特点有: 1)既可以进行程序运行,又可以进行交互式运行。一句简单的Mathematic 命令常常可以完成普通的c 语言几十甚至几百个语句的工作。例如解方程:x 4 + x 3 + 3x -5 = 0只要运行下面的命令: Solve[x^4+x^3+3 x-5 0,x] 。 2) 既可以进行任意高精度的数值计算,又可以进行各种复杂的符号演算,如函数的微分、积分、幂级数展开、矩阵求逆等等。它使许多以前只能靠纸和笔解决的推理工作可以用计算机处理。例如求不定积分:? x 4 e -2x dx 只要运行下面的命令: Integrate[x^4*Exp[2 x],x]。 3) 既可以进行抽象计算,又可以用图形、动画和声音等形式来具体表现,使人能够直观地把握住研究对象的特性。例如绘制函数图形:y = e -x /2 cos x , x ∈ [0, π],只要运行下面的命令: Plot[Exp[x/2]*Cos[x],{x,0,Pi}]。 4) Mathematica 把各种功能有机地结合在一个集成环境里,可以根据需要做不同的操作,给使用者带来极大的方便。 2. Mathematica 的基本功能 2.1 基本运算及其对象 Mathematica 的基本数值运算有加法、减法、乘法、除法和乘(开)方,分别用运算符“+”、“-”、“*”、“/”和“^”来表示(在不引起误解的情况下,乘号可以省略或用空格代替),例 如2.4*3^2 -(5/(6+3))^(1/3)表示3236534.2)(+÷-?。小括号“(”和“)”作为表示运算优先顺 序的符号,用于组合运算;中括号用于命令和函数,大括号用于集合和列表。 Mathematica 的关系运算符有:>、<、>=、<=、!=、== 等,它们的意义与通常的数学语言相同,要注意“!=”表示不等于,双等号“==”表示等于。而单等号“=”和冒号等号“:=”表示定义或赋值,不表示相等。逻辑运算符主要有:!、&&、||,它们的意义与c 语言中相同,分别是“非”、“与”、“或”。 Mathematica 的基本数值运算对象有常数、变数和函数,包含整数,有理数、实数和复数等数值类型。为了方便,Mathematica 预先用符号表示了一些重要常数,如Pi 表示圆周率π,E 表示自然对数的底e = 2.17828…,I 表示虚单位i ,Infinity 表示无穷大∞等。比如说,E^(2*Pi*I)表示i e π2。 Mathematica 还预先定义了大量数学函数以供调用,调用格式为“函数名[自变量]”,预定义的函数名用大写字母开始的标识符表示,常用的有

C语言字符串操作总结大全(超详细)

C语言字符串操作总结大全(超详细) 1)字符串操作 strcpy(p, p1) 复制字符串 strncpy(p, p1, n) 复制指定长度字符串 strcat(p, p1) 附加字符串 strncat(p, p1, n) 附加指定长度字符串 strlen(p) 取字符串长度 strcmp(p, p1) 比较字符串 strcasecmp忽略大小写比较字符串 strncmp(p, p1, n) 比较指定长度字符串 strchr(p, c) 在字符串中查找指定字符 strrchr(p, c) 在字符串中反向查找 strstr(p, p1) 查找字符串 strpbrk(p, p1) 以目标字符串的所有字符作为集合,在当前字符串查找该集合的任一元素strspn(p, p1) 以目标字符串的所有字符作为集合,在当前字符串查找不属于该集合的任一元素的偏移 strcspn(p, p1) 以目标字符串的所有字符作为集合,在当前字符串查找属于该集合的任一元素的偏移 * 具有指定长度的字符串处理函数在已处理的字符串之后填补零结尾符 2)字符串到数值类型的转换 strtod(p, ppend) 从字符串p 中转换double 类型数值,并将后续的字符串指针存储到ppend 指向的char* 类型存储。 strtol(p, ppend, base) 从字符串p 中转换long 类型整型数值,base 显式设置转换的整型进制,设置为0 以根据特定格式判断所用进制,0x, 0X 前缀以解释为十六进制格式整型,0 前缀以解释为八进制格式整型 atoi(p) 字符串转换到int 整型 atof(p) 字符串转换到double 符点数 atol(p) 字符串转换到long 整型 3)字符检查 isalpha() 检查是否为字母字符 isupper() 检查是否为大写字母字符 islower() 检查是否为小写字母字符 isdigit() 检查是否为数字 isxdigit() 检查是否为十六进制数字表示的有效字符 isspace() 检查是否为空格类型字符 iscntrl() 检查是否为控制字符 ispunct() 检查是否为标点符号 isalnum() 检查是否为字母和数字 isprint() 检查是否是可打印字符 isgraph() 检查是否是图形字符,等效于isalnum() | ispunct()

VBA,字符串处理大全

1 VBA中的字符串 2 VBA中处理字符串的函数 2.1 比较字符串 2.2 转换字符串 2.3 创建字符串 2.4 获取字符串的长度 2.5 格式化字符串 2.6 查找字符串 2.7 提取字符/字符串 2.8 删除空格 2.9 返回字符代码 2.10 返回数值代表的相应字符 2.11 使用字节的函数 2.12 返回数组的函数 2.13 连接字符串 2.14 替换字符串 2.15 反向字符串 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 VBA中的字符串 VBA不仅可以处理数字,也可以处理文本(字符串)。VBA提供了两类字符串: 一类为固定长度的字符串,声明时包含指字的字符数。例如,下面的语句 Dim strFixedLong As String*100 声明字符串变量后,无论赋予该变量多少个字符,总是只包含100个字符,但字符串最长不超过65526个字符,且需要使用Trim函数去掉字符串中多余的空格。定长字符串只有在必要时才使用。 另一类为动态字符串。例如,声明字符串变量Dim strDynamic As String后,可以给该变量任意赋值,最多可包含20亿个字符。 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 2 VBA中处理字符串的函数 2.1 比较字符串 通常,在VBA中进行字符串比较时,会用到比较运算符(如=、>等)、Like运算符和StrComp 函数。此外,在模块的开头用Option Compare语句指定比较方式。 2.1.1 比较运算符 可以采用简单的逻辑运算符进行两个字符串的比较,即<(小于)、<=(小于或等于)、>(大于)、>=(大于或等于)、=(等于)、<>(不等于)。此外,还可以使用Like运算符进行比较。2.1.2 StrComp函数 StrComp函数返回字符串比较的结果。其语法为: StrComp(string1,string2[,compare]) 其中,参数string1和strng2为必需的参数,可以是任何有效的字符串表达式。 参数Compare为可选参数,如果该参数为Null,将发生错误。如果参数Compare设置为常数vbUseCompareOption或-1或忽略该参数,将使用Option Compare语句设置进行比较;如果忽略该参数且没有设置Option Compare语句,则按二进制进行比较;如果参数Compare 设置为常数vbBinaryCompare或0,则用二进制进行比较;如果参数Compare设置为常数vbTextCompare或1,则按文本进行比较;如果参数Compare设置为常数vbDatabaseCompare

相关文档