INSTALLATIONS DATA FILE EXCHANGE

Document Type: 
Document Number (FOIA) /ESDN (CREST): 
CIA-RDP94T00858R000601420001-6
Release Decision: 
RIPPUB
Original Classification: 
T
Document Page Count: 
12
Document Creation Date: 
December 28, 2016
Document Release Date: 
March 12, 2008
Sequence Number: 
1
Case Number: 
Publication Date: 
April 13, 1983
Content Type: 
REPORT
File: 
AttachmentSize
PDF icon CIA-RDP94T00858R000601420001-6.pdf269.1 KB
Body: 
Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 TOP SECRET NDS OPERATIONS PROCEDURE MANUAL APPLICATIONS SOFTWARE NO. P-IO04 13 April 1983 SYMBOLIC TITLE: IDFEX PROGRAMMER : 25X1 TOP SECRET I "'- ' Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 TOP SECRET Program' IDFEX Date' ' i2' June 1981 APPROVALS This operations manual has been reviewed and approved by the following persons: L e TOP SECRET Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 _...e.-_. , _., M. + Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 ;EX'. TOP SECRET. COAT Nrs Pass SUMMARY OPERATIONAL FLOWCHART COMPUTER RUN PREPARATION PUNCHED CARD INPUT MAGNETIC TAPE OUTPUT OUTPUT TAPE FORMAT NORMAL RUN INSTRUCTIONS (EXAMPLES) ABNORMAL RUN INSTRUCTIONS TOP SECRET. -- Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 TOP SECRET ProgTaJfl * IDFFEX Date '12 June 1981 The IDFEX program was written to replace the IDF Exchange programs on the Univac 494 computer. This program will extract all the updated data (transactions) to the IDF, sort the data, eliminate all the duplications, and create a tape. The output data format and record types are in the document Installations Data File Magnetic Tape Format, April 198 This information is sent 25X1 ? to other users in the Intelligence Community. (Currently CIA/OSR and DIA/MIA are our only users). There is a file called XAU*IDFHIS-FILE which cgntains a copy of all the com- pacted TIF records. The TIF-Compaction program, which is run five times a day prior to INTERMAIN, has code in it to transfer the compacted TIF records to the XAU*IDFHIS-FILE. The XAU*IDFHIS-FILE is sized to hold 20,000 records. The code in the TIF-Compaction checks to see how full the file is and begins putting out.a message as to when to run the IDFHIS/IDFEX program. When the IDFHIS/IDFEX program is run, the XAU*IDFHIS-FILE is sorted on MRN, RECORD-TYPE and DATABASE KEY and all duplicate entries are deleted. The data is then written to tape. This tape is copied on the requestor tape and sent to the requestor. IDFEX provides the capability for the user to specify what type of data is to be extracted. 'MI' and 'KH', 'Aircraft' or both types of data may be selected by the user. There are eight IDF records that the user can specify: TGT-HDR,. TGT-COLL, TGT-GEN-REF, TGT-STA-DES, TGT-DEF-SEC, TGT-OB, TGT-PHOT, and TGT-PRFL. These must be specified. This program can be restarted. Once it has successfully terminated, pointers in the XAU*IDFHIS-FILE are reset to the beginning of the file. The IDFEX program is coded in ASCII COBOL and uses DMS for file processing. TOP SECRET Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 _- r U1 Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 4 6 L 5 Program IDFEX Date' 12 June 1981 TIF Compaction XAU IDFHIS- FILE 'NDS.`13. (SY$) IDFEX' tul Option Card/File .. Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 Fx 1 . "& R - 0 I"U EXs 3'(T411 60,f 1MAPYAD#XAU 2:&SY11sD PRINTS 3.aDELETE.C XAU*C-IDF=X. 4aASC9UP XAU*C-IDFEX. 5: e@SYMSD PRINTS 6:aADU XAU*WSRUN.ICrFkiUSFS 1$E9 TPCS. 1:aE;SE C-IDFEx.,XAL*t-IDFFX. 4: a9RKPT PRINTS'C-IDFEX 10:r?ASG,AX SOUPCFEILE. 11 aCOPY.S SOURCEFILE.I) EXsTP:%. 12:aFRFE SOURCEFILE. 13: aASStA NfS*PRODSCHEMA. 14:aADMLP?ZE TPF%.IIDFEX.TPFS.IDFEX 15:8ACO8 ES TPFS.I C'EX.TPQS.IDcEX 1. &AS(.AX RELFILE. 17'BCOPY.R TPFS..REL:IL_. 1R:o1PA(K RELrILE. 10: aFRFE RELFILE. 2O:88RKPT PRINTS ?114SY!1,O PRINTS 2?:@FI1V END ONSITE FPINTOUT ON JLL1 2Q. 1981 AT 15:":I7 XAiU*P5RUN( 1).IDFEX#COMMP-ALt( 0 1 SECRET Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 SECRET Proiram ' IDFEX Date ''12 June 1981 CGIPUTER RUN PREPARATION PUNCHED CARD INPUT Type: Identification: Format: ,+,YYYyYYYY Y 3 00 00 0106001011001680000100100000000000090101100116100011000100100000000 H 1 2 2 4 5 6 1 8 1111112121415111111112121n232421262129213811 32 25 51 55 36 31 21 5IN41 42 12 4443 46 47 41 41 51 51 52 52 54 55$6S151Sl Nili2UNi5ii17Yp oil 7273 74 15 76 17 1 71 11 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 N = numeral A = letter X = any legitimate character in card code Field Column RESTART-OPTION = 'Y' * 1 TGT-HDR = 'Y' 3 TGT-COLL = 'Y' 4 TGT-GEN-REF = 'Y' 5 TGT-STA-DES = 'Y' 6 TGT-DEF-SEC = 'Y' 7 TGT-OB = 'Y' 8 TGT-PHOT = 'Y' 9 TGT-PRFL = 'Y' 10 PROCESS-OPTION = 'N' 13 DATA-TYPE = 1, 2, 3 16 *OTHERWISE FIELD LEFT BLANK" I Ur Z = optional character (letter of numeral) $ = plus - = minus S = special character Comments Indicates program to be restarted All TGT-HDR records to be processed All TGT-COLL records to be processed All TGT-GEN-REF records to be processed All TGT-STA-DES records to be processed All TGT-DEF-SEC records to be processed All TGT-OB records to be processed All TGT-PHOT records to be processed All TGT-PRFL records to be processed Data is to be processed without the mass storage file or input. Range must be specified , 1 = only Aircraft data to be processed 2 only MI and KH data to be processed 3 = all data-is to be processed Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 lip L1il t I Program IDFEX Date 12 June 1981 MAGNETIC TAPE OUTPUT Contents and Description of Tape Data Unit Standard Tape Label: 'NDS 13 (SYS) IDFEX' (to be inserted by programmer) Label Block File Name: Mode: PASC Code: Record and Block Size: 240 characters/record 50 records/block File Sequence: Sequential Source Component: Disposition: Retention Period: Restrictions: Quantity: TOP SECRET , I 4...__....~..._~ Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 __. Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 Program IDFEX Date 12 June 1981 See the Installations Data File-Magnetic Tape Format, April 1981, lOP SECkL Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 - )1.URUI Program IDFEX Date 12 June 1981 NORMAL RUN INSTRUCTIONS Initiation: ST XAU*P$RUN.IDFEX/XQT for Option J. Monitor: Message Cause Operator Action Operator, enter output real Program requires tape number Enter tape number number of this run EX*01234 (See next page for example of console message) were input to the sort were output to the sort were duplicate records and not processed' records put in the IDFHISTEX from the sort Sort is not complete Task is not complete Statistics from Sort Rou- None tine of the IDFHISTEX Task Statistics from the IDFHISTEX Program None Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 )LLhLI Program IDFEX Date 12 June 1981 ABNORMAL RUN INSTRUCTIONS Messages: Message No control card in run deck for this run Invalid range on input card Range on input card not numeric Fatal data base error Record was Key was Error-Status = Data base key for was bad Error status = Min was Record-Type = Program continues Error on impact Error on open for retrieval No IDFHISTEX Tape Reel number was not a numeric entry Pls Reenter Cause' User did not insert a control card in runstream End-range was greater then beginning range Range on input card not a numeric ending A fatal database error Invalid data base key DMS error occured while imparting DMS error occured while opening Program error trying to read write to output tape Operator entered an illegal output reel number iwi Operator Action Insert the control card following the @XQT state- ment, restart runstream Correct range on control card and restart runstream Correct range on control card and restart runstream Notify CSD Notify CSD Notify CSD Restart run, if error occurs again notify CSD Restart run, if error occurs again notify CSD Notify CSD Enter correctly Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6 Program IDFEX Date '12 June 1981 ABNORMAL RUN INSTRUCTIONS (Continued) MESSAGE CAUSE OPERATOR ACTION Reel number was spaces Operator entered spaces or Enter correctly Please Reenter zeros for output reel number Unable to locate a TGT-HDR Program error Notify CSD Record with min Invalid key on Read Program error Notify CSD Invalid key on Write Program error Notify CSD Error sort counts not equal Program error Notify CSD Sort in = Sort out = Illegal data base key for Data base error Notify CSD; save printed output for CSD rep. Error Status = MRN number was Record type was Processing continues Error/Fault: Approved For Release 2008/03/12 : CIA-RDP94T00858R000601420001-6