HLCSHDR3 ;SFIRMFO/LJA - Reset MSH Segment Fields ;03/24/04 11:19
Source file <HLCSHDR3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RESET | ; Called from HEADER^HLCSHDR1 & BHSHDR^HLCSHDR1, which is called by
; GENERATE^HLMA & GENACK^HLMA1. |
|
| MSHCHG(HLEID,EIDS,MTIEN,IEN,SERAPP,SERFAC,CLNTAPP,CLNTFAC,HLPARR) | ; The parameters
; are the required input variables. Call here "by reference". |
|
| SET91M(PCE,MSH,PREM,POSTM) | ; If M code re/set the MSH field, record...
|
|
| HLMSHPRO() | ; Determines whether to use the generic HLP("SUBSCRIBER") data,
; or instead - if existent - the HLP("SUBSCRIBER",#)=SUB PROTOCOL^... data |
|
| FIND101(PROTNM) | ; Find 101 entry...
|
|
| SHOW773(IEN773) | ; Show reset info from 773 entry...
|
|
| EOR | ;HLCSHDR3 - Reset MSH Segment Fields ;9/12/02 11:50
|
| FileNo | Call Tags |
|---|---|
| ^ORD(101 - [#101] | Classic Fileman Calls |
