prehistory
เจเฉฑเจ เจฎเฉเจกเฉเจเจฒ เจธเฉฐเจธเจฅเจพ เจจเฉ Orthanc PACS เจธเจฐเจตเจฐเจพเจ เจ เจคเฉ Radiant DICOM เจเจฒเจพเจเฉฐเจ 'เจคเฉ เจเจงเจพเจฐเจฟเจค เจนเฉฑเจฒ เจฒเจพเจเฉ เจเฉเจคเฉเฅค เจธเฉเฉฑเจเจ เฉฑเจช เจฆเฉ เจฆเฉเจฐเจพเจจ, เจธเจพเจจเฉเฉฐ เจชเจคเจพ เจฒเฉฑเจเจพ เจนเฉ เจเจฟ เจนเจฐเฉเจ DICOM เจเจฒเจพเจเฉฐเจ เจฆเจพ PACS เจธเจฐเจตเจฐเจพเจ เจตเจฟเฉฑเจ เจตเจฐเจฃเจจ เจเฉเจคเจพ เจเจพเจฃเจพ เจเจพเจนเฉเจฆเจพ เจนเฉ:
- เจเจฒเจพเจเฉฐเจ เจฆเจพ เจจเจพเจฎ
- AE เจจเจพเจฎ (เจ เจจเฉเจเจพ เจนเฉเจฃเจพ เจเจพเจนเฉเจฆเจพ เจนเฉ)
- เจเฉฑเจ TCP เจชเฉเจฐเจ เจเฉ เจเจฒเจพเจเฉฐเจ เจธเจพเจเจก 'เจคเฉ เจเจชเจฃเฉ เจเจช เจเฉเฉฑเจฒเฉเจนเจฆเจพ เจนเฉ เจ เจคเฉ PACS เจธเจฐเจตเจฐ เจคเฉเจ DICOM เจธเจฐเจตเฉเจเจฃ เจชเฉเจฐเจพเจชเจค เจเจฐเจฆเจพ เจนเฉ (เจ เจฐเจฅเจพเจค, เจธเจฐเจตเจฐ เจเจนเจจเจพเจ เจจเฉเฉฐ เจเจฒเจพเจเฉฐเจ เจตเฉฑเจฒ เจงเฉฑเจเจฆเจพ เจนเฉ - เจชเจนเจฟเจฒเจพเจ เจเฉเจจเฉเจเจธเจผเจจ เจธเจผเฉเจฐเฉ เจเจฐเจจเจพ)
- IP เจเจกเจฐเฉเฉฑเจธ
เจฐเฉเจกเฉเจเจเจ เจธเฉเจ เจ เจช เจเจฐเจจ เจคเฉเจ เจฌเจพเจ เจฆ, เจเจฒเจพเจเฉฐเจเจธ เจจเฉเฉฐ เจตเจฟเจเจพเจฐ เจฒเจ เจนเฉเจ เจพเจ เจฆเจฟเฉฑเจคเฉ เจญเฉเจเจจ เจชเฉเจฐเจพเจชเจค เจนเฉเจ: เจนเจฐเฉเจ เจเจฒเจพเจเฉฐเจ เจฒเจ, เจเจชเจฐเฉเจเจค เจฎเจพเจชเจฆเฉฐเจกเจพเจ เจฆเฉ เจจเจพเจฒ เจธเฉเจซเจเจตเฉเจ เจฐ เจธเจฅเจพเจชเจค เจเจฐเจจ เจฆเฉ เจจเจคเฉเจเฉ เจตเจเฉเจ เจซเจพเจเจฒ เจญเจฐเฉ เจเจ pacs.xml, เจเฉ เจเจฟ เจเจชเจญเฉเจเจคเจพ เจชเฉเจฐเฉเจซเจพเจเจฒ เจตเจฟเฉฑเจ เจธเจฅเจฟเจค เจธเฉ (เจชเจพเจฅ: %APPDATA%RadiantViewerpacs.xml). เจเจธเฉ เจธเจฎเฉเจ, เจเฉฑเจ เจเจฒเจพเจเฉฐเจ เจฆเฉ เจธเฉฐเจฐเจเจจเจพ เจเฉฑเจเฉ-เจเฉฑเจ เจฆเฉ เจชเฉเจฐเจพเจฎเฉเจเจฐเจพเจ เจตเจฟเฉฑเจ เจฆเฉเจเฉ เจคเฉเจ เจตเฉฑเจเจฐเฉ เจนเฉเฉฐเจฆเฉ เจนเฉ (AE เจจเจพเจฎ เจนเจฐ เจเจฟเจธเฉ เจฒเจ เจตเฉฑเจเจฐเจพ เจนเฉเฉฐเจฆเจพ เจนเฉ, เจ เจคเฉ เจชเฉเจฐเจ เจฎเฉเจฒ เจฐเฉเจช เจตเจฟเฉฑเจ เจเฉฑเจเฉ เจเจฟเจนเฉ เจนเฉเฉฐเจฆเฉ เจนเฉ, เจเฉฑเจเฉ เจธเจฐเจตเจฐ 'เจคเฉ เจเฉฑเจฒ เจฐเจนเฉ เจเจฐเจฎเฉเจจเจฒ เจเจฒเจพเจเฉฐเจเจพเจ เจจเฉเฉฐ เจเฉฑเจก เจเฉ - เจเฉฑเจฅเฉ เจชเฉเจฐเจเจพเจ เจตเฉ เจธเจจเฅค เจตเฉฑเจเจฐเจพ เจจเจฟเจฐเจงเจพเจฐเจค เจเฉเจคเจพ เจเจพเจฃเจพ เจนเฉ)เฅค
เจฆเฉเจเจฐเจพ เจเจฆเจพเจนเจฐเจจ pacs.xml เจซเจพเจเจฒ
เจฒเจเจญเจ เจเฉ เจฎเจนเฉเจจเจฟเจเจ เจคเฉฑเจ เจธเจญ เจเฉเจ เจ เฉเจ เจฐเจฟเจนเจพ, เจธเจฟเจธเจเจฎ เจจเฉ เจเฉฐเจฎ เจเจฐเจจเจพ เจธเจผเฉเจฐเฉ เจเจฐ เจฆเจฟเฉฑเจคเจพ ... เจ เจคเฉ เจซเจฟเจฐ เจเจน เจธเจพเจกเฉ เจเฉเจฒ เจเจเจ "เจชเจพเจฃเฉ เจฆเฉ เจ เฉฐเจฆเจฐ เจชเฉฑเจฅเจฐ"
- เจธเจพเจจเฉเฉฐ เจเจ เจจเจตเฉเจ PACS เจธเจฐเจตเจฐเจพเจ เจจเฉเฉฐ เจธเฉฐเจเจพเจฒเจฟเจค เจเจฐเจจ เจฆเฉ เจฒเฉเฉ เจนเฉ เจเฉ เจชเฉเจฐเจพเจฃเฉ (เจเจฟเฉฑเจฅเฉ เจกเจฟเจธเจ เจธเจชเฉเจธ เจเจคเจฎ เจนเฉเจฃ เจฒเฉฑเจเฉ เจนเฉ) เจจเฉเฉฐ เจฌเจฆเจฒ เจฆเฉเจฃเจเฉเฅค เจตเจฐเจเฉเจ เจฒ เจฎเจธเจผเฉเจจเจพเจ เจตเจฟเฉฑเจ PACS เจธเจฐเจตเจฐ, เจชเจฐ เจเจน เจเจน เจจเจนเฉเจ เจนเฉ เจเจฟเจธ เจฌเจพเจฐเฉ เจ เจธเฉเจ เจเฉฑเจฒ เจเจฐ เจฐเจนเฉ เจนเจพเจ;
- เจธเจพเจจเฉเฉฐ 200 เจฎเจธเจผเฉเจจเจพเจ (เจเจจเฉเจนเจพเจ เจฆเฉ เจเจฟเจฃเจคเฉ เจฒเจเจพเจคเจพเจฐ เจตเจง เจฐเจนเฉ เจธเฉ) 'เจคเฉ เจเจฟเจธเฉ เจคเจฐเฉเจนเจพเจ เจเฉเจเจฆเจฐเฉ เจคเฉเจฐ 'เจคเฉ เจตเจฟเจฒเฉฑเจเจฃ เจธเฉฐเจฐเจเจจเจพเจตเจพเจ (เจฆเฉ เจตเฉฑเจ-เจตเฉฑเจ เจฎเจพเจชเจฆเฉฐเจกเจพเจ เจฆเฉ เจจเจพเจฒ) เจฌเจฆเจฒเจฃ เจฆเฉ เจฒเฉเฉ เจนเฉ;
- เจธเจฐเจตเฉเจเจฃ เจตเจพเจฒเฉเจ เจฎเจพเจ เจฆเฉ เจตเจฟเจเจพเจธ เจฆเจฐ เจจเฉเฉฐ เจงเจฟเจเจจ เจตเจฟเฉฑเจ เจฐเฉฑเจเจฆเฉ เจนเฉเจ, เจเฉฑเจ เจนเฉฑเจฒ เจฆเฉ เจฒเฉเฉ เจนเฉ เจธเจฟเจฐเจซเจผ เจเฉฑเจ เจตเจพเจฐ เจจเจนเฉเจ, เจธเจเฉเจ เจฆเฉเจนเจฐเจพเจ เจ เจคเฉ เจจเจฟเจฏเจฎเจค เจคเฉเจฐ 'เจคเฉ (เจเจฆเจพเจนเจฐเจจ เจฒเจ, เจนเจฐ 1-3 เจฎเจนเฉเจจเจฟเจเจ เจตเจฟเฉฑเจ เจเฉฑเจ เจตเจพเจฐ)เฅค
เจนเฉฑเจฒ เจนเฉเจ เจพเจ เจฆเจฟเฉฑเจคเจพ เจเจฟเจ เจนเฉ.
เจเฉฑเจ เจธเจฎเฉฑเจธเจฟเจ เจจเฉเฉฐ เจนเฉฑเจฒ เจเจฐเจจ เจฒเจ เจธเฉฐเจฆ เจฆเฉ เจเฉเจฃ
เจชเจนเจฟเจฒเจพเจ, เจเฉเจ เจนเฉฑเจฒ เจฒเฉฑเจญเจฃ เจฆเฉ เจเฉเจธเจผเจฟเจธเจผ เจเฉเจคเฉ เจเจ เจธเฉ เจเฉ เจเจฒเจพเจเฉฐเจ เจธเจพเจเจก 'เจคเฉ pacs.xml เจซเจพเจเจฒ เจจเฉเฉฐ เจธเฉฐเจธเจผเฉเจงเจฟเจค เจเจฐเฉเจเฉ เจ เจคเฉ AE เจจเจพเจฎ เจ เจคเฉ TCP เจชเฉเจฐเจ เจธเฉเจเจฟเฉฐเจเจพเจ เจจเฉเฉฐ เจชเฉเจฐเจญเจพเจตเจฟเจค เจเฉเจคเฉ เจฌเจฟเจจเจพเจ PACS เจธเจฐเจตเจฐเจพเจ เจฆเฉ เจธเฉเจเฉ เจตเจฟเฉฑเจ เจคเจฌเจฆเฉเจฒเฉเจเจ เจเจฐเฉเจเฉเฅค เจเจธ เจธเจฎเฉเจ เจตเจฟเฉฐเจกเฉเจเจผ เจเจฒเจพเจเฉฐเจเจธ เจตเจฟเฉฐเจกเฉเจเจผ เจเจเจธเจชเฉ เจ เจคเฉ เจตเจฟเฉฐเจกเฉเจเจผ 7 เจฆเฉเจตเจพเจ 'เจคเฉ เจ เจงเจพเจฐเจค เจธเจจ - เจเจธ เจฒเจ VBScript 'เจคเฉ เจ เจงเจพเจฐเจค เจเฉเจ เจ เจเจฟเจนเจพ เจฒเจฟเจเจฃ เจฆเฉ เจเฉเจธเจผเจฟเจธเจผ เจเฉเจคเฉ เจเจ เจธเฉเฅค เจชเจฐ เจ เจซเจธเฉเจธ, เจเจธ เจญเจพเจธเจผเจพ เจตเจฟเฉฑเจ เจเฉเจ เจตเฉ เจเฉเฉฐเจเจฒเจฆเจพเจฐ เจ เจคเฉ เจเฉเฉฐเจเจฒเจฆเจพเจฐ เจฒเจฟเจเจฃ เจฆเฉ เจ เจจเฉเจญเจต เจฆเฉ เจชเฉเจฐเฉ เจเจพเจ เจเจพเจฐเจจ, เจ เจเจฟเจนเฉ เจเฉฐเจฎ เจตเจฟเฉฑเจ เจฎเฉเจนเจพเจฐเจค เจนเจพเจธเจฒ เจเจฐเจจเจพ เจธเฉฐเจญเจต เจจเจนเฉเจ เจธเฉเฅค เจฒเฉฑเจญเจฃ เจ เจคเฉ เจฆเฉเจฌเจพเจฐเจพ เจฒเจฟเจเจฃ เจฆเฉเจเจ เจเฉเจธเจผเจฟเจธเจผเจพเจ เจตเฉ เจ เจธเจซเจฒ เจฐเจนเฉเจเจ (เจเจน เจจเฉเจ เจเฉเจคเจพ เจเจพเจฃเจพ เจเจพเจนเฉเจฆเจพ เจนเฉ เจเจฟ เจฎเฉเจฐเฉ เจฆเจฟเจฎเจพเจ เจตเจฟเฉฑเจ เจชเจนเจฟเจฒเจพเจ เจนเฉ เจเฉฑเจ เจตเฉฑเจเจฐเฉ เจฏเฉเจเจจเจพ เจธเฉ, เจเจธเจฒเจ เจฎเฉเจ 3-4 เจเฉฐเจเจฟเจเจ เจคเฉเจ เจตเฉฑเจง เจธเจฎเฉเจ เจฒเจ VBScript เจจเจพเจฒ เจซเจฟเจกเจฒ เจจเจนเฉเจ เจเฉเจคเจพ)เฅค
เจ เฉฐเจค เจตเจฟเฉฑเจ เจฎเฉเจ เจนเฉเจ เจพเจ เจฆเจฟเฉฑเจคเฉ เจนเฉฑเจฒ 'เจคเฉ เจธเฉเจเจฒ เจนเฉ เจเจฟเจ:
- เจธเจฎเฉเจน เจจเฉเจคเฉ เจฆเฉ เจตเจฐเจคเฉเจ เจเจฐเจฆเฉ เจนเฉเจ, เจธเจพเจฐเฉเจเจ pacs.xml เจซเจพเจเจฒเจพเจ เจจเฉเฉฐ เจเฉฑเจ เจจเฉเฉฑเจเจตเจฐเจ เจธเจฐเฉเจค เจตเจฟเฉฑเจ เจเจฟเจธเฉ เจตเฉ เจธเจฐเจตเจฐ 'เจคเฉ เจเฉฑเจ เจฅเจพเจ เจเจเฉฑเจ เจพ เจเจฐเฉ;
- เจซเจพเจเจฒเจพเจ เจจเฉเฉฐ เจธเจฎเฉเจน เจตเจฟเฉฑเจ เจฌเจฆเจฒเฉ (เจฎเฉเจฐเฉ เจเฉเจฒ เจชเจนเจฟเจฒเจพเจ เจนเฉ เจชเจฐเจฒ เจฆเฉ เจตเจฐเจคเฉเจ เจเจฐเจเฉ เจ เจเจฟเจนเฉเจเจ เจธเจฎเฉฑเจธเจฟเจเจตเจพเจ เจจเฉเฉฐ เจนเฉฑเจฒ เจเจฐเจจ เจฆเจพ เจ เจจเฉเจญเจต เจธเฉ);
- เจเจพเจนเจ เจธเฉเจเจฟเฉฐเจเจพเจ เจจเฉเฉฐ เจ เจชเจกเฉเจ เจเจฐเจจ เจฒเจ เจธเจฎเฉเจน เจจเฉเจคเฉเจเจ เจฆเฉ เจตเจฐเจคเฉเจ เจตเฉ เจเจฐเฉเฅค
เจเจฐเฉเฉฑเจช เจชเจพเจฒเจฟเจธเฉ เจฆเฉ เจตเจฐเจคเฉเจ เจเจฐเจเฉ เจซเจพเจเจฒเจพเจ เจจเฉเฉฐ เจเจเฉฑเจ เจพ เจเจฐเจจเจพ
เจธเจญ เจคเฉเจ เจธเจงเจพเจฐเจจ เจเฉฑเจฒ เจเจน เจนเฉ เจเจฟ เจเจฆเฉเจ เจเฉฑเจ เจเจฒเจพเจเฉฐเจ เจเจชเจฃเฉ เจชเฉเจฐเฉเจซเจพเจเจฒ เจตเจฟเฉฑเจ เจฒเฉเจเจเจจ เจเจฐเจฆเจพ เจนเฉ, เจคเจพเจ เจเจน, เจเจชเจฃเฉ เจ เจงเจฟเจเจพเจฐเจพเจ เจจเจพเจฒ, เจเฉฑเจ เจเจพเจธ .bat เจซเจพเจเจฒ เจจเฉเฉฐ เจเจฒเจพเจเจเจฆเจพ เจนเฉ, เจเจฟเจธ เจตเจฟเฉฑเจ เจฒเจฟเจเจฟเจ เจนเฉ:
echo off
If exist %APPDATA%RadiantViewerpacs.xml copy %APPDATA%RadiantViewerpacs.xml srv.test.localpconfigs$pacs-%COMPUTERNAME%-%USERNAME%.xml
เจเจธ เจคเจฐเฉเจนเจพเจ, pacs.xml เจซเจพเจเจฒเจพเจ เจธเจฐเจตเจฐ 'เจคเฉ เจเฉฑเจ เจฒเฉเจเจตเฉเจ เจธเจฐเฉเจค เจตเจฟเฉฑเจ เจเจเฉฑเจ เฉเจเจ เจนเฉเจฃเจเฉเจเจ, เจเจฟเจธ เจฆเฉ เจจเจพเจฎ เจตเจฟเฉฑเจ เจเจน เจเจพเจฃเจเจพเจฐเฉ เจนเฉเฉฐเจฆเฉ เจนเฉ เจเจฟ เจเจน เจธเฉฐเจฐเจเจจเจพ เจเจฟเจธ เจเฉฐเจชเจฟเจเจเจฐ เจคเฉเจ เจ เจคเฉ เจเจฟเจธ เจเจชเจญเฉเจเจคเจพ เจคเฉเจ เจเจพเจชเฉ เจเฉเจคเฉ เจเจ เจธเฉเฅค
เจธเจญ เจคเฉเจ เจฎเฉเจธเจผเจเจฒ เจเฉฑเจฒ เจเจฆเฉเจ เจคเฉฑเจ เจเจกเฉเจ เจเจฐเจจเฉ เจธเฉ เจเจฆเฉเจ เจคเฉฑเจ เจเจน เจจเฉเจคเฉ เจธเจพเจฐเฉ เจเจชเจญเฉเจเจคเจพเจตเจพเจ เจฒเจ เจเฉฐเจฎ เจจเจนเฉเจ เจเจฐเจฆเฉเฅค
เจชเจฐเจฒ เจธเจเฉเจฐเจฟเจชเจ เจฆเฉ เจตเจฐเจคเฉเจ เจเจฐเจเฉ เจธเฉฐเจฐเจเจจเจพเจตเจพเจ เจจเฉเฉฐ เจฌเจฆเจฒเจฃเจพ
เจธเจพเจจเฉเฉฐ เจฒเฉเฉ เจชเจตเฉเจเฉ
เจธเจเฉเจฐเจฟเจชเจ เจเจชเจฃเฉ เจเจช เจตเจฟเฉฑเจ เจเจพเจซเจผเฉ เจธเจฐเจฒ เจจเจฟเจเจฒเฉ:
use XML::Writer;
# ะัะบััะฒะฐะตะผ ะฟะฐะฟะบั ั ะพััะตัะฐะผะธ, ะพะฑัะฐะฑะฐััะฒะฐะตะผ ััะฟะธัะพะบ (ัะดะฐะปัะตะผ ะปะธัะฝะตะต):
$report_dir = "C:Perl64WORKPACS-xml3";
opendir(DIR, "$report_dir") or die "ะะต ะผะพะณั ะพัะบัััั ะฟะฐะฟะบั ั ะพััะตัะฐะผะธ!";
@report_files = readdir DIR;
shift (@report_files); # ัะดะฐะปัะตะผ ัะพัะบั ะธะท ัะปะตะผะตะฝัะพะฒ ะผะฐััะธะฒะฐ (.)
shift (@report_files); # ัะดะฐะปัะตะผ ะดะฒะต ัะพัะบะธ ะธะท ัะปะตะผะตะฝัะพะฒ ะผะฐััะธะฒะฐ (..)
# print "@report_files";
closedir(DIR);
# ะะฐัะธะฝะฐะตะผ ะพะฑัะฐะฑะฐััะฒะฐัั ัะฐะนะปั - ะฟะพ ะพะดะฝะพะผั ะทะฐ ัะฐะท. ะัะถะฝะพ ััะธัะฐัั ะฟะฐัะฐะผะตัั AET ะธ ะฝะพะผะตั ะฟะพััะฐ ะฒ ะฟะตัะตะผะตะฝะฝัะต.
foreach $analiz_file (@report_files)
{
$full_path_to_file="C:Perl64WORKPACS-xml3".$analiz_file;
open (INFO, $full_path_to_file);
while ($line = <INFO>)
{
# ะะตัะตะผะตะฝะฝัะต $aet ะธ $port ัะพะดะตัะถะฐั ัะฝะธะบะฐะปัะฝัะต ะดะฐะฝะฝัะต ะดะปั ะบะฐะถะดะพะณะพ XML ัะฐะนะปะฐ:
my ($other1, $aet, $other2, $port, $other3) = split /"/, $line, 5;
# ะัะปะธ ะฒัััะตัะฐะตััั ัััะพะบะฐ listener - ัะพ ะผั ะดะพัะปะธ ะดะพ ะฝัะถะฝะพะน ัััะพัะบะธ ะธ ะผะพะถะฝะพ ัะพัะผะธัะพะฒะฐัั ะฝะพะฒัะน XML:
if ($other1 =~ 'listener')
{
# ะคะพัะผะธััะตะผ ะฝะพะฒัะน XML c ะฝัะถะฝัะผะธ ะฟะพะปัะผะธ ะธ ะดะฐะฝะฝัะผะธ:
my $writer = XML::Writer->new(OUTPUT => 'self', DATA_MODE => 1, DATA_INDENT => 2, );
$writer->xmlDecl('utf-8');
$writer->startTag('pacs');
$writer->startTag('listener', ae => $aet, port => $port);
$writer->endTag();
$writer->startTag('hosts');
$writer->startTag('host', name => 'MRT', ae => 'ORTHANC', ip => 'XX.YY.214.17', ts => '1.2.840.10008.1.2.1', port => '4242', maxassoc => '1', allpres => '0', search => '1', protocol => '1', searchcharset => '', wildcards => '3', carets => '0');
$writer->endTag();
$writer->startTag('host', name => 'KT', ae => 'ORTHANC2', ip => 'XX.YY.215.253', ts => '1.2.840.10008.1.2.1', port => '4242', maxassoc => '1', allpres => '0', search => '1', protocol => '1', searchcharset => '', wildcards => '3', carets => '0');
$writer->endTag();
$writer->startTag('host', name => 'R', ae => 'ORTHANC3', ip => 'XX.YY.215.252', ts => '1.2.840.10008.1.2.1', port => '4242', maxassoc => '1', allpres => '0', search => '1', protocol => '1', searchcharset => '', wildcards => '3', carets => '0');
$writer->endTag();
$writer->startTag('host', name => 'KT-20180501-20180831', ae => 'ORTHANC4', ip => 'XX.YY.215.251', ts => '1.2.840.10008.1.2.1', port => '4242', maxassoc => '1', allpres => '0', search => '1', protocol => '1', searchcharset => '', wildcards => '3', carets => '0');
$writer->endTag();
$writer->startTag('host', name => 'KT-20180901-20181130', ae => 'ORTHANC5', ip => 'XX.YY.215.250', ts => '1.2.840.10008.1.2.1', port => '4242', maxassoc => '1', allpres => '0', search => '1', protocol => '1', searchcharset => '', wildcards => '3', carets => '0');
$writer->endTag();
$writer->endTag('hosts');
$writer->startTag('presets');
$writer->endTag();
$writer->startTag('lastsearch', dt => '4', mfid => '1048592');
$writer->endTag();
$writer->endTag('pacs');
# ะะพะผะตัะฐะตะผ ะณะพัะพะฒัะน XML ะฒ ะฟะตัะตะผะตะฝะฝัั:
my $xml = $writer->end();
# ะะพะดะณะพัะฐะฒะปะธะฒะฐะตะผ ัะฐะนะป ะดะปั ะฟะตัะตะทะฐะฟะธัะธ:
$rewritexml = $full_path_to_file;
# ะะตัะตะฟะธััะฒะฐะตะผ XML ัะฐะนะปั ะฝะพะฒัะผะธ ะดะฐะฝะฝัะผะธ:
open (NEWXML, ">$rewritexml");
print NEWXML $xml;
close (NEWXML);
}
}
}
เจเจธ เจฆเฉ เจเฉฐเจฎ เจฆเฉ เจธเจฟเจงเจพเจเจค:
- เจ เจธเฉเจ เจเจน เจกเจพเจเจฐเฉเจเจเจฐเฉ เจเฉเจฒเฉเจนเจฆเฉ เจนเจพเจ เจเจฟเจธ เจตเจฟเฉฑเจ เจ เจธเฉเจ เจเจพเจนเจเจพเจ เจคเฉเจ pacs.xml เจธเฉฐเจฐเจเจจเจพเจตเจพเจ เจจเฉเฉฐ เจเจเฉฑเจ เจพ เจเฉเจคเจพ เจนเฉ เจ เจคเฉ เจซเจพเจเจฒเจพเจ เจฆเฉ เจธเฉเจเฉ เจจเฉเฉฐ เจธเจเฉเจฒเจฐเจพเจ (@report_files) เจฆเฉ เจเฉฑเจ เจเจฐเฉ เจตเจฟเฉฑเจ เจฐเฉฑเจเจฆเฉ เจนเจพเจ;
- เจเฉฑเจ เจฒเฉเจช เจตเจฟเฉฑเจ, เจ เจธเฉเจ เจเฉฑเจ เจธเจฎเฉเจ เจตเจฟเฉฑเจ เจเฉฑเจ เจซเจพเจเจฒ เจฆเฉ เจชเฉเจฐเจเจฟเจฐเจฟเจ เจเจฐเจฆเฉ เจนเจพเจ เจ เจคเฉ เจเจธเจจเฉเฉฐ เจฒเจพเจเจจ เจฆเจฐ เจฒเจพเจเจจ เจชเฉเฉเจนเจฆเฉ เจนเจพเจ;
- เจธเจชเจฒเจฟเจ เจฆเฉ เจตเจฐเจคเฉเจ เจเจฐเจฆเฉ เจนเฉเจ, เจ เจธเฉเจ เจนเจฐเฉเจ เจฒเจพเจเจจ เจจเฉเฉฐ 5 เจญเจพเจเจพเจ เจตเจฟเฉฑเจ เจตเฉฐเจกเจฆเฉ เจนเจพเจ, เจเฉฑเจ เจตเจฟเจญเจพเจเจ เจตเจเฉเจ เจเฉเจเจธ เจฆเฉ เจตเจฐเจคเฉเจ เจเจฐเจฆเฉ เจนเฉเจ;
- เจ เจธเฉเจ เจธเจผเจฌเจฆ เจธเฉเจฃเจจ เจตเจพเจฒเฉ เจฆเฉ เจจเจพเจฒ เจเฉฑเจ เจฒเจพเจเจจ เจฒเฉฑเจญเจฆเฉ เจนเจพเจ เจ เจคเฉ เจนเจฐเฉเจ เจซเจพเจเจฒ (AE เจเจฒเจพเจเฉฐเจ เจจเจพเจฎ เจ เจคเฉ TCP เจชเฉเจฐเจ เจจเฉฐเจฌเจฐ) เจฒเจ เจตเจฟเจฒเฉฑเจเจฃ เจกเฉเจเจพ เจจเฉเฉฐ เจฆเฉ เจตเฉเจฐเฉเจเจฌเจฒเจพเจ เจตเจฟเฉฑเจ เจฐเฉฑเจเจฆเฉ เจนเจพเจ;
- เจเจธ เจคเฉเจ เจฌเจพเจ เจฆ, เจ เจธเฉเจ เจฌเจธ เจเฉฑเจ เจจเจตเฉเจ XML เจซเจพเจเจฒ เจคเจฟเจเจฐ เจเจฐเจฆเฉ เจนเจพเจ, เจเจธ เจตเจฟเฉฑเจ เจตเจฟเจฒเฉฑเจเจฃ เจชเฉเจฐเจพเจฎเฉเจเจฐ เจฆเจพเจเจฒ เจเจฐเจฆเฉ เจนเจพเจ เจ เจคเฉ เจซเจฟเจฐ เจเจนเจจเจพเจ เจฆเฉ เจชเฉเจฐเจพเจฎเฉเจเจฐเจพเจ เจฆเฉ เจจเจพเจฒ เจฒเฉเฉเฉเจเจฆเฉ PACS เจธเจฐเจตเจฐเจพเจ เจจเฉเฉฐ เจธเจผเจพเจฎเจฒ เจเจฐเจฆเฉ เจนเจพเจ - เจเจน. เจเจน เจธเจญ เจเจฟเจธ เจฒเจ เจธเจผเฉเจฐเฉ เจนเฉเจเจ)
- เจ เจธเฉเจ เจจเจตเฉเจ XML เจซเจพเจเจฒ เจจเฉเฉฐ เจชเฉเจฐเจพเจฃเฉ เจฆเฉ เจเฉฑเจชเจฐ เจฆเฉเจฌเจพเจฐเจพ เจฒเจฟเจเจฆเฉ เจนเจพเจเฅค
เจเจน เจจเฉเจ เจเฉเจคเจพ เจเจพเจฃเจพ เจเจพเจนเฉเจฆเจพ เจนเฉ เจเจฟ เจ เจธเจฒ เจตเจฟเฉฑเจ, เจฎเฉเจ เจเจธ เจธเจเฉเจฐเจฟเจชเจ เจจเฉเฉฐ เจชเฉเจฐเฉ เจคเจฐเฉเจนเจพเจ เจเจชเจฃเฉ เจเจช เจจเจนเฉเจ เจตเจฐเจคเจฆเจพ - เจ เจธเจฒ เจตเจฟเฉฑเจ, เจฎเฉเจ เจเฉฑเจ เจตเฉฑเจเจฐเฉ เจกเจพเจเจฐเฉเจเจเจฐเฉ เจตเจฟเฉฑเจ เจเจเฉฑเจ เฉ เจเฉเจคเฉ เจธเฉฐเจฐเจเจจเจพ เจฆเฉ เจจเจเจฒ เจเจฐเจฆเจพ เจนเจพเจ เจ เจคเฉ เจซเจฟเจฐ เจธเจเฉเจฐเจฟเจชเจ เจจเฉเฉฐ เจเจฒเจพเจเจเจฆเจพ เจนเจพเจ เจ เจคเฉ เจเจนเจจเจพเจ เจจเฉเฉฐ เจธเจฎเฉเจน เจตเจฟเฉฑเจ เจฌเจฆเจฒเจฆเจพ เจนเจพเจ. เจ เฉฑเจเฉ, เจเฉฑเจ เจฌเฉเจคเจฐเจคเฉเจฌ เจเจพเจเจ - เจ เจคเฉ เจธเฉฐเจฐเจเจจเจพ เจจเฉเฉฐ เจฎเจธเจผเฉเจจเจพเจ เจตเจฟเฉฑเจ เจตเจพเจชเจธ เจตเฉฐเจกเจฟเจ เจเจพ เจธเจเจฆเจพ เจนเฉเฅค
เจธเฉเจงเฉเจเจ pacs.xml เจซเจพเจเจฒเจพเจ เจจเฉเฉฐ เจเจพเจนเจเจพเจ เจจเฉเฉฐ เจตเฉฐเจกเจฃเจพ
เจธเจญ เจคเฉเจ เจธเจฐเจฒ เจเฉเจเจผ เจเฉ เจฎเจจ เจตเจฟเฉฑเจ เจเจ เจเจน เจชเจนเจฟเจฒเจพเจ เจคเฉเจ เจเฉฐเจฎ เจเจฐ เจฐเจนเฉ .bat เจซเจพเจเจฒ เจตเจฟเฉฑเจ เจฌเจฆเจฒเจพเจ เจเจฐเจจเจพ เจธเฉ เจเฉ เจเจฒเจพเจเฉฐเจเจธ เจคเฉเจ เจธเฉฐเจฐเจเจจเจพ เจเจเฉฑเจ เฉ เจเจฐเจฆเฉ เจนเฉ เจ เจคเฉ เจฒเจพเจเจจ เจเฉเฉเจฆเฉ เจนเฉ:
If exist %APPDATA%RadiantViewerpacs.xml copy /Y srv.test.localpconfigsnew$pacs-%COMPUTERNAME%-%USERNAME%.xml %APPDATA%RadiantViewerpacs.xml
เจ เฉฐเจคเจฎ .bat เจซเจพเจเจฒ เจเจธ เจคเจฐเฉเจนเจพเจ เจฆเจฟเจเจพเจ เจฆเจฟเฉฐเจฆเฉ เจนเฉ:
@echo off
If exist %APPDATA%RadiantViewerpacs.xml copy %APPDATA%RadiantViewerpacs.xml srv.test.localpconfigs$pacs-%COMPUTERNAME%-%USERNAME%.xml
If exist %APPDATA%RadiantViewerpacs.xml copy /Y srv.test.localpconfigsnew$pacs-%COMPUTERNAME%-%USERNAME%.xml %APPDATA%RadiantViewerpacs.xml
เจธเจฟเฉฑเจเจพ
เจเจน เจเจธ เจคเจฐเฉเจนเจพเจ เจนเฉ "เจเฉเจกเจพ" เจฆเจพ เจนเฉฑเจฒ. เจ
เจธเฉเจ เจเจธเจจเฉเฉฐ เจชเจนเจฟเจฒเจพเจ เจนเฉ เจฆเฉ เจตเจพเจฐ เจ
เจเจผเจฎเจพ เจเฉเฉฑเจเฉ เจนเจพเจ (เจธเจคเฉฐเจฌเจฐ 2018 เจ
เจคเฉ เจซเจฐเจตเจฐเฉ 2019 เจตเจฟเฉฑเจ), เจนเฉเจฃ เจคเฉฑเจ เจซเจฒเจพเจเจ เจเจฎ เจตเจพเจเจ เจนเฉเฅค เจฌเฉเจธเจผเฉฑเจ, 100% เจเจพเจนเจ เจ
เจชเจกเฉเจ เจจเจนเฉเจ เจเจฐเจฆเฉ, เจชเจฐ เจเจน เจเจธ เจฎเฉเฉฑเจฒ เจฆเฉ เจจเฉเฉเฉ เจนเฉ - เจ
เจธเฉเจ เจฌเจพเจเฉ เจจเฉเฉฐ เจฐเจฟเจฎเฉเจเจฒเฉ เจชเฉเจฐเจพ เจเจฐเจฆเฉ เจนเจพเจ. เจฆเฉเจเจฐเจพ เจธเจเฉเจฐเจฟเจชเจ
เจธเจฐเฉเจค: www.habr.com