·            ·            ·       קטע הבא לפני תת-תוכנית זו     ·    PROGRAM_B והכולל גם את התת-תוכנית     ·        B  שכתב מתכנת               ·            ·          procedure PROGRMER_A; (*A תת תוכנית הנכתבת ע"י מתכנת *) begin    X:=0;    for I:=1 to 10 do    begin       PROGRAMER_B; (*B קריאה לתת תוכנית הנכתבת ע"י תכנת *)       X:=X+1;    end; (*סיום הלולאה*) end; (*סיום תת התוכנית*)      ·           ·      קטע הבא אחרי תת-תוכנית זו    ·

תוך כדי הפיתוח של תת תוכנית B,משתמש מתכנת B במשתנים שעוזרים לפתרון האלגוריתם. אסור לו לשנות תוכן משתנים X וֹ- I שמא יפגע בתכנת A,שאינו יודע בדיוק את כל הפרטים הקשורים בפיתוח של תת תוכנית אחרת.  

בדוגמא היו שני מתכנתים אך מה קורא כאשר יש מאה מתכנתים?

כעת,נראה כיצד התאום הופך מיותר ולכן כל תת תוכנית הופכת להיות כמעט כמו תוכנית נפרדת שאינה קשורה גם בשמות המשתנים שכתבו מתכנתים אחרים.

את הבעיה שנוצרה בדוגמא הקודמת נוכל לפתור ע"י הגדרה מחודשת של שמות הנתונים בכל תת תוכנית חדשה.

לדוגמא:

procedure PROGREAMER_B (U:integer;V,M:real;var X:char;Y:boolean); {תת תוכנית הנכתבת ע"י מתכנת אחר}     var    I:integer; (*משתנה מקומי לצורך עניין פנימי,שמתחיל את ערכו*)                (*בתת תוכנית זו *)        J:real; begin    ·           ·      הוראות תת-תוכנית זו    ·        end;   (********התוכנית הראשית***********) begin    ·                      ·          חלק מהוראות התוכנית הראשית    ·           PROGRAMER_B(A,V,B,C,Y); (קריאה לתת תוכנית**)    ·                      ·          חלק מהוראות התוכנית הראשית    ·        end.

המשתנים שהוגדרו מייד לאחר הגדרת שם תת התוכנית (באותה השורה),הם משתנים שאליהם מעבירים ערכים לצורך השימוש בתוכנם תוך כדי ביצוע התת תוכנית.

A-->U V-->V  תוכן המשתנים עובר למשתנים המקומיים בתת התוכנית  B-->W C-->X Y-->Y

X בתת התוכנית הוגדר בהמשך ל- var ולכן שינוי ערכו בתת התוכנית ישנה את תוכן C.

לפנינו הכללים הקשורים במשתנים מקומיים ובהעברת ערכים:

*  המשתנים המוגדרים בסוגריים הם המשתנים אליהם מועבר ערך.

המשתנים שהוגדרו בתת התוכנית הם משתנים מקומיים.משתנים אלו יעלמו עם סיום תת התוכנית,ולא ישאר מהם זכר!

אולם,אם לפניהם רשום var,שינוי בתוכנם ישנה את הערך שהמשתנה שהעביר להם את הערך.

כלומר,שינוי ב-Y ישנה את תוכן Z.

*  בין הגדרות סוגי משתנים שונים בתת התוכנית יופיעו נקודה-פסיק.

;(procedure NAME (I:integer ; X:raeal

*  חייבת להיות התאמה מלאה ביו סוגי המשתנים המקבלים את הערך והמעבירים את הערך.

כלומר Aו-X, מוגדר ממשי. Z ו-Y מוגדר שלם.

*   אם נשתמש במשתנה שלא הוגדר בתת התוכנית,ההתייחסות תהיה למשתנה שהוגדר לאחר כותרת התוכנית. אלו הם משתנים כלליים.

שימו ! אם הוגדר משתנה מקומי באותו שם (X) של משתנה כללי, אזי התת-תוכנית  מתייחסת למשתנה המקומי (שהוגדר בתת-תוכנית).

אי אפשר להגדיר סוג משתנה בין הסוגריים בכותרת תת התוכנית שהוא יותר ממילה אחת (כלומר: char, boolean,integer,real).

דוגמאות ליישום הכללים

דוגמא להדגמת פעולות משתנים מקומיים ללא משתנים מועברים: