Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: RAKRDIT

Package: Radiology Nuclear Medicine

Routine: RAKRDIT


Information

RAKRDIT ;Hines OI/GJC-pass exam info within a date range, to PCE

Source Information

Source file <RAKRDIT.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ;DBIA 3445 read from file 42
IMGLOC
DATE1
DATE2
QUEUED ;begin checking for uncredited exams...
EXAMS
KILL ; kill local variables, clean up partition
ELIG(RAY3) ;Is this record eligible to be credited? If so, the CLINIC
CREDITM(RADFN,RADTI,RACNI) ;Change the CREDIT METHOD (DD: 70.03, fld: 26)
XAMSET(RADFN,RADTI) ; change CREDIT METHOD from No Credit to Regular Credit

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?2,"Select an Imaging Location from the IMAGING LOCATIONS (#79.1)"
  • Line Location: IMGLOC+0
Function Call: WRITE
  • Prompt: !?2,"file that is active, receives regular credit, and has a valid"
  • Line Location: IMGLOC+1
Function Call: WRITE
  • Prompt: !?2,"DSS ID.",!
  • Line Location: IMGLOC+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE2+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(42 - [#42] GET1^DIQ
^RA(79.1 - [#79.1] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call