IBCEP5D ;ALB/JEH - EDI UTILITIES - for State License ;29-MAR-01
Source file <IBCEP5D.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;Add/edit state and license number
|
|
| STALIC | ;Add/edit file 200 field 54.1 multiple,state(.01) and license#(1) - DBIA 224
|
|
| STATQ | ;
|
|
| GETLIC(IBPRV) | ; Get license # for provider in file 200 IBPRV
; Pass IBPRV by reference to retrieve #'s by state ; IBPRV(state ien)=id ; Returns 0 if no license # found |
|
| EDIT(IBFILE,IBFLD,IB0,IBOLD,IBIEN,IBCK1) | ; Generic edit flds
|
|
| EDITQ |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | Classic Fileman Calls |
| ^IBA(355.9 - [#355.9] | GET1^DID |
| ^IBA(355.93 - [#355.93] | GET1^DIQ |
| ^IBE(355.97 - [#355.97] | GET1^DIQ |
| ^DIC(36 - [#36] | Classic Fileman Calls |