RORP033 ;ALB/MAF - CCR PRE/POST-INSTALL PATCH 33 ;18 Apr 2018 1:38 PM
Source file <RORP033.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ENV | ; --- Environment check
|
|
PRE | ; --- Pre-Install routine for Patch 32
; CHECK FOR ROR VA IRM KEY, ABORT IF USER DOES NOT POSSESS |
|
POST | ; --- Post-Install routine for Patch 32
|
|
GENDRG | ; --- Delete entry in ROR GENERIC DRUG with unresolved pointers
; clean up 799.51 if pointers are bad ; HIV registry : BICTEGRAVIR/EMTRICITABINE/TENOFOVIR ALAFENAMIDE - "BICTEGRAVIR/EMTRICITABINE/TENOFOVIRQW" Released in PSN*4* ; : EFAVIRENZ/LAMIVUDINE/TENOFOVIR DISOPROXIL FUMARATE - "EFAVIRENZ/LAMIVUDINE/TENOFOVIR" Released in PSN*4* ; : LAMIVUDINE/TENOFOVIR DISOPROXIL FUMARATE - "LAMIVUDINE/TENOFOVIR" Released in PSN*4* |
|
LOINC | ;Add new LOINC codes to the VA HIV lab search criterion in
|
|
HIV | ;
|
|
UPDPANEL | ;
; For parameter panel field, add 29, after ,24, right below the Additional Identifiers panel for ; Combined Meds and Labs (REPORT CODE=12) ; Hepatitis A Vaccine or Immunity (REPORT CODE=24) ; Hepatitis B Vaccine of Immunity (REPORT CODE=25) ; Liver Score by Range (REPORT CODE=19) ; Registry Lab Tests by Range (REPORT CODE=10) ; Renal Function by Range (REPORT CODE=20) ; BMI by Range (REPORT CODE=18) |
|
POSQ3(DIR) | ||
POSQ4(DIR) | ||
POSQ5(DIR) | ; --- Updates the DIR array from the post-install question #5 (schedule time for ROR INITIALIZE task)
|
|
NEWREG | ; --- Update ROR LIST ITEM file (#799.1) for new registriesList of new registries to initialize
|
|
UPDPROC | ; --- Update ROR LIST ITEM file (#799.1) for new registriesAdds ICD dx/procedure codes and CPT codes to the new registries in ROR ICD file
; Delete if already there |
|
ADD7985(RORFDA,RORIEN,RORREG) | ; Adds procedures to the entries in the files
|
|
ICDPROC | ; Registry name^PTF ICD Procedure codes, separated by commas^PTF CPT codes, separated by commas^ ICD DIAGNOSIS codes
|
|
UPDLIST | ||
LISTITEM | ; --- Entries to add to ROR LIST ITEM file (#799.1) text^group^code
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^ROR(798.1 - [#798.1] | GET1^DIQ |
^ROR(798.5 - [#798.5] | Classic Fileman Calls |
^ROR(799.51 - [#799.51] | Classic Fileman Calls |