4. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 4/28/2017 1:53:40 PM Central Daylight Time. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a modern standards-compliant browser. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.

4.1 Files compared

# Location File Last Modified
1 MCCF.zip\MCCF\docs MCCF+EDI+TAS+USEB-12+SDD.docx Thu Apr 13 18:53:44 2017 UTC
2 MCCF.zip\MCCF\docs MCCF+EDI+TAS+USEB-12+SDD.docx Fri Apr 28 18:43:44 2017 UTC

4.2 Comparison summary

Description Between
Files 1 and 2
Text Blocks Lines
Unchanged 1 296
Changed 0 0
Inserted 0 0
Removed 0 0

4.3 Comparison options

Whitespace
Character case Differences in character case are significant
Line endings Differences in line endings (CR and LF characters) are ignored
CR/LF characters Not shown in the comparison detail

4.4 Active regular expressions

No regular expressions were active.

4.5 Comparison detail

  1   MCCF EDI T AS USEB-12
  2   System Des ign Docume nt
  3   IB*2.0*???
  4  
  5  
  6  
  7  
  8   Department  of Vetera ns Affairs
  9   October 20 16
  10   Version 1. 0
  11   User Story  Number: U SEB-12
  12   User Story  Name: Pri nting of C MS 1500 (B acklog # 1 48)
  13   Resolution /Data Desi gn 
  14   The follow ing is lis t of thing s that nee d to be do ne to sati sfy this u ser story:
  15   For Box 22 -A (RESUBM ISSION COD E) on the  CMS 1500 f orm the fo llowing ne ed to occu r:
  16   COLUMN 50   MEDICAID  RESUB CODE  (BX-22/A)              364.6[14 75] 364.7[ 1175] 364. 5[5]       Length=11     Max Lin es=0
  17   >Constant  Value:  ""
  18  
  19   Currently,  #364.7, 1 175 points  to #364.5 , 5.  Need  to update  #364.7, 1 175 by cha nging the  DATA ELEME NT field t o validate  the Bill  Frequency  Code which  is contai ned in #36 4.5, 74 (L oop 2300 C LM05-3 [CL 1 pc 5]).   The follo wing is th e Fileman  field defi nition for  364.5, 74 :
  20   Select IB  DATA ELEME NT DEFINIT ION NAME:  N-BILL FRE QUENCY        BILL/CL AIMS
  21   ANOTHER ON E: 
  22   STANDARD C APTIONED O UTPUT? Yes //   (Yes)
  23   Include CO MPUTED fie lds:  (N/Y /R/B): NO/ /  - No re cord numbe r (IEN), n o Computes
  24  
  25   NAME: N-BI LL FREQUEN CY                    SECURITY L EVEL: NATI ONAL,NO ED IT
  26   TYPE OF EL EMENT: NON -MULTIPLE  FILEMAN FI ELD
  27   ELEMENT CA TEGORY: IN DIVIDUAL E LEMENT  BA SE FILE: B ILL/CLAIMS
  28   FILEMAN FI ELD REFERE NCE: TIMEF RAME OF BI LL
  29   DESCRIPTIO N:   The i nternal co de for the  frequency  of the bi ll entry I BXIEN.
  30  
  31   Modify #36 4.7, 1175,  the FORMA T CODE fie ld, to con ditionally  kill IBXD ATA if it  is equal t o “7” or “ 8”, at the  same time  set IBXSA VE(“FQCD”)  equal to  IBXDATA, i f IBXDATA  is equal t o “7” or “ 8”.  The c ode to be  used will  be as foll ows:
  32   K IBXSAVE( “FQCD”) S: (“^7^8^”[( U_IBXDATA_ U)) IBXSAV E(“FQCD”)= IBXDATA I  ‘$D(IBXSAV E(“FQCD”))  K IBXDATA
  33   Modify the  IBY???PO  routine to  properly  make these  form modi fications.
  34  
  35   For Box 22 -B (ORIGIN AL REF. NO .) on the  CMS 1500 f orm the fo llowing ne ed to occu r:
  36   COLUMN 62   ORIGINAL  REF NO (BX -22/B)                  364.6[14 76] 364.7[ 1176] 364. 5[5]       Length=17     Max Lin es=0
  37   >Constant  Value:  ""
  38   Currently,  #364.7, 1 176 points  to #364.5 , 5.  Need  to update  #364.7, 1 176 by cha nging the  DATA ELEME NT field t o obtain t he Payer C laim Contr ol Number  ICN/DCN as  in 364.5,  55 (Loop  2300 REF02  [CI3A pc  6]).  The  following  is the Fil eman field  definitio n for 364. 5, 55:
  39  
  40   Select IB  DATA ELEME NT DEFINIT ION NAME:  N-CURR INS  FORM LOC  64       B ILL/CLAIMS
  41   ANOTHER ON E: 
  42   STANDARD C APTIONED O UTPUT? Yes //   (Yes)
  43   Include CO MPUTED fie lds:  (N/Y /R/B): NO/ /  - No re cord numbe r (IEN), n o Computed  Fields
  44  
  45   NAME: N-CU RR INS FOR M LOC 64              SECURITY L EVEL: NATI ONAL,NO ED IT
  46   TYPE OF EL EMENT: EXT RACTED VIA  CODE   EL EMENT CATE GORY: INDI VIDUAL ELE MENT
  47   BASE FILE:  BILL/CLAI MS
  48   EXTRACT CO DE: N Z S  Z=$$COBN^I BCEF(IBXIE N) D F^IBC EF("N-UB-0 4 FORM LOC ATOR 64"_$ P("^B^C",U ,Z))
  49   DESCRIPTIO N:   The f orm locato r 64 data  for the cu rrent insu rance comp any for bi ll entry I BXIEN.  
  50  
  51   Modify #36 4.7, 1176,  the FORMA T CODE fie ld, to con ditionally  kill IBXD ATA if the  Bill Freq uency Code  was equal  to “7” or  “8”.  The  code to b e used wil l be as fo llows:
  52   I ‘$D(IBXS AVE(“FQCD” )) K IBXDA TA
  53   Modify the  IBY???PO  routine to  properly  make these  form modi fications.
  54    
  55   Create the  New ^IBY? ??PR Pre-I nstall Rou tine
  56  
  57   Routines
  58   Activities
  59   Routine Na me
  60   IBY???PR
  61   Enhancemen t Category
  62    New
  63    Modify
  64    Delete
  65    No Change
  66   RTM
  67  
  68   Related Op tions
  69   None
  70   Related Ro utines
  71   Routines “ Called By”
  72   Routines “ Called”   
  73  
  74  
  75  
  76  
  77   Data Dicti onary (DD)  Reference s
  78   IB DATA EL EMENT DEFI NITION Fil e [#364.7]  
  79   Related Pr otocols
  80   None
  81   Related In tegration  Control Re gistration s (ICRs)
  82   None
  83   Data Passi ng
  84    Input
  85    Output Re ference
  86    Both
  87    Global Re ference
  88    Local
  89   Input Attr ibute Name  and Defin ition
  90   Name:
  91   Definition :
  92   Output Att ribute Nam e and Defi nition
  93   Name:
  94   Definition :
  95   Current Lo gic
  96   N/A
  97   Modified L ogic (Chan ges are in  bold)
  98   IBY???PR ; ALB/VAD -  Pre-Instal lation for  IB patch  ??? ;27-Au g-2007 ;;2 .0;INTEGRA TED BILLIN G;**???**; 21-MAR-94; Build 52 ;
  99    D DELOF        ; del ete all ou tput forma tter data  elements i ncluded in  build
  100    Q
  101    ;DELOF ;  Delete inc luded outp ut formatt er entries  NEW FILE, DIK,LN,TAG ,DATA,PCE, DA,Y F FIL E=5,6,7 S  DIK="^IBA( 364."_FILE _"," F LN= 2:1 S TAG= "ENT"_FILE _"+"_LN,DA TA=$P($T(@ TAG),";;", 2) Q:DATA= ""  D . F  PCE=2:1 S  DA=$P(DATA ,U,PCE) Q: 'DA  I $D( ^IBA("364. "_FILE,DA, 0)) D ^DIK  . Q  ;DEL OFX ; Q ;I NCLUDE(FIL E,Y) ; fun ction to d etermine i f output f ormatter e ntry shoul d be ; inc luded in t he build ;  FILE=5,6, 7 indicati ng file 36 4.x ; Y=ie n to file  ; NEW OK,L N,TAG,DATA  S OK=0 F  LN=2:1 S T AG="ENT"_F ILE_"+"_LN ,DATA=$P($ T(@TAG),"; ;",2) Q:DA TA=""  I $ F(DATA,U_Y _U) S OK=1  QINCLUDEX  ; Q OK ;  ;--------- ---------- ---------- ---------- ---------- ---------- ---------- --
  102    ; 364.7 e ntries mod ified:ENT7  ; output  formatter  entries in  file 364. 7 to be in cluded ; ; ;^1175^117 6^ ; ;---- ---------- ---------- ---------- ---------- ---------- ---------- ------- ;  364.7 entr ies modifi ed: ;1175  CL1-5 ;117 6 CI3A-6
  103    ; ;------ ---------- ---------- ---------- ---------- ---------- ---------- -----
  104    ;
  105  
  106   Need to ad d the 364. 7 file to  the build  for the up dates to t he 1175 an d 1176 ent ries.
  107  
  108                                Edi t a Build                             PAGE  2 OF 5
  109   Name: IB*2 .0*???                               TYPE:  SINGLE PAC KAGE
  110   ---------- ---------- ---------- ---------- ---------- ---------- ---------- ---------
  111                                Fil e List  (N ame or Num ber)
  112      DD  Export Opt ions    
  113                                                                                      
  114                           File: I B FORM FIE LD CONTENT                              
  115                                                                                      
  116      Send F ull or Par tial DD... : FULL                                             
  117                                                                                      
  118   Update th e Data Dic tionary: N O           Send Secu rity Code:  NO               
  119                                                                                      
  120   Screen to  Determine  DD Update                                                    
  121                                                                                      
  122                                                                                      
  123         Dat a Comes Wi th File... : YES                                              
  124          
  125   __________ __________ __________ __________ __________ __________ __________ _________
  126  
  127  
  128  
  129  
  130  
  131  
  132   Name: IB*2 .0*???                               TYPE:  SINGLE PAC KAGE
  133   ---------- ---------- ---------- ---------- ---------- ---------- ---------- ---------
  134                                Fil e List  (N ame or Num ber)
  135      DD  Export Opt ions    
  136       Data Expor t Options    
  137                                                                                    
  138         Si te's Data:  OVERWRITE                                                   
  139                                                                                    
  140    Resolve  Pointers:  YES              May  User Over ride Data  Update: NO       
  141                                                                                    
  142            Data List:                                                              
  143                                                                                    
  144    Screen  to Select  Data                                                         
  145    I $$INC LUDE^IBY?? ?PR(7,Y)                                                     
  146          
  147          
  148   __________ __________ __________ __________ __________ __________ __________ _________

Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.