> 　　　　@rcdlines = &get_user("$Fm{'id'}");
> 　　　　@rcdlines = &get_partner("$Fm{'pd'}");
> 　　　　&get_partner("$Fm{'pd'}");

sub note_beforeの上記が原因です。
上記を、
　　@rcdlines = &get_user("$Fm{'id'}");
　　@prclines = &get_partner("$Fm{'pd'}");
に変更すれば大丈夫です。

何故問題があるのかは理解しておいたほうが良いと思います。

▼関連発言
│
└◆979:MyRecordの不具合 [ミル] 03/14 12:44
　├◆980:Re:MyRecordの不具合 [ミル] 03/14 12:58
　│└◆982:Re[2]:MyRecordの不具合 [moon] 03/14 13:08
　│　└◆983:Re[3]:MyRecordの不具合 [ミル] 03/14 14:44
　│　　└◆984:Re[4]:MyRecordの不具合 [moon] 03/14 18:45
　│　　　└◆985:Re[5]:MyRecordの不具合 [ミル] 03/15 00:27
　│　　　　└◆986:Re[6]:MyRecordの不具合 [moon] 03/15 09:01<-last
　└◆981:Re:MyRecordの不具合 [moon] 03/14 13:04