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

Package: VBECS

Routine: VBECDCM1


Information

VBECDCM1 ;hoifo/gjc-VBECS MAPPING TABLE delete utilities.;Nov 21, 2002

Source Information

Source file <VBECDCM1.m>

Entry Points

Name Comments DBIA/ICR reference
EN613 ; decouple antibodies/antigens
EN654 ; decouple transfusion reactions
ENP613 ; purge VistA antibodies/antigens
ENP654 ; purge VistA transfusion reactions mapping
PURGALL ; purge all the records in the VBECS MAPPING TABLE (#6005) file
; initialize the error trap
PURGE(VBEC01,CNT) ; purge at the record level using DIK
; input: VBEC01=sub-file number or file number-ien VBEC MATCHING TABLE
; file.
; CNT=The number of records purged.
SINGLE ; decouple relations for a single record
; initialize the error trap
KILSIN
ASK ; decouple records from the VBECS MAPPING TABLE (#6005) file
; initialize the error trap
DECUP(Y) ; delete the STANDARD VBECS DATA (#.05), CHECKSUM (#.06), &
; TIMESTAMP (#.07) field level data (essentially unmap)
XIT ; kill and quit
YN() ; yes/no to decoupling question...

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Please be patient, this may take awhile"
  • Line Location: PURGALL+19
Function Call: WRITE
  • Prompt: !!,"Mapping for "_VBECREC_" decoupled.",!
  • Line Location: SINGLE+13
Function Call: WRITE
  • Prompt: !!?3,"Please be patient, this may take a while",!
  • Line Location: ASK+5
Function Call: WRITE
  • Prompt: !?3,"Finished decoupling ",CNT," mapped records from the VBECS MAPPING TABLE (#6005)",!?3,"file. For VistA "_VBECNME_" data types."
  • Line Location: ASK+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VBEC(6005 - [#6005] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call