SD53P491 ;ALB/ESW - SD*5.3*491 POST INIT; Oct 04, 2006 ; 10/23/06 5:40pm ; Compiled June 17, 2008 10:41:32
Source file <SD53P491.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| POST | ;
 | 
|
| ATADD | ; New Billable Appointment Type (352.1) to correspond to the New 'SERVICE CONNECTED' Appointment Type (409.1)
 | 
|
| ATADDQ | ||
| CHKSC | ;Match SC encounter value with proper Appointment Type.
 ; look for encounters only  | 
|
| APPT(DFN,SDT,SCE,UPDAP,SDR) | ;update appointment multiple in Patient file
 | 
|
| RETR(SCE) | ; mark encounter for retransmission
 | 
|
| MSG(X) | ;
 | 
|
| CRST(SDVST,SDSCV,SDAPDPT,CNT) | ;check for credit stop encounter for each scanned encounter
 | 
|
| UPDINS(SDWLSC,CNT,INERROR) | ; update 409.32 and the related entries in 409.3
 | 
|
| MSGG(SDX) | ;send message
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ | 
| ^SDWL(409.3 - [#409.3] | Classic Fileman Calls | 
| ^SDWL(409.32 - [#409.32] | Classic Fileman Calls, DELIX^DDMOD, GET1^DIQ | 
| ^SC - [#44] | GET1^DIQ | 
| ^AUPNVSIT - [#9000010] | GET1^DIQ |