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: RAUTL23

Package: Radiology Nuclear Medicine

Routine: RAUTL23


Information

RAUTL23 ;MANTECH/CLT - LOINC FOR THE HL7 UTILITY ; 28 Oct 2016 11:13 AM

Source Information

Source file <RAUTL23.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;MAIN ENTRY POINT
MTCH ;ALREADY MATCHED NOTIFICATION
MTCH1 ;ALTERNATE ENTRY POINT
SEED ;HAS FILE 71.99 BEEN SEEDED
ONE ;EDIT MAPPING ON A SINGLE PROCEDURE
ONEQT ; quit from one
ONECHK(A) ; check if MRPF has same CPT code
ONECK2(A) ; check if other 71 procedure is using MRPF item
LOINC ;ENTER/EDIT LOINC FOR ONE ENTRY IN FILE 71
ACTIVE ;IS THE MRPF ENTRY ACTIVE
CPT(DA,RAX) ;Ask for CPT Code when the 'Procedure Enter/Edit' option

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?3,$C(7),"The MRPF procedure "_RAMATCH_" is already mapped to your procedure ",$P(^RAMIS(71,RAIEN,0),U,1)_"."
  • Line Location: MTCH1+3
Function Call: WRITE
  • Prompt: !," Use the already created procedure.",!
  • Line Location: MTCH1+4
Function Call: WRITE
  • Prompt: !?3,"Either change "_$P(^RAMIS(71,RAIEN,0),U,1)_" or choose another MRPF.",!
  • Line Location: MTCH1+5
Function Call: WRITE
  • Prompt: !!,"This new procedure will be removed."
  • Line Location: MTCH1+6
Function Call: WRITE
  • Prompt: !!?3,"The populating of the MASTER RADIOLOGY PROCEDURE file is called seeding.",!
  • Line Location: SEED+1
Function Call: WRITE
  • Prompt: !!,"This procedure is inactive"
  • Line Location: ONE+7
Function Call: WRITE
  • Prompt: !!,"This procedure is not associated to a CPT Code."
  • Line Location: ONE+9
Function Call: WRITE
  • Prompt: !!,"This procedure is already mapped to "_RAXX_"."
  • Line Location: ONE+11
Function Call: WRITE
  • Prompt: !!,"There are not any MRPF entries associated to CPT Code: "_RACPTMR
  • Line Location: ONE+13
Function Call: WRITE
  • Prompt: !!,"All MRPF Terms for this CPT Code ("_RACPTMR_") are allocated to other Procedures"
  • Line Location: ONE+19
Function Call: WRITE
  • Prompt: !,"Nothing Selected"
  • Line Location: ONE+28
Function Call: WRITE
  • Prompt: !!,"Procedure "_RAPRNM_" is now associated to MRPF "_RAMRPFNM
  • Line Location: ONE+34
Function Call: WRITE
  • Prompt: !!
  • Line Location: ONE+35
Function Call: WRITE
  • Prompt: !?3,"Enter 'Y' to accept the CPT Code, or 'N' to reject the CPT Code or '^' to",!?3,"exit without selecting a CPT Code."
  • Line Location: CPT+14
Function Call: WRITE
  • Prompt: !?5,"Note: If an erroneous CPT Code is accepted it cannot be changed; the",!?5,"procedure must be inactivated."
  • Line Location: CPT+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RAMIS(71 - [#71] Classic Fileman Calls,  GET1^DIQ
^RAMRPF(71.98 - [#71.98] Classic Fileman Calls
^RAMRPF(71.99 - [#71.99] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call