IBCIPAY ;DSI/ESG - Extract data and create Ingenix Payor File ;11-JAN-2001
Source file <IBCIPAY.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENTRY | ; Entry point for routine (or called from the top)
|
|
| EXIT | ;
; Routine Exit |
|
| INIT | ; Procedure to initialize some routine-wide variables
|
|
| INITX | ;
|
|
| INTRO | ; This procedure displays introductory text and asks if the user
; wants to proceed with the creation of the PAYOR file. |
|
| INTROX | ;
|
|
| OUTPUT | ; This procedure displays a VistA "please wait" message to the user
; while it loops through the "B" cross reference to the INSURANCE ; COMPANY FILE (#36). The file is closed here and a confirmation ; message is shown to the user. |
|
| OUTPUTX | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|