![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to DINZMGR.m CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Coherent Logic Development] / freem_fileman / USER|
Return to DINZMGR.m CVS log | Up to [Coherent Logic Development] / freem_fileman / USER |
| version 1.1, 2025/04/28 14:13:21 | version 1.2, 2025/04/28 19:23:48 |
|---|---|
| Line 111 ZOSF S DIR("A",1)="Do you want me to set | Line 111 ZOSF S DIR("A",1)="Do you want me to set |
| ;D ^DINZGTM | ;D ^DINZGTM |
| Q | Q |
| 9 ;FreeM | 9 ;FreeM |
| ;S %S="DINVFRM" D MOVE | S %S="DINVFRM" D MOVE |
| ;D ^DINZFRM | D ^DINZFRM |
| Q | Q |
| MOVE F %=1:1:$L(%D,U) S X=$P(%S,U,%),Y=$P(%D,U,%) I X]"",Y]"" W !,"Loading ",X X "ZL @X ZS @Y" W ?20,"Saved as ",Y | MOVE F %=1:1:$L(%D,U) S X=$P(%S,U,%),Y=$P(%D,U,%) I X]"",Y]"" W !,"Loading ",X X "ZL @X ZS @Y" W ?20,"Saved as ",Y |
| K %S,%D | K %S,%D |