Yoel Kortick
Version 18
The addition of ISBN fields to orders created via service
Generic Vendor Records Loader (file-96)
The program for the service file-96 does an internal check on the ISBN or ISSN and if it is valid then the ISBN or ISSN is added to the order. If the ISBN or ISSN is not valid then it is not added to the order.
We will check and display this in the following manner:
We have three records with the following fields (among other fields):
000060143 020 L $$a9780822588399 (pbk. : alk. paper)
000060143 1001 L $$aAnderson, Sheila
000060143 24510 L $$aLibrary /$$cby Sheila Anderson.
000060143 980 L $$e50
000060144 020 L $$a0914061917
000060144 1001 L $$aAkey, Stephen,$$d1955-
000060144 24510 L $$aLibrary /$$cStephen Akey.
000060144 980 L $$e60
000060145 020 L $$a1234567890
000060145 1001 L $$aSmith, Tom,
000060145 24510 L $$aLibrary.
000060145 980 L $$e70
Record numbers 000060143 and 000060144 have valid ISBN fields (10 digit and 13 digit)
Record number 000060145 has an invalid ISBN.
For these three records we make an input file in $alephe_scratch called “a”:
il-aleph02-18(1) USM01-YOELK>cat $alephe_scratch/a
000060143USM01
000060144USM01
000060145USM01
We will want to make a MARC format file from these three records, such that we will have a file which can then be uploaded via file-96. This way we will be able to check how file-96 behaves with these three types of ISBN fields.
To do this we run print_03 on this file and export records to MARC format.
The parameters for print_03 would be
Input file = a
Output file = b
Field 1 = ALL
Format = MARC
Now we have a file “b” in $data_scratch which may be uploaded via file-96, solely for the purpose of seeing what happens with the ISBN fields.
Here we upload the file using tab_96_def as the “Default Values Input File”.
We view the log file and see that three new orders were created:
il-aleph02-18(1) USM01-YOELK>cd $alephe_scratch
il-aleph02-18(1) USM01-YOELK>grep "New Z68 created" usm01_p_file_96.00027
Note : New Z68 created - order no: 51543
Note : New Z68 created - order no: 51544
Note : New Z68 created - order no: 51545
We will now view the orders.
We see that the service worked correctly.
The orders for record numbers 000060143 and 000060144 have ISBN fields because the ISBN is valid.
The order for record number 000060145 does not have an ISBN field because the ISBN is not valid.
Internal Note:
il-aleph02-18(1) USM01-YOELK>cd $alephm_source/butil
il-aleph02-18(1) USM01-YOELK>grep check_is b_file_96_a.cbl
CALL "check_isbn" USING
CALL "check_issn" USING
il-aleph02-18(1) USM01-YOELK>cd $alephm_source/check_record
il-aleph02-18(1) USM01-YOELK>more check_util.c