Index: vhUnitTest/APPS/VKP/Commissie/impl/CommissieService/Test.cls.xml =================================================================== diff -u -r34586 -r35755 --- vhUnitTest/APPS/VKP/Commissie/impl/CommissieService/Test.cls.xml (.../Test.cls.xml) (revision 34586) +++ vhUnitTest/APPS/VKP/Commissie/impl/CommissieService/Test.cls.xml (.../Test.cls.xml) (revision 35755) @@ -307,9 +307,6 @@ set ^KFA("F",..#CommissieID1,"U323296",105)="703100 \74100\1\\\51.87\21#0\0\51.87\51.87\703100 \L\25.10.02 RAAMORDER\\200\51.87\KF6\\\\E1\EUR\\\03/10\=\\KOM\\\\65.7\41.361357\51.87\\" set ^KFA("F",..#CommissieID1,"U323296",106)="703100 \74200\1\\\53.27\21#0\0\53.27\53.27\703100 \L\12.12.02 RAAMORDER\\300\53.27\KF6\\\\E1\EUR\\\03/10\=\\KOM\\\\67.45\42.479295\53.27\\" - set $piece(^KVE(2003.03,..#CommissieID1),"\",4)=ConsumentNr - set ^KVE.Index("P",..#CommissieID1)=2003.03 - do ..ZetVoldaan(..#CommissieID1,$$INTDATE^vhLib.DataTypes("06.04.03")) set ^KFA("F",..#CommissieID2,0,0)=ConsumentNr_"\C\06.04.03\1\EUR\06.03.03\105.14\103.04\0.00\0.00\0.00\105.14\2.1\105.14\\1\0#0.00\\\\\\\\\\" @@ -327,9 +324,6 @@ set ^KFA("F",..#CommissieID2,"U323296",104)="\\\1009#1037#59219,53454\156720 - 19.02.03 - 1020470 403001926\\\\\\\\\\100\\KF5\\\\\\\\\" set ^KFA("F",..#CommissieID2,"U323296",105)="703100 \74100\1\\\51.87\21#0\0\51.87\51.87\703100 \L\25.10.02 RAAMORDER\\200\51.87\KF6\\\\E1\EUR\\\03/10\=\\KOM\\\\65.7\41.361357\51.87\\" set ^KFA("F",..#CommissieID2,"U323296",106)="703100 \74200\1\\\53.27\21#0\0\53.27\53.27\703100 \L\12.12.02 RAAMORDER\\300\53.27\KF6\\\\E1\EUR\\\03/10\=\\KOM\\\\67.45\42.479295\53.27\\" - - set $piece(^KVE(2003.03,..#CommissieID2),"\",4)=ConsumentNr - set ^KVE.Index("P",..#CommissieID2)=2003.03 do ..ZetVoldaan(..#CommissieID2,$$INTDATE^vhLib.DataTypes("06.04.03")) @@ -348,9 +342,6 @@ set ^KFA("F",..#ReedsVerstuurdeCommissieID,"U323296",104)="\\\1009#1037#59219,53454\156720 - 19.02.03 - 1020470 403001926\\\\\\\\\\100\\KF5\\\\\\\\\" set ^KFA("F",..#ReedsVerstuurdeCommissieID,"U323296",105)="703100 \74100\1\\\51.87\21#0\0\51.87\51.87\703100 \L\25.10.02 RAAMORDER\\200\51.87\KF6\\\\E1\EUR\\\03/10\=\\KOM\\\\65.7\41.361357\51.87\\" set ^KFA("F",..#ReedsVerstuurdeCommissieID,"U323296",106)="703100 \74200\1\\\53.27\21#0\0\53.27\53.27\703100 \L\12.12.02 RAAMORDER\\300\53.27\KF6\\\\E1\EUR\\\03/10\=\\KOM\\\\67.45\42.479295\53.27\\" - - set $piece(^KVE(2003.03,..#ReedsVerstuurdeCommissieID),"\",4)=ConsumentNr - set ^KVE.Index("P",..#ReedsVerstuurdeCommissieID)=2003.03 do ..ZetVoldaan(..#ReedsVerstuurdeCommissieID,$$INTDATE^vhLib.DataTypes("06.04.03")) ]]>