P36IMVT1 021500 DISPLAY '***********************' WS-DAT-COMPIL. 02150000 021600 DISPLAY '* DEBUT P36IMVT1 *'. 02160000 021700 DISPLAY '***********************'. 02170000 026500 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!!!!' 02650000 026600 DISPLAY '!! PB FICHIER EN ENTREE : !!' 02660000 026700 DISPLAY '!! ENTETE HISTMVT ABSENTE !!' 02670000 026800 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!!!!' 02680000 028120 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!!!!' 02812000 028130 DISPLAY '!! PB FICHIER EN ENTREE : !!' 02813000 028140 DISPLAY '!! FICHIER CAV VIDE !!' 02814000 028150 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!!!!' 02815000 032700 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!' 03270000 032800 DISPLAY '!!! FIN ANORMALE PROGRAMME P36IMVT1 !!!' 03280000 032900 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!' 03290000 033400 DISPLAY 'FIN NORMALE PROGRAMME P36IMVT1 ' 03340000 051400 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!' 05140000 051500 DISPLAY '!! DATE SYSIN INVALIDE !!' 05150000 051600 DISPLAY '!! ' WS-DATE-VERIF ' !!' 05160000 051700 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!' 05170000 055900 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!' 05590000 056000 DISPLAY '!! PB ACCES P7X810C !!' 05600000 056100 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!' 05610000 056200 DISPLAY 'CODE RETOUR PGM : ' 05620000 056400 DISPLAY Y00BIA-LIB-CPL-MES-ERR 05640000 060900 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!' 06090000 061000 DISPLAY '!! PB ACCES P7X810L !!' 06100000 061100 DISPLAY '!!!!!!!!!!!!!!!!!!!!!!!!!' 06110000 061200 DISPLAY 'CODE RETOUR PGM : ' 06120000 061400 DISPLAY Y00BIA-LIB-CPL-MES-ERR 06140000 29