If you need open a text file delimited by char with excel and create excel file:
****
REPOSITORY
class COM AS "*COM"
CLASS OLE AS "*OLE".
*********
WORKING-STORAGE SECTION.
****
01 CONTROLLI.
03 EXC_APPLICATION PIC X(50) VALUE "EXCEL.APPLICATION"...
If you have licensed datagrid control from microsoft you can use PcobADODatasource from version 7. I work with more 220 fields correctly. See samples on v7. For retrieve data from field you can use only the property "Col" and "TEXT" of datagrid
(ex: MOVE SPACE TO RIGA-COND...
If you use PowerCOBOL you can create your object as a control. Then register it in your system, and put it as a normal control on the main form (adding with custom control), open child form with INVOKE CHILD_NAME "Activate", and pass data between the forms.
I do not know if this is...
You can use "GetFileAttributesA" (attributes of a file it's better than check_file_exist because is very short) if the file exist return-value is 0 else -1 you need use kernel32.lib.
On cbl routines routine check_file_exist is wrong, you can retrieve the correct file on support...
You must set on "Setting" the printer as a printer server with the format of your custom size and when you print you must use that format.
Fsccdm
You must verify where is located the file. On debug mode must be in debug folder, in release mode must be in release folder or other folder you set. See file control and set the assign clause correctly. Your program cannot find the location file.
fsccdm
This is in POWER COBOL V.7.0 but it's the same thing
use FUNCTION NUMVAL it's easy
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 CONTROLLI.
03 XDAT PIC X(10).
03 NDAT PIC 9(10).
PROCEDURE DIVISION.
A.
MOVE SPACE TO XDAT...
If you need to create a new e-mail message with attachment file using outlook and PowerCOBOL V.6.1:
*******
REPOSITORY
CLASS COM AS "*COM".
*******
powercobol v.6.1 button click
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 CONTROLLI...
I use access database or sql, and indexed cobol files, and database are very useful for data management. With database it's easy create filters to search data without using keys as with indexed files. You can use powercobol control adodatasource integrated with datagrid control from microsoft...
If you want move data from list-view:
on itemclick event of control list-view (only on first column click)
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
LINKAGE SECTION.
01 POW-PLISTITEM OBJECT REFERENCE POW-CLISTITEM.
PROCEDURE DIVISION...
See this if can help you
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 ws-details.
03 ws-dets-1 pic 999.
03 ws-dets-2 pic xxxx.
03 ws-dets-3 pic xxxx.
01 CONTROLLI.
03 POW-PCMLIST OBJECT REFERENCE POW-CLISTITEM.
03 WK-IDX...
Go to www.adtools.com
search support samples and download it (windows API).
The fujitsu cobol provides, also, cbl routines for create directory or similar (see the samples on fujitsu cobol).
fsccdm
If you use powerCobol see this
******************
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 CONTROLLI.
03 FILENAME PIC X(260).
PROCEDURE DIVISION.
A.
MOVE SPACE TO FILENAME
STRING
"HH" DELIMITED BY SIZE
" "...
This is in POWER COBOL V.6.1 but it's the same thing
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 CONTROLLI.
03 XDAT PIC X(10).
03 NDAT PIC 9(10).
PROCEDURE DIVISION.
A.
MOVE SPACE TO XDAT
MOVE 0 TO NDAT
MOVE "Text"...
To robertocecchini
it's the same response that give me Gary Roush of support-adtools. It'valid only for text but not if you want insert controls at design time as you make with userform of vbasic of office. I post with tromba a request to Fujitsu for do that on next version of powerCobol.
Thanks...
I have used TAB but It's not very nice. I should prefer If possible use a form with scrolls as office, it's more helpful for operator use.
I'm Italian speaker so excuse me for my bad English.
Fsccdm
Thanks
I need use forms with scrolls bars as Microsoft forms 2.0 for office (for a very higth form data). Is possible create it on powerCOBOL V.6.1? or use the controls for Microsoft 2.0? I tried to do that but the controls don't works correctly (powercobol not recognizes scroll bar both,vertical,hor...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.