Progress syntax : How to Determine if a Directory Exists!
Fixes: In order to determine if a particular directory exists, use the FILE-INFO handle.For example, the code:/* Set the directory name in question */ FILE-INFO:FILE-NAME = "dirname". /* display the attributes of "dirname" */ MESSAGE FILE-INFO:FILE-TYPE VIEW-AS ALERT-BOX. will display 'D' if the directory exists and a '?' if it does not exist. 如果存在的目录则显示"DRW" , 如果存在文件"FRW",假如是不存在的文件和目录则为? RW应该为可读写.[@more@]
How to move progress database to different OS
Migrating databases between server platforms is sometimes possible using a Progress database copy utility. However, changing database servers often requires a data dump & load from the original server to the new server. The following Progress Knowledgebase entry describes how to determine if the server types are compatible for a database copy process or if a data dump and load is required.INTRODUCTION:=============Customers often ask about PROGRESS database portability: under whatcircumstanc
[原创]PROGRESS .I 文件中定义变量要小心
PROGRESS程序中的.I 写程序时要注意 定义一个变量时最好用以下语句&if defined(shipnbr) = 0 &then&scoped-define shipnbr ""&endif因为假如你用 define var a as 很可能调用的.P 调用两次该.I时 ,由于PROGRESS的编译原理是把.I的内容直接放到.P后再编译,这时很明显编译前的.P的内容就是有两行define var a as ,编译就会出错提示重复定义了VAR A[@more@]
add field security
When you want to add field security you add in the data dictionary two additional lines:In the FIELD VALIDATION: {gppswd.v &field = "cm_cr_terms"}In the FIELD VALIDATION MESSAGE:ERROR: USER DOES NOT HAVE ACCESS TO THIS FIELD. Please re-enter.You have now another challange. The customer credit terms already contains another validation:can-find(ct_mstr where ct_code = cm_cr_terms) or cm_cr_te = ""cm_cr_te is no TYPING ERROR. It is the shortest unique name for this field!!Yo