MAGDSTA5 ;WOIFO/PMK - Q/R Retrieve of DICOM images from PACS to VistA ; Oct 05, 2022@16:17:37
Source file <MAGDSTA5.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MAIN() | ; The main loop for the program for Radiology
; Input Variables ; SCANMODE ;-- "PATIENT", "DATE", or "NUMBER" ; DIRECTION ;- 1="ASCENDING" or 0="DESCENDING" ; BATCHSIZE ;- number of consult & procedure requests to process on this run ; BEGDATE ;--- begin date for search ; ENDDATE ;-- end date for search ; QRSCP ;----- default query/retrieve provider ; HOURS ;----- 24 character string of Y's and N's indicating active times |
|
| RADLKUP() | ; Find the next study to retrieve
|
|
| PATIENT() | ; use ^RARPT "C" xref to find studies for a single patient
; ^RARPT("C",DFN,RARPT1)="" |
|
| DATE() | ; use ^RADPT "AR" xref to find studies by exam date
; ^RADPT("AR",EXAMDATE,RADFN,RADTI)="" |
|
| NUMBER() | ; use ^RARPT ien
; ^RARPT(RARPT1,... |
|
| RADLKUP1(RARPT1) | ; lookup one radiology exam
|
|
| RADTI(RADTI) | ; convert a reverse date to a FM date and vice versa
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
