Search results for query: *

Can you give an example of a record in masterfile, And its multiply records in the transfer file?

Hex is an abbreviation to the word HexaDecimal. Pertaining to a numbering system which uses 16 as the base (as opposed to 10. BTW, the word in English HEX is to perform magic...

Delta, you assuming that the data is justified right, What if spaces ,if exist, is in the right side,And what if there is more then 4 characters?. I don't sure that input file with 'X' format like 'F4C3" will be converted to its binary value.

...01 VECTOR-HEX REDEFINES VECTOR-HEX. 000035 02 VEC-HEX PIC 9(4) OCCURS 32. 000036 01 VECTOR-OUT. 000037 02 VEC-OUT PIC X OCCURS 9. 000038********************************************************************* 000039 PROCEDURE DIVISION. 000040 MAIN SECTION. 000041 1. DISPLAY "ENTER HEX...

I have a variabl field, and want to select a range of dates from 2 months before cureent date , until current date.

...01 FILE-NAME1 PIC X(60) VALUE SPACES. 000045 01 FILE-NAME1-R REDEFINES FILE-NAME1. 000046 02 VEC-FILE-NAME1 PIC X OCCURS 60. 000047********************************************************************* 000048 PROCEDURE DIVISION. 000049 MAIN SECTION. 000050 1. PERFORM PROC-BEGIN...

thread52-1108457 I found a ZOMBIE for a user called "sofri". I could not find this user, by the command "who", but with ps -ef | grep sofri, I found a proccess belong to "sofri" with too much STIME and in TTY column just "-". sofri 29012 29978 0 Oct 02 - 0:00 /usr/bin/sh...

I wrote a routine that output any formatted number, and adjust it to left, plus output the length. 01 N PIC 9(4) VALUE 0123. 01 Z PIC Z(9). ***** CALL-NUM2LEFT ***** 01 INP-NUM PIC X(25). 01 OUT-NUM PIC X(25). 01 OUT-NUM-LENGTH PIC 9(4). ***********************************...

In the header of the index or relative file, there is information about the file like key descriptions, & counts of alive records & deleted records. If you read the file as binary file, position 47-54 contain the number of records in the file (format: pic 9(12) comp-4).

I am using for more then a year a software, that can sending or view reports files, even from Dos prpomt window From the application, you copy the spool file to some defined file, then a TSR program, capture the file. and redirect it to direct print or open a dialog box. lOOK...

Here some lines from a .bat file One of zip file, include 3 files. ============ rem unzip files from unix host pkunzip.exe -o c-tabl.zip pkunzip.exe -o c-tach.zip pkunzip.exe -o c-mech.zip .....

yes but for small array, is the simple, just one corection, the perform should run to VECTOR-LENGTH -1.

...05 VEC-KEY PIC X(06). 000014 05 FILLER PIC X(14). 000015 01 VEC-M PIC X(20). 000016****************************************************************** 000017 PROCEDURE DIVISION. 000018 MAIN SECTION. 000019 1. MOVE 1 TO K, PERFORM SORT-VEC...

...RIGHT. 000016 01 X-R REDEFINES X. 000017 02 VEC-X PIC X OCCURS 20. 000018 01 SW-DOT PIC 9. 000019 01 SW-SIGN PIC 9. 000020********************** 000021 LINKAGE SECTION. 000022 01 INP PIC X(20) JUST RIGHT. 000023 01 N PIC S9(12)V9(5) COMP-3...

If that application need such huge capacity, and need to keep on-line old period recoreds, for my opinion, maybe you will reconsider, that the best cost/performance is to upgrate your system, that will handle such file, or to reduce the period you are keeping online. Other sugetiones, if your...

There is a software that its main task to handle printing tasks, including from dos command line, or from programs. It can also, to display/zoom pages by PgUp/Dn, every page that has page eject. www.printfil.com Baruch

Hi A simple trick in 2000YK was like, "that is doing something else then you think at first sight". 000000 01 in-year pic 9(2). 000000 subtract 1 from in-year. source was fixed to: 000000** subtract 1 from in-year. 000000 add 99 to in-year. Baruch

Hi I am also don't think that relative files is good idea to keep data in core main files. But for temporary/working or from external system, a file that is a line seq. & relative in the same time, so for example , you can read the record back, can be useful. Baruch

Hi 1. open file i-o. (if output, open f output, close f, open i-o f) 2. read main key ---> invlid msg 3. read first-alt key ----> invalid msg 4... rean n-alt key..s -----> invalid msg 5. write f-rec ----> invalid "abnormal msg". From the first read until writing the record, the record is locked...

Hi all As that said befor , in Micro Focus, any fixed line seq. file, can be tratead as a fixed ralativ file. If you open output relative file & see the dump, You can see that the recors end with 0D 0A, like a regular line seq. file. That is a nice idea that must be adopted to ansi cobol...