While Browsing Internet, we have some cool option called address autocomplete. We enter some letters in the address bar and the browser auto completes it with the closest guess.

Does MAINFRAME have the same feature?

Yes! It has autocomplete feature.

How to use it?

·         Enter KEYS in the command line; KEYS window will popup

·         Set any key to AUTOTYPE, save and exit

·         Now type any Dataset partially in ISPF 3.4 and press the assigned PFkey

·         Data sets will be retrieved

Note: It will not retrieve GDGs and VSAM files.

You can see the screenshots for the above mentioned tutorial

1.       Enter Command KEYS in the command line area

2.       It will throw the popup of the  keys value definition page, for the reference I have taken PF4 key as autotype for the KEYS assignment page for ISPF main screen, so whenever I press PF4 in the ISPF screen it will retrieve the relevant Dataset details for the keyword I enter in the command line

3.       In Option 3.4 give the PDS name high level qualifier alone like below and press PF4

4.       After pressing PF4 we will get the autotype command will get works as below

5.       The autotyped things are retrieved as highlighted.

I hope these KEYStips will make use of our work more productive.

Related posts:

1. Auto Type Feature in Mainframe
2. Usage of BNDS command in Mainframe
3. Important Command Line Utilities in Windows XP

If the document closes abnormally, you can get back the file from this location. You can also set the auto recover save time by following the steps.

1. Click on the “Options” button from the File Tab

2. Click the Save Option

3. You can find the working document in the Auto Recover File Location field. Now you can tension free right .

Related posts:

1. Creating Shortcuts in word
2. Microsoft Word: MS Word Shortcut Keys
3. Changing Control Panel using Group Policy editor for Windows XP

//SYSPRINT DD SYSOUT=*                                 

//SYSOUT   DD SYSOUT=*                                 

//SORTIN   DD DISP=SHR,DSN=XXXXXXX.NONX.SAMPLE1        

//SORTOUT  DD DSN=XXXXXXX.NONX.SAMPLE2,DISP=(NEW,CATLG),

//            DCB=*.SORTIN,SPACE=(TRK,(1,2),RLSE),     

//            UNIT=TESTDA                              

//SYSIN    DD *                                        

  SORT FIELDS=(1,5,CH,A)                               

The above example sorts the input dataset on the first five characters.  The control card is explained below.

SORT FIELDS=(1,5,CH,A)  - Specifying SyncSort to sort the input dataset on the first five bytes of data in ascending order. 

1 = Starting Position in input dataset

5 = Length

CH = Format of the data on which we are performing SORT

A = Ascending

Examples –

SORT FIELDS=(1,5,A,11,25,D),FORMAT=CH

– In the above example we are trying to sort zip code on ascending order and city name on descending order.  As both the zip code and city name are of same format we are specifying the format in last.

SORT FIELDS=(1,5,A,11,25,D),FORMAT=CH,STOPAFT=100

SORT and copies only the first 100 records into output dataset

SORT FIELDS=(1,5,A,11,25,D),FORMAT=CH,SKIPREC=100

Ignores the first 100 records from input dataset

Supported data formats not limited to –

CH – Character, PD – Packed Decimal, ZD – Zoned Decimal, BI – Binary etc.,

SORT FIELDS=(1,5,A,11,25,D)

SUM FIELDS=NONE

Remove the duplicate records.  If we want to capture the duplicate records that are removed from the input dataset then mention the SUM control statement as below.

SUM FIELDS=NONE,XSUM

Note: If the input dataset is of variable block type then add 4 to the starting position.  This is required for variable length records.

Related posts:

1. Simple COPY using SYNCSORT
2. Adding records in a datasheet – windows tips & tricks

//SYSPRINT DD SYSOUT=*                                 

//SYSOUT   DD SYSOUT=*                                 

//SORTIN   DD DISP=SHR,DSN=XXXXXXX.NONX.SAMPLE1        

//SORTOUT  DD DSN=XXXXXXX.NONX.SAMPLE2,DISP=(NEW,CATLG),

//            DCB=*.SORTIN,SPACE=(TRK,(1,2),RLSE),     

//            UNIT=TESTDA                              

//SYSIN    DD *                                        

  SORT FIELDS=COPY                                     

The above example just creates a duplicate dataset with no changes.  Its just a mirror image of SORTIN DD dataset copied to SORTOUT DD dataset.  The characteristics of SORTOUT dataset remain same as SORTIN dataset as we are referencing SORTIN by pointing DCB.

Related posts:

1. Why SYSOUT DD SYSOUT=*?
2. How to write a simple REXX program?

If Not

Question:

If I want to route the SYSOUT to spool then I need to give //SYSOUT DD SYSOUT=*

The blue one denotes the DD name and what does this yellow one denotes.?

Because if I want to route SORTOUT to spool instead of a PS then we give:

//SORTOUT DD SYSOUT=*

Why we don’t write like this:

//SORTOUT DD SORTOUT=*

Answer

syntax of a jcl statement is

//ident      operation  operands

(Above is the generic syntax of a JCL statement. Identifier may be present or absent. In some JCL statements like JOB statement, identifier is mandatory. But not necessary. For example in a concatenated file scenario, first dd name(identifier is mandatory), but remaining jcl statements that show concatenated file names, do not have identifier. Similarly, IF, SET, EXEC statements may have an identifier or may not have. Both ways it is fine.)

Example

//JOBLIB    DD DSN=TEST.LOADLIB,DISP=SHR

//          DD DSN=PROD.LOADLIB,DISP=SHR

In above, there are 2 JCL statements

//JOBLIB    DD DSN=TEST.LOADLIB,DISP=SHR

And

//          DD DSN=PROD.LOADLIB,DISP=SHR

The first JCL statement has JOBLIB as identifier, DD as operation, and remaining part is full of operands. ‘DD’ refers to data definition

As you see, the second JCL statement does NOT have identifier.

In

//SYSOUT DD SYSOUT=*

Both SYSOUTs are system-defined keywords. They have meanings that were created by mainframe creators.

The first one tells JCL as to which file(actually dd name) to route, and the second SYSOUT tells as to where to route the contents of it. (‘SYSOUT’ means SYSTEM OUTPUT) …

First SYSOUT ——- which dd name

Second SYSOUT —where to route, which physical device to route to

THE SECOND SYSOUT

The second one can be coded against any dd name

Like

//SORTOUT  DD SYSOUT=M

//SYSPRINT  DD SYSOUT=*

//XYZ  DD SYSOUT=P

//FILE    DD DSN=A.B.C,DISP=(NEW,CATLG,DELETE),DCB=(…),SPACE=(….)

As you know, physical filename has a connection to logical filename  via ddname.

In above 4 examples,

I want to route the ddnames

• SORTOUT to a physical device that is identified by SYSOUT=M
• SYSPRINT to a physical device that is identified by SYSOUT=*
• XYZ to a physical device that is identified by SYSOUT=P
• FILE to a physical device that is identified by a physical file A.B.C.

THE FIRST SYSOUT

The first SYSOUT was created by creators of mainframe to send, by default, all DISPLAY statements to a ddname called SYSOUT……

We can have

//SYSOUT    DD DSN=A.B.C,DISP=(NEW,CATLG,DELETE),DCB=(…),SPACE=(….)

In this case it means we want to route all DISPLAY statements to a device that is identified by a physical file A.B.C. And this routing is done via SYSOUT.

No related posts.

Auto type logo

While Browsing Internet, we have some cool option called address autocomplete. We enter some letters in the address bar and the browser auto completes it with the closest guess.

Does MAINFRAME have the same feature?

Yes! It has autocomplete feature.

How to use it?

·         Enter KEYS in the command line; KEYS window will popup

·         Set any key to AUTOTYPE, save and exit

·         Now type any Dataset partially in ISPF 3.4 and press the assigned PFkey

·         Data sets will be retrieved

Note: It will not retrieve GDGs and VSAM files.

You can see the screenshots for the above mentioned tutorial

1.       Enter Command KEYS in the command line area

2.       It will throw the popup of the  keys value definition page, for the reference I have taken PF4 key as autotype for the KEYS assignment page for ISPF main screen, so whenever I press PF4 in the ISPF screen it will retrieve the relevant Dataset details for the keyword I enter in the command line

3.       In Option 3.4 give the PDS name high level qualifier alone like below and press PF4

4.       After pressing PF4 we will get the autotype command will get works as below

5.       The autotyped things are retrieved as highlighted.

Related posts:

1. Usage of BNDS command in Mainframe
2. Important Command Line Utilities in Windows XP
3. Remove Find and Run Options From Start Menu in your Windows XP

Coinsurance

The amount you are required to pay for medical care in a fee-for-service health plan after you have met your deductible. The coinsurance rate is usually expressed as a percentage. For example, if the health insurance company pays 80 percent of the health claim, you pay 20 percent.

Coordination of Benefits

A system to eliminate duplication of benefits when you are covered under more than one group health insurance plan. Benefits under the two health insurance plans usually are limited to no more than 100 percent of the health claim.

Co-payment

Another way of sharing medical costs. You pay a flat fee every time you receive a medical service (for example, $5 for every visit to the doctor). The health insurance company pays the rest.

Covered Expenses

Most health insurance plans, whether they are fee-for-service, HMOs, or PPOs, do not pay for all health care services. Some may not pay for prescription drugs. Others may not pay for mental health care. Covered health care services are those medical procedures the health insurer agrees to pay for. They are listed in the health insurance policy.

Customary Fee

Most health insurance plans will pay only what they call a reasonable and customary fee for a particular health care service. If your doctor charges $1,000 for a hernia repair while most doctors in your area charge only $600, you will be billed for the $400 difference. This is in addition to the deductible and coinsurance you would be expected to pay. To avoid this additional cost, ask your doctor to accept your health insurance company’s payment as full payment. Or shop around to find a doctor who will. Otherwise you will have to pay the rest yourself.

Deductible

The amount of money you must pay each year to cover your medical care expenses before your health insurance policy starts paying.

Exclusions

Specific conditions or circumstances for which the health insurance policy will not provide benefits.

HMO (Health Maintenance Organization)

Prepaid health insurance plans. You pay a monthly premium and the HMO covers your doctors’ visits, hospital stays, emergency care, surgery, checkups, lab tests, x-rays, and therapy. You must use the doctors and hospitals designated by the HMO.

Managed Care

Ways to manage costs, use, and quality of the health care system. All HMOs and PPOs, and many fee-for-service plans, have managed care.

Maximum Out-of-Pocket Expenses

The most money you will be required pay a year for deductibles and coinsurance. It is a stated dollar amount set by the health insurance company, in addition to regular premiums.

Non-cancellable Policy

A policy that guarantees you can receive health insurance, as long as you pay the premium. It is also called a guaranteed renewable policy.

PPO (Preferred Provider Organization)

A combination of traditional fee-for-service and an HMO. When you use the doctors and hospitals that are part of the PPO, you can have a larger part of your medical bills covered. You can use other doctors, but at a higher cost.

Pre-existing Condition

A health problem that existed before the date your health insurance became effective.

Premium

The amount you or your employer pays in exchange for health insurance coverage.

Primary Care Doctor

Usually your first contact for health care. This is often a family physician or internist, but some women use their gynecologist. A primary care doctor monitors your health and diagnoses and treats minor health problems, and refers you to specialists if another level of health care is needed. In many health insurance plans, health care by specialists is only paid for if your are referred by your primary care doctor. An HMO or a POS plan will provide you with a list of doctors from which you will choose your primary care doctor (usually a family physician, internists, obstetrician-gynecologist, or pedicatrician). This could mean you might have to choose a new primary care doctor if your current one does not belong to the health insurance plan. PPOs allow members to use primary care doctors outside the PPO network (at a higher cost). Indemnity plans allow any doctor to be used.

Provider

Any person (doctor, nurse, dentist) or institution (hospital or clinic) that provides medical care.

Third-Party Payer

Any payer for health care services other than you. This can be a health insurance company, an HMO, a PPO, or the Federal Government.

No related posts.

BNDS – Boundary

Here is the tutorial of how can we edit the PDS report file similar to how we manipulate in excel sheet.

People will think that they can’t edit any of the row in between their data for further processing in mainframe, but mainframe had an awesome command BNDS which makes our work simple, usually if people got this kind of task they will FTP the PDS to an excel sheet then they will make the changes and then upload it again to another PDS, but this will have some formatting issues.  Using BNDS we need not to go for any of the FTP process to get the file outside the mainframe emulator.  So please start practicing to use this super power command.

BNDS command:

The BOUND command is given in the scrolling, shift command area as given below.

The Boundary limit will be set for the data change to happen between the limits mentioned using < and >, changes will happen only in between this boundary range.

Reseting BOUND:

To remove the bounds line from the display, use the D line command or the RESET primary command.

Line Commands:

  Bounds are used with scrolling, shift line commands ( “>”, “<”, “)”, “(” ),   text line commands ( “TS”, “TF”, “TE” ) and FIND , CHANGE , EXCLUDE , and  SORT commands.

The following topics, regarding the use of boundaries with other commands,  will be presented only if selected by number:                                

1.       Shifting columns right ( “)” ).    

2.       Shifting columns left ( “(” ).     

3.       Shifting data right ( “>” ).       

4.       Shifting data left ( “<” ).        

5.       Boundaries with Text commands.    

6.       Boundaries with FIND  

7.       Boundaries with CHANGE

8.       Boundaries with EXCLUDE

9.       Boundaries with SORT                                          

10.   Boundaries with Scrolling

Operation of Boundary Commands:

When using the right shift) line command, columns are shifted within the boundaries defined on the bounds line.  That is, only data that is within the bounds is considered for shifting, and the data outside of   the bounds is never shifted.  (Note:  The bounds are always in effect, whether or not the bounds line is being displayed.  In the example below the line is displayed so that you can see where the bounds are set).

·         DATA1 is not shifted because it is outside of the current bounds.(marked in white)

·         DATA2 through DATA5 is shifted right 5 columns. (which is marked in Red)   

Related posts:

1. Important Command Line Utilities in Windows XP
2. Batch File Programming
3. Open Windows Command Prompt from vista Explorer – Windows vista Tweaks

• Start with Keyword REXX in comments
• Comments are enclosed between /* and */
• /* REXX */ in the first line of REXX Exec makes the command processor (TSO) invoke the REXX interpreter.
• ; To Separate two Instructions (optional)
• , To Continue an Instruction (optional)
• SAY and PULL are two basic commands in REXX.
• SAY – To Display the text on the Terminal
• PULL – To Accept the input from the user in upper case

REXX Routine: (save the below code in a PDS member)

/*REXX*/

SAY 'ENTER TWO NUMBERS'; PULL NUM1 NUM2

SUM = NUM1 + NUM2

SAY 'THE SUM OF THE’,

    'TWO NUMBERS IS'

SAY SUM

Execute the Routine by giving the below TSO Command

TSO EXEC <PDS NAME>(<MEMBER NAME>)

Output:

ENTER TWO NUMBERS

4 5

 THE SUM OF THE TWO NUMBERS IS

9

Note: You can expect more Mainframe related stuffs in my future blog posts'

No related posts.

Here is the Worlds Richest Person List shortened by Country. The data here reveals that US has maximum number of Billionaires followed by Germany, Russia and China. You can explore the page to know about the billionaires in your country.

• United States 359
• Germany 54
• Russia 32
• China 28
• United Kingdom 25
• India 24
• Canada 20
• Hong Kong 19
• Japan 17
• Saudi Arabia 14
• Brazil 13
• Turkey 13
• Italy 12
• Spain 12
• Argentina 11
• Australia 10
• France 10
• Israel 10
• Mexico 9
• Sweden 9
• Switzerland 9
• South Africa 7
• Malaysia 6
• United Arab Emirates 6
• Indonesia 5
• Ireland 5
• Taiwan 5
• Austria 4
• Kuwait 4
• Norway 4
• South Korea 4
• Chile 3
• Egypt 3
• Lebanon 3
• Netherlands 3
• New Zealand 3
• Thailand 3
• Ukraine 3
• Belgium 2
• Colombia 2
• Denmark 2
• Kazakhstan 2
• Nigeria 2
• Philippines 2
• Portugal 2
• Singapore 2
• Venezuela 2
• Cyprus 1
• Czech Republic 1
• Greece 1
• Iceland 1
• Monaco 1
• Poland 1
• Romania 1

Argentina

Do you know how many billionaires are there in Argentina? Its only one.

Go to Top

Australia

There are totally 10 Billionaires in Australia and they rank from 234 on wards.

Go to Top

Austria

Do you know how many Billionaires in Austria? Its 4 in the list released by forbes 2009

Go to Top .

Belgium

There are only 2 billionaires in Belgium, People who are seeking who is the billionaire in Belgium will have answer as Albert and Patokh Chodiev

Go to Top

Brazil

Brazil has 13 Billioanires.

Go to Top

Canada

There are 20 Billionaires in Canada.

Go to Top

Chile

Do you know only 4 billionaires in Chile in 2009

Go to Top

China

China’s Billionaires list is awesome. It has a total of 28 billionaires

Go to Top

Colombia

Colombia has only 2 billionaires Julio Mario Santo Domingo and Luis Carlos Sarmiento.

Go to Top

Cyprus

Cyprus has Only 1 Billionaire and his name is Mr.John Fredriksen.

Go to Top

Czech Republic

Czech Republic has only One Billionaire and his name is Petr Kellner.

Go to Top

Denmark

Billionaire in Denmark: Denmark has two Billionaires Kjeld Kirk Kristiansen and Niels Peter Louis-Hansen

Go to Top

Egypt

Top Billionaires in Egypt: Egypt has 3 attractive Billionaires as per Forbes survey.

Go to Top

France

France has 10 Billionaires in its list. Le Billionaires en français is 10

Go to Top

Germany

Germany Ranks 2 in World’s Billionaires head count, it has 54 billionaires, next to US Germany holds maximum number of Billionaires. | Deutschland auf Platz 2 in der Welt Billionaires Kopf zählen, es verfügt über 54 Milliardäre, neben den US-Deutschland hat maximale Anzahl von Billionaires.

Go to Top

Greece

Greece has only one Billionaire

Go to Top

Hong Kong

亿万富翁在香港|香港有19个亿万富翁 Billionaires in Hong Kong | Hong Kong has

Go to Top

Iceland

The Coolest Iceland has one Billionaire in its list Bjorgolfur Thor Bjorgolfsson

Go to Top

India

Top Billionaires in India | India has a Top Rated Billionaires in World, It ranks 6th in worlds billionaires race, There are over 24 Billionaires in India

Go to Top

Indonesia

Atas milyarder di Indonesia | Indonesia memiliki 5 Billionaires Michael Hartono, R Budi Hartono, Sukanto Tanoto, Maruta Sitorus, Peter Sondakh. Top Billionaire in Indonesia | Indonesia has 5 Billionaires Michael Hartono, R Budi Hartono, Sukanto Tanoto, Maruta Sitorus, Peter Sondakh.

Go to Top

Ireland

There are over 5 Billionaires in Ireland

Go to Top

Israel

The Top 10 Billionaires in Israel

Go to Top

Italy

Sai quante miliardari in Italia? L’Italia ha 12 miliardari. Do you know how many Billionaires in Italy? Italy has 12 Billionaires.

Go to Top

Japan

日本ではどのように多くの億万長者？日本には17億万長者があります How many Japan Billionaires? 17 Billionaires in Japan

Go to Top

Kazakhstan

There are 2 Billionaires in Kazakhstan.

Go to Top

Kuwait

Kuwait has 4 billionaires

Go to Top

Lebanon

The Lebanon has 3 billionaires

Go to Top

Malaysia

Do you know how many Billionaires in Malaysia ?Beautiful Malaysia has 6 Billionaires

Go to Top

Mexico

Swine Flu Famous Mexico has 9 Billionaires

Go to Top

Monaco

Lily Safra is the Only Billionaire in Monaco

Go to Top

Netherlands

Netherland has 3 Billionaires

Go to Top

New Zealand

New Zealand has 3 Billionaires

Go to Top

Nigeria

Nigeria has 2 Billionaires and their names are Aliko Dangote and Femi Otedola

Go to Top

Norway

Har youhow mange Billionaires i Norge? Beautiful Norge har 6 Billionaires Norway has 4 Billionaires

Go to Top

Philippines

Phlippines has 2 Billionaires

Go to Top

Poland

Czy youhow wielu Billionaires w Polsce? Piekna Polska posiada 1 Billionaire i jego nazwa jest Zygmunt Solorz-Zak (52) Poland has only one Billionaire and his name is Zygmunt Zolorz-Zak

Go to Top

Portugal

Do youhow muitos bilionários em Portugal? Beautiful Portugal tem 2 bilionários Portugal tem apenas 2 bilionários, Américo Amorim e José Berardo Portugal has only 2 Billionaires Americo Amorim and Jose Berardo

Go to Top

Romania

Fa-youhow multe Billionaires în România? Beautiful România are 2 Billionaires România are doar 1 Billionaires, România are un singur miliardar Dinu Patricius Romania has only one Billionaire dinu Patricius

Go to Top

Russia

Советского Союза Россия занимает 3-ее место в списке миллиардеров мирами, она занимает 32 Миллиардеры чье звание strating 22. Вот список из России Миллиардеры Soviet Union of Russia Ranks 3rd in the worlds billionaires list, It holds 32 Billionaires whose rank strating from 22. Here is the list of Russia’s Billionaires

Go to Top

Saudi Arabia

The Top Most Billionaires in Saudi Arabia are listed below

Go to Top

Singapore

Beautiful Singapore has only 2 Billionaires

Go to Top

South Africa

Safari and Jungle Famous South Africa has 3 Billionaires

Go to Top

South Korea

얼마나 많은 한국인 아니지 있는지 아세요? 한국은 4 아니지있다  Do you know how many South Koreans are Billionaires? South Korea has 4 Billionaires

Go to Top

Spain

Top 12 multimillonarios en España | España clasifica 14 en lista de multimillonarios mundos Here is the List of Top 12 Billionaires in Spain

Go to Top

Sweden

Sverige har totalt 9 miljardärer | Här är en lista över Top 9 miljardärer i Sverige. Sweden has a Total of 9 Billionaires | Here is the List of Top 9 Billionaires in Sweden.

Go to Top

Switzerland

The Beautiful Switzerland has 9 Billionaires

Go to Top

Taiwan

ไต้หวันมีจำนวน 5 Billionaires | นี่คือรายการของการ 5 Billionaires ใน Thaiwan. Taiwan has 5 Billionaires

Go to Top

Thailand

ประเทศไทยมีจำนวน 3 Billionaires | นี่คือรายการของการด้านบน 3 Billionaires ในประเทศไทย Thailand has a Total of 3 Billionaires | Here is the List of Top 3 Billionaires in Thailand.

Go to Top

Turkey

Turkey Holds 13 Billionaires and it holds 12 place in the worlds billionaires list Türkiye 12 Billionaires Toplam | Iste Türkiye Top 12 Billionaires bir listesi vardir. Türkiye 13 Billionaires alir ve bu, Dünya’nin billionaires listede 12 sirada yer

Go to Top

Ukraine

Ukraine has a Total of 4 Billionaires | Here is the List of Top 4 Billionaires in Ukraine. Ukraine Holds 4 Billionaires and it holds 36 place in the worlds billionaires list Україна має в загальній складності 4 Мільярдери | Ось список Top 4 Мільярдери в Україні. Україна проводить 4 Мільярдери і він займає 36 місце в списку мільярдерів світів

Go to Top

United Arab Emirates

United Arab Emirates Holds 6 Billionaires in its billionaire list | Here is the Richest Persons from Arabia. الامارات العربية المتحدة (العربية) 6 البليونير يعقد في قائمة الملياردير | هنا هو أغنى الأشخاص من العربية.

Go to Top

United Kingdom

United Kingdom ( England) holds 28 Billionaires in the worlds billionaires list and it secures 4 Rank.

Go to Top

United States

In the Alphabetic Order alone United States may come Last, but it is the first country in the Billionaire list which has maximum number of billionaires, there are 359 Billionaires in United States as per Forbes Survey and here are those richest persons details.