Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: AZHQTRNS

AZHQTRNS.m

Go to the documentation of this file. 
  1. AZHQTRNS ;IHS/OIRM/DSD/AEF - BUILD ARRAY OF PATCHES FOR TRANSPORT GLOBAL [ 01/28/2003  4:02 PM ]
  1.  ;;1.0;ANNE'S SPECIAL ROUTINES;;NOV 04,2002
  1.  ;;
  1.  ;
  1. EN ;EP -- MAIN ENTRY POINT
  1.  ;
  1.  Q
  1. KERNEL ;----- INSERT KERNEL PATCHES
  1.  ;
  1.  S PKG="KRN"
  1.  D BLD
  1.  Q
  1. FILEMAN ;----- INSERT FILEMAN PATCHES
  1.  ;
  1.  S PKG="FM"
  1.  D BLD
  1.  Q
  1. TOOLKIT ;----- INSERT TOOLKIT PATCHES
  1.  ;
  1.  S PKG="TK"
  1.  D BLD
  1.  Q
  1. HL7 ;----- INSERT HL7 PATCHES
  1.  ;
  1.  S PKG="HL"
  1.  D BLD
  1.  Q
  1. RPCBROK ;----- INSERT RPC BROKER PACHES
  1.  ;
  1.  S PKG="RPC"
  1.  D BLD
  1.  Q
  1. BLD ;----- BUILD ARRAY OF PATCHES     
  1.  ;          
  1.  N CNT,IEN,PATCH,I,X,Y
  1.  F I=3:1 S X=$T(@PKG+I) Q:X["$$END"  D
  1.  . S PATCH=$P(X,";",4)
  1.  . Q:PATCH']""
  1.  . S IEN=$$IEN(PATCH)
  1.  . Q:IEN'>0
  1.  . S PATCH=PATCH_"^"
  1.  . D PCK^XPDT(IEN,PATCH,0)
  1.  Q
  1. IEN(X) ;----- RETURNS PATCH IEN
  1.  ;
  1.  ;      X  =  PATCH NAME
  1.  ;
  1.  N DIC
  1.  S DIC="^XPD(9.6,"
  1.  S DIC(0)=""
  1.  D ^DIC
  1.  Q +Y
  1. KRN ;----- LIST OF KERNEL PATCHES TO INCLUDE IN BUILD ARRAY
  1.  ;;INSTALL ORDER;NAME;SEQ;IEN
  1.  ;;1;XU*8.0*1007;7
  1.  ;;2;XU*8.0*40;30;19
  1.  ;;3;XU*8.0*41;31;413
  1.  ;;4;XU*8.0*29;32
  1.  ;;5;XU*8.0*42;33
  1.  ;;6;XU*8.0*35;34
  1.  ;;7;XU*8.0*44;35
  1.  ;;8;XU*8.0*14;36
  1.  ;;9;XU*8.0*47;37
  1.  ;;10;XU*8.0*50;38
  1.  ;;11;XU*8.0*48;39
  1.  ;;12;XU*8.0*51;40
  1.  ;;13;XU*8.0*36;41
  1.  ;;14;XU*8.0*56;43
  1.  ;;15;XU*8.0*55;44
  1.  ;;16;XU*8.0*57;45
  1.  ;;17;XU*8.0*58;46
  1.  ;;18;XU*8.0*61;47
  1.  ;;19;XU*8.0*66;48
  1.  ;;20;XU*8.0*49;49
  1.  ;;21;XU*8.0*64;50
  1.  ;;22;XU*8.0*59;51
  1.  ;;23;XU*8.0*70;52
  1.  ;;24;XU*8.0*62;53
  1.  ;;25;XU*8.0*68;54
  1.  ;;26;XU*8.0*63;55
  1.  ;;27;XU*8.0*65;56
  1.  ;;28;XU*8.0*73;57
  1.  ;;29;XU*8.0*60;58
  1.  ;;30;XU*8.0*71;59
  1.  ;;31;XU*8.0*77;60
  1.  ;;32;XU*8.0*78;61
  1.  ;;33;XU*8.0*67;62
  1.  ;;34;XU*8.0*76;63
  1.  ;;35;XU*8.0*83;64
  1.  ;;36;XU*8.0*46;65
  1.  ;;37;XU*8.0*84;66
  1.  ;;38;XU*8.0*74;67
  1.  ;;39;XU*8.0*75;68
  1.  ;;40;XU*8.0*72;69
  1.  ;;41;XU*8.0*80;70
  1.  ;;42;XU*8.0*81;71
  1.  ;;43;XU*8.0*43;72
  1.  ;;44;XU*8.0*90;73
  1.  ;;45;XU*8.0*69;74
  1.  ;;46;XU*8.0*88;75
  1.  ;;47;XU*8.0*92;76
  1.  ;;48;XU*8.0*87;77
  1.  ;;49;XU*8.0*79;78
  1.  ;;50;XU*8.0*34;79
  1.  ;;51;XU*8.0*85;80
  1.  ;;52;XU*8.0*95;81
  1.  ;;53;XU*8.0*97;82
  1.  ;;54;XU*8.0*89;83
  1.  ;;55;XU*8.0*86;84
  1.  ;;56;XU*8.0*94;85
  1.  ;;57;XU*8.0*99;86
  1.  ;;58;XU*8.0*82;87
  1.  ;;59;XU*8.0*102;88
  1.  ;;60;XU*8.0*105;89
  1.  ;;61;XU*8.0*96;90
  1.  ;;62;XU*8.0*103;91
  1.  ;;63;XU*8.0*91;92
  1.  ;;64;XU*8.0*101;93
  1.  ;;65;XU*8.0*104;94
  1.  ;;66;XU*8.0*109;95
  1.  ;;67;XU*8.0*107;96
  1.  ;;68;XU*8.0*113;97
  1.  ;;69;XU*8.0*111;98
  1.  ;;70;XU*8.0*100;99
  1.  ;;71;XU*8.0*110;100
  1.  ;;72;XU*8.0*116;101
  1.  ;;73;XU*8.0*112;102
  1.  ;;74;XU*8.0*98;103
  1.  ;;75;XU*8.0*121;104
  1.  ;;76;XU*8.0*117;105
  1.  ;;77;XU*8.0*114;106
  1.  ;;78;XU*8.0*37;107
  1.  ;;79;XU*8.0*108;108
  1.  ;;80;XU*8.0*123;109
  1.  ;;81;XU*8.0*115;110
  1.  ;;82;XU*8.0*124;111
  1.  ;;83;XU*8.0*118;112
  1.  ;;84;XU*8.0*120;113
  1.  ;;85;XU*8.0*125;114
  1.  ;;86;XU*8.0*128;115
  1.  ;;87;XU*8.0*129;116
  1.  ;;88;XU*8.0*127;117
  1.  ;;89;XU*8.0*133;118
  1.  ;;90;XU*8.0*131;119
  1.  ;;91;XU*8.0*135;120
  1.  ;;92;XU*8.0*140;121
  1.  ;;93;XU*8.0*141;122
  1.  ;;94;XU*8.0*137;123
  1.  ;;95;XU*8.0*130;124
  1.  ;;96;XU*8.0*122;125
  1.  ;;97;XU*8.0*144;126
  1.  ;;98;XU*8.0*106;127
  1.  ;;99;XU*8.0*134;128
  1.  ;;100;XU*8.0*145;129
  1.  ;;101;XU*8.0*146;130
  1.  ;;102;XU*8.0*142;131
  1.  ;;103;XU*8.0*136;132
  1.  ;;104;XU*8.0*152;133
  1.  ;;105;XU*8.0*143;134
  1.  ;;106;XU*8.0*158;135
  1.  ;;107;XU*8.0*153;136
  1.  ;;108;XU*8.0*138;137
  1.  ;;109;XU*8.0*164;138
  1.  ;;110;XU*8.0*165;139
  1.  ;;111;XU*8.0*159;141
  1.  ;;112;XU*8.0*163;142
  1.  ;;113;XU*8.0*166;143
  1.  ;;114;XU*8.0*167;144
  1.  ;;115;XU*8.0*151;145
  1.  ;;116;XU*8.0*162;146
  1.  ;;117;XU*8.0*168;147
  1.  ;;118;XU*8.0*170;148
  1.  ;;119;XU*8.0*150;149
  1.  ;;120;XU*8.0*178;150
  1.  ;;121;XU*8.0*149;151
  1.  ;;122;XU*8.0*176;152
  1.  ;;123;XU*8.0*154;153
  1.  ;;124;XU*8.0*181;154
  1.  ;;125;XU*8.0*182;155
  1.  ;;126;XU*8.0*175;156
  1.  ;;127;XU*8.0*148;157
  1.  ;;128;XU*8.0*171;158
  1.  ;;129;XU*8.0*177;159
  1.  ;;130;XU*8.0*179;160
  1.  ;;131;XU*8.0*185;161
  1.  ;;132;XU*8.0*132;162
  1.  ;;133;XU*8.0*183;163
  1.  ;;134;XU*8.0*188;164
  1.  ;;135;XU*8.0*180;165
  1.  ;;136;XU*8.0*184;166
  1.  ;;137;XU*8.0*155;167
  1.  ;;138;XU*8.0*126;168
  1.  ;;139;XU*8.0*206;169
  1.  ;;140;XU*8.0*196;170
  1.  ;;141;XU*8.0*169;171
  1.  ;;142;XU*8.0*192;172
  1.  ;;143;XU*8.0*197;173
  1.  ;;144;XU*8.0*201;174
  1.  ;;145;XU*8.0*213;175
  1.  ;;146;XU*8.0*214;176
  1.  ;;147;XU*8.0*210;177
  1.  ;;148;XU*8.0*208;178
  1.  ;;149;XU*8.0*199;179
  1.  ;;150;XU*8.0*209;180
  1.  ;;151;XU*8.0*212;181
  1.  ;;152;XU*8.0*216;182
  1.  ;;153;XU*8.0*200;183
  1.  ;;154;XU*8.0*205;184
  1.  ;;155;XU*8.0*215;185
  1.  ;;156;XU*8.0*202;186
  1.  ;;157;XU*8.0*221;187
  1.  ;;158;XU*8.0*211;188
  1.  ;;159;XU*8.0*173;189
  1.  ;;160;XU*8.0*226;190
  1.  ;;;RESOURCE USAGE MONITOR 1.0
  1.  ;;1;KMPR*1.0*1
  1.  ;;2;KMPR*1.0*2
  1.  ;;;SAGG PROJECT 1.8
  1.  ;;1;KMPS*1.8*1
  1.  ;;;RPC BROKER 1.1
  1.  ;;1;XWB*1.1*1
  1.  ;;2;XWB*1.1*2
  1.  ;;3;XWB*1.1*3
  1.  ;;4;XWB*1.1*5
  1.  ;;5;XWB*1.1*7
  1.  ;;6;XWB*1.1*4
  1.  ;;7;XWB*1.1*6
  1.  ;;8;XWB*1.1*8
  1.  ;;9;XWB*1.1*9
  1.  ;;10;XWB*1.1*11
  1.  ;;11;XWB*1.1*15
  1.  ;;12;XWB*1.1*10
  1.  ;;13;XWB*1.1*12
  1.  ;;14;XWB*1.1*18
  1.  ;;15;XWB*1.1*14
  1.  ;;16;XWB*1.1*20
  1.  ;;17;XWB*1.1*22
  1.  ;;19;XWB*1.1*16
  1.  ;;20;XWB*1.1*27
  1.  ;;21;XWB*1.1*25
  1.  ;;22;XWB*1.1*13
  1.  ;;23;XWB*1.1*26
  1.  ;;24;XWB*1.1*29
  1.  ;;9;A4A7*1.01*9
  1.  ;;10;A4A7*1.01*10
  1.  ;;11;A4A7*1.01*11
  1.  ;;1;AVA*93.2*15
  1.  ;;$$END
  1. FM ;----- LIST OF FILEMAN PATCHES TO INCLUDE IN BUILD
  1.  ;;SEQ;NAME 
  1.  ;;;DI*22.0*1001
  1.  ;;1;DI*22.0*1
  1.  ;;2;DI*22.0*13
  1.  ;;3;DI*22.0*12
  1.  ;;4;DI*22.0*14
  1.  ;;5;DI*22.0*7
  1.  ;;6;DI*22.0*16
  1.  ;;7;DI*22.0*15
  1.  ;;8;DI*22.0*10
  1.  ;;9;DI*22.0*4
  1.  ;;10;DI*22.0*2
  1.  ;;11;DI*22.0*17
  1.  ;;12;DI*22.0*21
  1.  ;;13;DI*22.0*22
  1.  ;;14;DI*22.0*23
  1.  ;;15;DI*22.0*27
  1.  ;;16;DI*22.0*24
  1.  ;;17;DI*22.0*25
  1.  ;;18;DI*22.0*20
  1.  ;;19;DI*22.0*29
  1.  ;;20;DI*22.0*8
  1.  ;;21;DI*22.0*9
  1.  ;;22;DI*22.0*26
  1.  ;;23;DI*22.0*30
  1.  ;;24;DI*22.0*32
  1.  ;;25;DI*22.0*28
  1.  ;;26;DI*22.0*33
  1.  ;;27;DI*22.0*36
  1.  ;;28;DI*22.0*39
  1.  ;;29;DI*22.0*11
  1.  ;;30;DI*22.0*31
  1.  ;;31;DI*22.0*6
  1.  ;;32;DI*22.0*34
  1.  ;;33;DI*22.0*19
  1.  ;;34;DI*22.0*37
  1.  ;;35;DI*22.0*5
  1.  ;;36;DI*22.0*35
  1.  ;;37;DI*22.0*3
  1.  ;;38;DI*22.0*40
  1.  ;;39;DI*22.0*48
  1.  ;;40;DI*22.0*51
  1.  ;;41;DI*22.0*38
  1.  ;;42;DI*22.0*43
  1.  ;;43;DI*22.0*44
  1.  ;;44;DI*22.0*45
  1.  ;;45;DI*22.0*47
  1.  ;;46;DI*22.0*50
  1.  ;;47;DI*22.0*46
  1.  ;;48;DI*22.0*54
  1.  ;;49;DI*22.0*56
  1.  ;;50;DI*22.0*53
  1.  ;;51;DI*22.0*57
  1.  ;;52;DI*22.0*61
  1.  ;;53;DI*22.0*55
  1.  ;;54;DI*22.0*58
  1.  ;;55;DI*22.0*60
  1.  ;;56;DI*22.0*62
  1.  ;;57;DI*22.0*65
  1.  ;;58;DI*22.0*69
  1.  ;;59;DI*22.0*63
  1.  ;;60;DI*22.0*64
  1.  ;;61;DI*22.0*74
  1.  ;;62;DI*22.0*67
  1.  ;;63;DI*22.0*81
  1.  ;;64;DI*22.0*72
  1.  ;;66;DI*22.0*52
  1.  ;;67;DI*22.0*79
  1.  ;;68;DI*22.0*42
  1.  ;;69;DI*22.0*75
  1.  ;;70;DI*22.0*85
  1.  ;;71;DI*22.0*88
  1.  ;;72;DI*22.0*73
  1.  ;;73;DI*22.0*77
  1.  ;;74;DI*22.0*78
  1.  ;;75;DI*22.0*87
  1.  ;;76;DI*22.0*86
  1.  ;;77;DI*22.0*18
  1.  ;;78;DI*22.0*59
  1.  ;;79;DI*22.0*82
  1.  ;;80;DI*22.0*41
  1.  ;;81;DI*22.0*68
  1.  ;;82;DI*22.0*49
  1.  ;;83;DI*22.0*90
  1.  ;;84;DI*22.0*94
  1.  ;;85;DI*22.0*92
  1.  ;;86;DI*22.0*83
  1.  ;;87;DI*22.0*91
  1.  ;;88;DI*22.0*89
  1.  ;;$$END
  1. TK ;----- LIST OF TOOLKIT PATCHES TO INCLUDE IN BUILD
  1.  ;;SEQ;NAME
  1.  ;;;XT*7.3*1001
  1.  ;;1;XT*7.3*1
  1.  ;;2;XT*7.3*2
  1.  ;;3;XT*7.3*8
  1.  ;;4;XT*7.3*9
  1.  ;;5;XT*7.3*5
  1.  ;;6;XT*7.3*6
  1.  ;;7;XT*7.3*7
  1.  ;;8;XT*7.3*12
  1.  ;;9;XT*7.3*3
  1.  ;;10;XT*7.3*13
  1.  ;;11;XT*7.3*14
  1.  ;;12;XT*7.3*11
  1.  ;;13;XT*7.3*17
  1.  ;;14;XT*7.3*15
  1.  ;;15;XT*7.3*20
  1.  ;;16;XT*7.3*25
  1.  ;;17;XT*7.3*23
  1.  ;;18;XT*7.3*28
  1.  ;;19;XT*7.3*29
  1.  ;;20;XT*7.3*30
  1.  ;;21;XT*7.3*27
  1.  ;;22;XT*7.3*32
  1.  ;;23;XT*7.3*33
  1.  ;;24;XT*7.3*26
  1.  ;;25;XT*7.3*34
  1.  ;;26;XT*7.3*35
  1.  ;;27;XT*7.3*37
  1.  ;;28;XT*7.3*38
  1.  ;;29;XT*7.3*40
  1.  ;;30;XT*7.3*36
  1.  ;;31;XT*7.3*42
  1.  ;;32;XT*7.3*43
  1.  ;;33;XT*7.3*44
  1.  ;;34;XT*7.3*45
  1.  ;;35;XT*7.3*46
  1.  ;;36;XT*7.3*39
  1.  ;;37;XT*7.3*48
  1.  ;;38;XT*7.3*47
  1.  ;;39;XT*7.3*49
  1.  ;;40;XT*7.3*51
  1.  ;;41;XT*7.3*52
  1.  ;;42;XT*7.3*53
  1.  ;;43;XT*7.3*54
  1.  ;;44;XT*7.3*19
  1.  ;;45;XT*7.3*55
  1.  ;;46;XT*7.3*56
  1.  ;;47;XT*7.3*60
  1.  ;;48;XT*7.3*62
  1.  ;;$$END
  1. HL ;----- LIST OF HL7 PATCHES TO INCLUDE IN BUILD HL*1.6*1004
  1.  ;;SEQ;NAME
  1.  ;;;HL*1.6*1004
  1.  ;;20;HL*1.6*26
  1.  ;;21;HL*1.6*28
  1.  ;;22;HL*1.6*29
  1.  ;;23;HL*1.6*23
  1.  ;;24;HL*1.6*24
  1.  ;;25;HL*1.6*30
  1.  ;;27;HL*1.6*35
  1.  ;;28;HL*1.6*36
  1.  ;;29;HL*1.6*38
  1.  ;;30;HL*1.6*34
  1.  ;;31;HL*1.6*41
  1.  ;;32;HL*1.6*42
  1.  ;;33;HL*1.6*14
  1.  ;;34;HL*1.6*37
  1.  ;;35;HL*1.6*40
  1.  ;;36;HL*1.6*19
  1.  ;;37;HL*1.6*43
  1.  ;;39;HL*1.6*51
  1.  ;;40;HL*1.6*48
  1.  ;;41;HL*1.6*44
  1.  ;;42;HL*1.6*55
  1.  ;;43;HL*1.6*50
  1.  ;;44;HL*1.6*47
  1.  ;;45;HL*1.6*49
  1.  ;;46;HL*1.6*39
  1.  ;;47;HL*1.6*54
  1.  ;;48;HL*1.6*57
  1.  ;;50;HL*1.6*60
  1.  ;;51;HL*1.6*58
  1.  ;;52;HL*1.6*63
  1.  ;;53;HL*1.6*61
  1.  ;;54;HL*1.6*59
  1.  ;;55;HL*1.6*64
  1.  ;;56;HL*1.6*65
  1.  ;;57;HL*1.6*66
  1.  ;;58;HL*1.6*67
  1.  ;;59;HL*1.6*68
  1.  ;;61;HL*1.6*73
  1.  ;;62;HL*1.6*72
  1.  ;;63;HL*1.6*69
  1.  ;;64;HL*1.6*76
  1.  ;;65;HL*1.6*80
  1.  ;;66;HL*1.6*77
  1.  ;;67;HL*1.6*81
  1.  ;;68;HL*1.6*75
  1.  ;;69;HL*1.6*82
  1.  ;;70;HL*1.6*83
  1.  ;;71;HL*1.6*79
  1.  ;;72;HL*1.6*62
  1.  ;;73;HL*1.6*78
  1.  ;;74;HL*1.6*71
  1.  ;;75;HL*1.6*89
  1.  ;;76;HL*1.6*92
  1.  ;;77;HL*1.6*91
  1.  ;;78;HL*1.6*85
  1.  ;;79;HL*1.6*87
  1.  ;;$$END
  1. RPC ;----- LIST OF RPC BROKER PATCHES TO INCLUDE IN BUILD XWB*1.1*1001
  1.  ;;SEQ;NAME
  1.  ;;;XWB*1.1*1001
  1.  ;;1;XWB*1.1*1
  1.  ;;2;XWB*1.1*2
  1.  ;;3;XWB*1.1*3
  1.  ;;4;XWB*1.1*5
  1.  ;;5;XWB*1.1*7
  1.  ;;6;XWB*1.1*4
  1.  ;;7;XWB*1.1*6
  1.  ;;8;XWB*1.1*8
  1.  ;;9;XWB*1.1*9
  1.  ;;10;XWB*1.1*11
  1.  ;;11;XWB*1.1*15
  1.  ;;12;XWB*1.1*10
  1.  ;;13;XWB*1.1*12
  1.  ;;14;XWB*1.1*18
  1.  ;;15;XWB*1.1*14
  1.  ;;16;XWB*1.1*20
  1.  ;;17;XWB*1.1*22
  1.  ;;18;XWB*1.1*24
  1.  ;;19;XWB*1.1*16
  1.  ;;20;XWB*1.1*27
  1.  ;;21;XWB*1.1*25
  1.  ;;22;XWB*1.1*13
  1.  ;;23;XWB*1.1*26
  1.  ;;24;XWB*1.1*29
  1.  ;;$$END