做cobol中间变量溯源的时候发现很多中间变量没在主程序初期化然后直接赋值给别人怎么办

IDENTIFICATION DIVISION.
*
PROGRAM-ID.  SECADD.
*
ENVIRONMENT DIVISION.
*
DATA DIVISION.
*
WORKING-STORAGE SECTION.
*
01  SWITCHES.
*
05  VALID-DATA-SW          PIC X(01)     VALUE ‘Y’.
88 VALID-DATA                        VALUE ‘Y’.
05   END-OF-ACCID-SW        PIC X   VALUE ‘N’.
88 END-OF-ACCID               VALUE ‘Y’.
*
01  FLAGS.
*
05  DISPLAY-FLAG        PIC X(01).
88  DISPLAY-NEW-ECINFO          VALUE ‘1′.
88  DISPLAY-SPACES                VALUE ‘2′.
88  DISPLAY-LOW-VALUES            VALUE ‘3′.

PROCEDURE DIVISION.
if  wk-flag=1    //wk-flag没有初期化  直接拿来判断，能不能是从其他地方来的呢**  ，会不会各个cobol程序间存在类似公用的变量的部分，比           如像java的section
...
endif

if wk-flag=2
....
end if
``

//还有时候比如spa-workday  属于一个copy里面的，然后也没有发现对spa-workday赋值，直接给其他中间变量传值，为什么
move spa-workday  to  work-day

![在这里插入图片描述](https://img-blog.csdnimg.cn/f651ca3d5b4c475b9065131694d3139e.png?x-oss-process=image/watermark,type_d3F5LXplbmhlaQ,shadow_50,text_Q1NETiBA5pmT5pet5aSn5Yab,size_20,color_FFFFFF,t_70,g_se,x_16#pic_center)