Upgrade to Pro — share decks privately, control downloads, hide ads and more …

COBOL Indexed and Relative File Processing

Avatar for Kristian Guevara Kristian Guevara
February 27, 2014
Technology
160
0

COBOL Indexed and Relative File Processing

COBOL presentation for school

Avatar for Kristian Guevara

Kristian Guevara

February 27, 2014

More Decks by Kristian Guevara

See All by Kristian Guevara
Effective Communication
Avatar for Kristian Guevara kristianguevara
1
88
Career Talk 2018
Avatar for Kristian Guevara kristianguevara
0
66
The Now and Then of Innovation
Avatar for Kristian Guevara kristianguevara
0
65
USTartup X-Accelerator Info Session - SY1617 2nd Sem
Avatar for Kristian Guevara kristianguevara
0
55
PHP Back-end Development
Avatar for Kristian Guevara kristianguevara
0
84
AngularJS Workshop
Avatar for Kristian Guevara kristianguevara
0
91
The New Era Of Javascript
Avatar for Kristian Guevara kristianguevara
0
160
Lightning's, Tornado’s and Tsunami’s
Avatar for Kristian Guevara kristianguevara
0
74
Introduction to ASP.NET MVC
Avatar for Kristian Guevara kristianguevara
0
98

Other Decks in Technology

See All in Technology
グローバル基準のSREは、運用現場でどう機能したか：成熟度アセスメントの実践 ／ SRE NEXT 2026
Avatar for sorawatanabe sorawatanabe
0
140
Redmine 7.0 新機能・機能強化解説（OSC2026京都ダイジェスト版）
Avatar for MAEDA Go vividtone
1
210
Agent 時代の Kaggle 展望 / kaggle-in-the-agentic-era
Avatar for Shotaro Ishihara upura
1
680
FORENSIA: ローカルLLMフォレンジックハーネス
Avatar for S.Nakano sumeshi
2
350
関東Kaggler会発表資料
Avatar for takoi takoi
1
200
Breaking the Seal: Static Deobfuscation of Compiled V8 JavaScript Bytecode Malware
Avatar for hasherezade hshrzd
0
670
モノリス Rails でも日中に rails db:migrate を走らせたい！ / Daytime rails db:migrate on Monolithic Rails!
Avatar for Shintani Teppei euglena1215
4
550
Bill One 開発エンジニア 紹介資料
Avatar for Sansan, Inc. sansan33
PRO
7
19k
【CEDEC2026】『GRANBLUE FANTASY: Relink - Endless Ragnarok』のバトル制作事例 ～最高のキャラゲーを目指して～
Avatar for Cygames, Inc. cygames
PRO
0
230
Master Dataグループ紹介資料
Avatar for Sansan, Inc. sansan33
PRO
1
4.8k
Invisible to AI? Making TYPO3 Sites Quotable by AI Search Systems
Avatar for Wolfgang Wagner wolfgangwagner
0
170
制約理論（ToC）入門　2026版
Avatar for Recruit recruitengineers
PRO
7
2.1k

Featured

See All Featured
Stop Working from a Prison Cell
Avatar for Chris Michel hatefulcrawdad
274
21k
So, you think you're a good person
Avatar for Per Axbom axbom
PRO
2
2.1k
Easily Structure & Communicate Ideas using Wireframe
Avatar for Afnizar Nur Ghifari afnizarnur
194
17k
<Decoding/> the Language of Devs - We Love SEO 2024
Avatar for Nikki Halliwell nikkihalliwell
1
280
The SEO Collaboration Effect
Avatar for Kristina Bergwall kristinabergwall1
1
520
Java REST API Framework Comparison - PWX 2021
Avatar for Matt Raible mraible
34
9.6k
The Art of Delivering Value - GDevCon NA Keynote
Avatar for David Neal reverentgeek
16
2.1k
Digital Ethics as a Driver of Design Innovation
Avatar for Per Axbom axbom
PRO
1
360
Self-Hosted WebAssembly Runtime for Runtime-Neutral Checkpoint/Restore in Edge–Cloud Continuum
Avatar for Yuki Nakata chikuwait chikuwait
0
690
Between Models and Reality
Avatar for mayunak mayunak
4
390
YesSQL, Process and Tooling at Scale
Avatar for Rocio Delgado rocio
174
15k
Building Better People: How to give real-time feedback that sticks.
Avatar for Will Jessup wjessup
370
20k

Transcript

  1. None

  2. RECAP

  3. None

  4. “I have a number as proof of my queue!” http://www.gmanetwork.com/news/photo/36789/new-graduates-line-up-for-jobs-at-moa-fair

    http://www.qtechqueueingsystem.com/queue-management-solutions/standing-queue-number-display.html

  5. “Last one to hit the finish line is a rotten

    egg!” http://conservationalabama.files.wordpress.com/2012/05/finish-line.jpg

  6. Who cares? I’m going to follow whoever goes first! http://3.bp.blogspot.com/_IkXqWJY2snc/SPsoRCcpMzI/AAAAAAAAAAc/OEumjLVacvc/s400/delhi+metro.jpg

  7. Going back to the train scenario

  8. None
  9. None
  10. None

  11. Note: It’s in the working-storage section denoted as: 01 VideoStatus

    Pic X(2).
  12. None
  13. None
  14. None
  15. None
  16. None
  17. None

  18. Let’s say Rel-Key would be from 0 - 1008 Add

    1 to get relative record number from 1 to 1009, enough positions for 1000- record file

  19. Accessing Files Randomly

  20. None

  21. Sample program coming up next

  22. None