RORP032 ;ALB/SJA - CCR PRE/POST-INSTALL PATCH 32 ;18 Apr 2017 1:38 PM
Source file <RORP032.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
 | 
|
| 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
 | 
|
| GENDRG | ; --- Delete entry in ROR GENERIC DRUG with unresolved pointers
 ; clean up 799.51 if pointers are bad ; HEP C registry : GLECAPREVIR/PIBRENTASVIR - Released in PSN*4*536 ; HIV registry : DOLUTEGRAVIR/RILPIVIRINE - Released in PSN*4*545  | 
|
| POSQ3(DIR) | ||
| POSQ4(DIR) | ||
| POSQ5(DIR) | ; --- Updates the DIR array from the post-install question #5  (schedule time for ROR INITIALIZE task)
 | 
| 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 |