情報処理の魅力・威力（３９）

ｄBASE�VPLUSとは

情報処理化された史料集の目次

写真（１）

写真（１）は、情報処理化された史料集の目次です。

詳細はなんでも相談室（１１）をご覧下さい

情報処理によって印刷された史料

（精細写真４万２３１０バイトがご覧になれます）

写真（２）

写真（２）は、情報処理によって印刷された史料です。 （１）写真（１）の目次の「k001」を入力します。印刷の指示をパソコンにすると、自動的に印刷されます。 （２）古代・中世５７８、近世５２７、近代・現代５２８の計１６３３編あり、コード番号の入力で自由に扱えます。 （３）分業・協業という方法を採用すると、手間と時間の節約が可能です。

***SIRYO.PRG***史料検索システム(BY ARIMASA) SET TALK OFF SET STATUS OFF CLEAR STORE "1-NFL " TO MNFL @ 2,10 SAY "新しく作成したファイル名を入力してください（例k001）" GET MNFL READ USE &MNFL INDEX ON BG TO MNDX STORE .T. TO LOOP1 DO WHILE LOOP1 STORE SPACE(12) TO MSCODE CLEAR @ 1,5 SAY "RECORD( )" @ 1,23 SAY "【史料番号】" @ 2,0 SAY "【出展】 " @ 3,0 SAY "【見出】 " @ 4,1 SAY "━━━━━━━━━ 史料 ━━━━━━━━━━━━━━━" @ 5,1 SAY "1 ; " @ 6,1 SAY "2 ; " @ 7,1 SAY "3 ; " @ 8,1 SAY "4 ; " @ 9,1 SAY "5 ; " @ 10,1 SAY "6 ; " @ 11,1 SAY "7 ; " @ 12,1 SAY "8 ; " @ 13,1 SAY "9 ; " @ 14,1 SAY "A ; " @ 15,1 SAY "B ; " @ 16,1 SAY "C ; " @ 17,1 SAY "D ; " @ 18,1 SAY "E ; " @ 19,1 SAY "F ; " @ 20,1 SAY "G ; " @ 23,10 SAY "**終了はQ**" DO WHILE MSCODE=SPACE(12) @ 1,50 GET MSCODE READ ENDDO IF SUBSTR(MSCODE,1,1)="Q" .OR. SUBSTR(MSCODE,1,1)="Ｑ" RETURN

参考資料（１）

参考資料（１）は、写真（２）のｄBASE�VPLUS上のプログラムです。 （１）「@ 1,4 SAY "出典　＝　" GET ST」の「@ 1,4」は、１行目の４列目という意味です。 （２）「SAY "出典　＝　" GET ST」の「SAY "出典　＝　"」は””の中も文字を表示する。「GET ST」は出典を取り込むという意味です。 （３）「@1,40 SAY "史料番号" GET BG」の「"史料番号" GET BG」は、史料番号（例k001）を入力すると言う意味です。 （４）つまり、史料番号を入力すると、自動的に出典や見出や史料が画面上に表示されるということです。

情報処理化されたセンターテスト用小テストの作成例

（精細写真２万３３７０バイトがご覧になれます）

写真（３）

写真（３）は、情報処理化されたセンターテスト用小テストの作成例です。 （１）センターテスト用の小テスト問題は、６７００問あります。 （２）コード番号を任意に入力すれば、ありとあらゆる変化に富んだ小テスト問題が作成できます。 参考資料（小テスト用問題６７００問より） 1001：ペリーを派遣して，日本に開国を要求したアメリカ第13代大統領（在任1850〜53）は誰か。 1002：16世紀中頃から19世紀にかけて来航した欧米船の通称を何というか。 1003：853年長崎に来航し，条約締結を要求したロシア極東艦隊司令長官は誰か。 1004：1853年，徳川斉昭が任じられた海防問題を担当する幕政参与を何というか。 1005：1854年，応接係林緯（大学頭）とペリーが神奈川近くの横浜村で調印した条約を何というか。 1006：1854年日米和親条約の締結で開港された伊豆半島南端の港を何というか。 1007：外国において自国の通商促進や自国人の援助を行う職を何というか。 1008：アメリカとの条約が締結されたあと、プゥチャーチンと江戸幕府とで、条約が締結された。この条約を何というか。 1009：ペリー来航以後，幕政の責任者として外交方針を指示した備後福山藩主は誰か。 1010：ペリー来航以後，外交に関し積極的に意見を上申した伊予宇和島藩主は誰か。

詳細はなんでも相談室（１２）をご覧下さい

進路用の情報処理画面

写真（４）

写真（４）は、進路用の情報処理画面です。

ｄBASE�VPLUS上のプログラム

*****進路指導資料作成システムメニュ*****(BY ARIMASA) Ｐ１（模擬試験成績入力） 　 �@USE NYUSI1 INDEX ON CODE TO CODE1 INDEX ON TOT TO TOT INDEX ON CODE+TOT TO CODE1TOT INDEX ON KYOU TO KYOU Ｐ２（推薦用面接者名簿作成） �@USE NYUSI2 INDEX ON CODE TO CODE2 �AUSE SCODE INDEX ON SCODE TO SCODE �BUSE GABCODE INDEX ON GABCODE TO GABCODE �CUSE GAKCODE INDEX ON GAKCODE TO GAKCODE Ｐ３（受験校入力） �@USE NYUSI3 INDEX ON CODE TO CODE3 �AUSE SCODE INDEX ON SCODE TO SCODE �BUSE GABCODE INDEX ON GABCODE TO GABCODE �CUSE GAKCODE INDEX ON GAKCODE TO GAKCODE Ｐ４（進路委員会資料等の作成） 　Ｐ４−１（模擬試験成績一覧表） �@USE NYUSI1 INDEX ON CODE TO CODE1 INDEX ON TOT TO TOT INDEX ON CODE+TOT TO CODE1TOT 　Ｐ４−２（成績志望校個人票） �@USE NYUSI1 INDEX ON CODE TO CODE1 INDEX ON TOT TO TOT INDEX ON CODE+TOT TO CODE1TOT �AUSE NYUSI2 INDEX ON CODE TO CODE2 　Ｐ４−３（受験校一覧表）　　　　　→なし 　Ｐ４−４（進路指導委員会資料） �@USE NYUSI1 INDEX ON CODE TO CODE1 INDEX ON TOT TO TOT INDEX ON KYOU TO KYOU �AUSE NYUSI2 INDEX ON CODE TO CODE2 　Ｐ４−５（志望校別一覧表） �@USE NYUSI1 INDEX ON CODE TO CODE1 �AUSE NYUSI2 INDEX ON CODE TO CODE2 �BUSE NYUSI5 INDEX ON CODE TO CODE5 Ｐ５（追跡調査） �@USE NYUSI1 INDEX ON CODE TO CODE1 �AUSE NYUSI3 INDEX ON CODE TO CODE3 �BUSE NYUSI4 INDEX ON CODE TO CODE4 INDEX ON SCODE TO SCODE4 �CUSE NAME INDEX ON CODE TO CODEN �DUSE NYUSI5 INDEX ON CODE TO CODE5 　Ｐ５−１（追跡調査関係ー合否） Ｐ６（コードの修正・登録・削除） �@USE SCODE INDEX ON SCODE TO SCODE �AUSE GABCODE INDEX ON GABCODE TO GABCODE �BUSE GAKCODE INDEX ON GAKCODE TO GAKCODE �CUSE NYUSI2 INDEX ON CODE TO CODE2 �DUSE NYUSI3 INDEX ON CODE TO CODE3 Ｐ７（連続入力ユーティリティ） 　Ｐ７−１（国・私） �@USE NYUSI1 INDEX ON CODE TO CODE1 �AUSE NYUSI2 INDEX ON CODE TO CODE2 　Ｐ７−２（文・理） �@USE NYUSI1 INDEX ON CODE TO CODE1 �AUSE NYUSI2 INDEX ON CODE TO CODE2 　Ｐ７−３（評定平均値） �@USE NYUSI1 INDEX ON CODE TO CODE1 　Ｐ７−４（一次試験自己採点得点）ーKYOUJ,M,E,S,R �@USE NYUSI1 INDEX ON CODE TO CODE1 INDEX ON KYOU TO KYOU Ｐ７ー５ WITH DORE（６月進研（マ）成績） �@USE NYUSI1 INDEX ON CODE TO CODE1 　Ｐ７−５ WITH DORE（７月進研（記）成績） 　Ｐ７−５ WITH DORE（１０月進研（マ）成績） 　Ｐ７−５ WITH DORE（１０月進研（記）成績） 　Ｐ７−９（大学名・学部名・学科名の登録） �@USE SCODE INDEX ON SCODE TO SCODE �AUSE GABCODE INDEX ON GABCODE TO GABCODE �BUSE GAKCODE INDEX ON GAKCODE TO GAKCODE �CUSE NYUSI2 INDEX ON CODE TO CODE2 　Ｐ７−０（中学コードの入力） �@USE NYUSI1 INDEX ON CODE TO CODE1 　Ｐ７−Ａ（旺文社コードの入力）　　　　　→なし Ｐ８（名前の追加・訂正） �@USE NYUSI1 INDEX ON CODE TO CODE1 INDEX ON TOT TO TOT INDEX ON CODE+TOT TO CODE1TOT 　　　INDEX ON KYOU TO KYOU �AUSE NYUSI2 INDEX ON CODE TO CODE2 �BUSE NYUSI3 INDEX ON CODE TO CODE3 �CUSE NAME INDEX ON CODE TO CODEN Ｐ９（バックアップ・年度始めの初期化） 　Ｐ９−１（ハードディスクの初期化） �@USE NYUSI1 INDEX ON CODE TO CODE1 INDEX ON TOT TO TOT INDEX ON CODE+TOT TO CODE1TOT 　　　INDEX ON KYOU TO KYOU �AUSE NYUSI2 INDEX ON CODE TO CODE2 �BUSE NYUSI3 INDEX ON CODE TO CODE3 �CUSE NYUSI4 INDEX ON CODE TO CODE4 �DUSE NAME INDEX ON CODE TO CODEN 　Ｐ９−２（ハードディスクからフロッピディスクへのバックアップ） 　Ｐ９−３（フロッピーディスクからハードディスクへの復旧） 　Ｐ９−４（諸定数の設定） �@USE NYUSI1 INDEX ON CODE TO CODE1 INDEX ON TOT TO TOT INDEX ON CODE+TOT TO CODE1TOT 　　　INDEX ON KYOU TO KYOU �AUSE NYUSI2 INDEX ON CODE TO CODE2 �BUSE NYUSI3 INDEX ON CODE TO CODE3 �CUSE NAME INDEX ON CODE TO CODEN 　Ｐ９−５（名前の入力） �@USE NYUSI1 INDEX ON CODE TO CODE1 �AUSE NYUSI2 INDEX ON CODE TO CODE2 �BUSE NYUSI3 INDEX ON CODE TO CODE3 �CUSE NAME INDEX ON CODE TO CODEN 　Ｐ９−６（性別の入力） �@USE NAME INDEX ON CODE TO CODEN 　Ｐ９−７（ＢＡＳＩＣからの名前・性別の転送）→なし ＰＳ（システム定数の設定） ＰＡ（ユーティリティー） 　ＰＡ−１（模擬試験データのマークカード入力） 　ＰＡ−２（模擬試験データをｄＢＡＳＥ　�V上へ転送） �@USE NYUSI1 INDEX ON CODE TO CODE1 INDEX ON TOT TO TOT INDEX ON CODE+TOT TO CODE1TOT 　　　INDEX ON KYOU TO KYOU �AUSE DAMMY INDEX ON CODE TO DAMMYNX 　ＰＡ−１ WITH DORE（共通一次データマークカード入力） 　ＰＡー４（共通一次データをｄＢＡＳＥ　�V上へ転送） �@USE NYUSI1 INDEX ON CODE TO CODE1 �AUSE DAMMY4 INDEX ON CODE TO DAMMY4NX 　ＰＡ−１ WITH DORE（志望校データのマークカード入力） 　ＰＡ−６（志望校データをｄＢＡＳＥ　�V上へ転送） �@USE NYUSI2 INDEX ON CODE TO CODE2 �AUSE DAMMY2 INDEX ON CODE TO DAMMY2NX 　ＰＡ−１ WITH DORE（受験校データをマークカード入力） ＰＡー８（受験校データをdBASE�Vに転送するプログラム） �@USE NYUSI3 INDEX ON CODE TO CODE3 �AUSE DAMMY3 INDEX ON CODE TO DAMMY3NX 　ＨＥＮＫＡＮ．ＢＡＴ（Ｎ８８−ＢＡＳＩＣデータをＭＳ−ＤＯＳに変換） 　ＰＡ−Ａ（名前（シケンシャルファイル）をｄＢＡＳＥ　�Vへ転送） �@USE NYUSI1 INDEX ON CODE TO CODE1 �AUSE NYUSI2 INDEX ON CODE TO CODE2 �BUSE NYUSI3 INDEX ON CODE TO CODE3 �CUSE NAME INDEX ON CODE TO CODEN

参考資料（２）

参考資料（２）は、写真（４）のｄBASE�VPLUS上のプログラムです。 （１）使用する側は、指示通りの番号を入力するだけで、最高に効率よく作業ができます。 （２）しかし、プログラムを作る側は膨大な知識と膨大な時間が必要です。 （３）学校では、こうしたプログラマーが各学年に１人、進路と教務に各１人いるとことが理想です。私が勤めた高校の場合、こうした環境にありました。どの先生も必死でマスターしたものです。

ｄBASE�VPLUSは最高!!

（１）ｄBASE�VPLUSはリレーショナルデータベースといいます。 （２）私の体験では、ベーシック→ｄBASE�VPLUS→Accessという歴史です。 （３）ｄBASE�VPLUSの素晴らしさを知れば、もう我慢できません。