Index: cI60.mac.rou =================================================================== diff -u -r734 -r4204 --- cI60.mac.rou (.../cI60.mac.rou) (revision 734) +++ cI60.mac.rou (.../cI60.mac.rou) (revision 4204) @@ -1,13 +1,13 @@ cI60 ;UITG. VERWIJDEREN KL ;GO NAAR %I61,[ 12/08/92 6:28 PM ] G 1 ; -T1 \UL\F\1\\S COM="NOG "_$P(@("^"_QQ_UGL_"(0,US,""UDUO"")"),D)_" VOOR DEZE KLANT" -T2 \UL\F\\106\S COM="KLANT NOG ALS FAKTURATIEADRES OP "_$P(@("^"_QQ_UGL_"(0,US,""UDUO"")"),D,2)_" "_UR -T3 \KL\\\220\S COM="KLANT GEDEFINIEERD ALS FAKTURATIEADRES BIJ KLANT "_$P(UR," ",2) -T4 \PWT\\\\S COM="KLANT HEEFT NOG TOESTEL(LEN)"\ -T5 \PWM\\\\S COM="KLANT HEEFT NOG MACHINE(S)"\ -T6 \PWH\\\\S COM="KLANT HEEFT NOG HEFTRUCK(S)"\ -T7 KL;;10\UL;F;59\UL;R;60\OD;F;58\OD;T;64\PWT;;105 +T1 ;\UL\F\1\\S COM="NOG "_$P(@("^"_QQ_UGL_"(0,US,""UDUO"")"),D)_" VOOR DEZE KLANT" +T2 ;\UL\F\\106\S COM="KLANT NOG ALS FAKTURATIEADRES OP "_$P(@("^"_QQ_UGL_"(0,US,""UDUO"")"),D,2)_" "_UR +T3 ;\KL\\\220\S COM="KLANT GEDEFINIEERD ALS FAKTURATIEADRES BIJ KLANT "_$P(UR," ",2) +T4 ;\PWT\\\\S COM="KLANT HEEFT NOG TOESTEL(LEN)"\ +T5 ;\PWM\\\\S COM="KLANT HEEFT NOG MACHINE(S)"\ +T6 ;\PWH\\\\S COM="KLANT HEEFT NOG HEFTRUCK(S)"\ +T7 ;KL;;10\UL;F;59\UL;R;60\OD;F;58\OD;T;64\PWT;;105 ; ; VERKOOPKANT 1 S R="K\22\3\OPGELET DE GLOBAL ^WAV WORDT VERWIJDERD\""[] = ok -[] = einde""\1" D ^cA100 G YZ:$L(K) K ^WAV