FBAAV6 ;AISC/GRR,WOIFO/SAB - CREATE TRANSACTIONS TO SEND TO PRICER ;9/14/2009
Source file <FBAAV6.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GOT | ||
| AUTH(X) | ;Function call to provide the Admitting Regulation.
|
|
| NEWLN | ; New Line
|
|
| STORE | ||
| DX(FBDX,FBDATE,FBPOA) | ; format diagnosis & POA for NVH Pricer
; Input ; FBDX = pointer to file 80 (ICD diagnosis) ; FBDATE = fileman date ; FBPOA = (optional) poiner to file 161.94 (present on admission) ; Returns formatted string of 8 characters |
|
| PROC(FBPROC,FBDATE) | ; format procedure for NVH Pricer
; Input ; FBPROC = pointer to file 80.1 (ICD operation/procedure) ; FBDATE = fileman date ; Returns formatted string of 8 characters |
