Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
Acucobol and Novell
Currently no Novell Netware system available but I remember you had to mark all your files as sharable using the command FLAG *.* +SRW (or was it FLAG +SRW *.*). Please try. Dixi- dixi
- Post #2
- Forum: COBOL General discussion
-
Printing to variable length forms using Linage is clause
Most inkjet and laser printers will support PCL commands (at least standard PCL commands). So you don't have to take care if it is an Epson or a HP or a Canon printer (or anything else) as long as it supports PCL. Of course if you use vendor dependend enhancements of the PCL language you might...- dixi
- Post #7
- Forum: COBOL General discussion
-
Printing to variable length forms using Linage is clause
A PCL-printjob will look like : (ESC = Escape-character, hex. 1B, dec. = 27) ESC%-12345X ESCE ... here will be the print data ... ESCE ESC%-12345X explanation : ESC%-12345X : UEL-Command (Universal Exit Language) ESCE : Printer Reset Command ESC&l#O Logical page orientation...- dixi
- Post #5
- Forum: COBOL General discussion
-
004 illegal file name
In DOS/Windows environment try SELECT ZEILENAUSGABE-DAT ASSIGN TO "LISTE". By this you will create a file with the name LISTE in your current directory. Regards Dixi- dixi
- Post #5
- Forum: COBOL General discussion
-
How do I display a rolling counter?
Please have a look at extract from Acucobol (Versin 4.3) Online Help : DISPLAY src-item Format 1 DISPLAY src-item displays an individual field to the screen. DISPLAY { {src-item} {OMITTED } [ UPON new-window ] Remaining phrases are optional, can appear in any order. AT...- dixi
- Post #10
- Forum: COBOL General discussion
-
HOW DO I HANDLE NUMERIC PC FIELDS
Oops, I forgot the field declarations in the working storage. Here they are : ***************************************************************** *** *** FIELD DEFINITIONS FOR SUB-ROUTINE UP043...- dixi
- Post #4
- Forum: COBOL General discussion
-
HOW DO I HANDLE NUMERIC PC FIELDS
Hi Aged1, probably the following subroutine can help you. ***************************************************************** *** *** REMOVE SPACES AND JUSTIFICATION AS REQUESTED ***...- dixi
- Post #3
- Forum: COBOL General discussion
-
Help with embedded signs
More Info. With the above definition all value of +3 would be stored in the receiving-field as x'303030303030303030303030C3' in ASCII. (-3 would be x'303030303030303030303030D3' in ASCII). In EBCDIC it would be x'F0F0F0F0F0F0F0F0F0F0F0F0C3' resp. x'F0F0...F0D3'. As you mentioned above positive...- dixi
- Post #3
- Forum: COBOL General discussion
-
Help with embedded signs
Please try 01 receiving-field pic s9(13) sign is trailing. The SIGN clause specifies the location and format of an item's operational sign. General Format [ SIGN IS ] {LEADING } [ SEPARATE CHARACTER ] {TRAILING} Syntax Rules 1. The SIGN clause may appear only in a...- dixi
- Post #2
- Forum: COBOL General discussion
-
S9(9) COMP to PIC X()
The easiest way to do this is by using a higher group level.<br><br>Example : <br><br>01 char-low-value pic x value...- dixi
- Post #2
- Forum: COBOL General discussion
-
Field sizes in ACU COBOL
In the AcuCobol GT manuals (Version 4.3.0) I found the following : <br><br>SET result-item TO SIZE OF data-item <br><br>The number of standard character positions occupied by data-item is stored in result-item. <br><br>Please try if it works.<br><br>- dixi
- Post #6
- Forum: COBOL General discussion
